Penanganan Error pada VB.Net

Fungsi penanganan Error Wajib kita terapkan pada Aplikasi yang kita buat, Supaya bisa mencegah adanya Bug/Runtime Error pada Aplikasi yang kita buat.
Fungsi ini layaknya penutup kesalahan pada Aplikasi.
Di Visual Basic.NET sendiri telah menambahkan Script2 baru untuk menangani Runtime Error, Contoh :



On Error Goto :
Code ini berfungsi bila terjadi kesalahan pada komputer atau faktor lain di luar  aplikasi, Bukan karna kesalahan Script.
Misal : Sebuah Aplikasi di wajibkan untuk Open Close Optic Driver yang ada di komputer si User , Sedangkan pada komputer tersebut tidak ada Optic Driver yang terditeksi, Maka Aplikasi tentunya akan Error dan code tersebut untuk menangani itu code ini juga ada pada Visual Basic.6.0

Contoh Code :

Aplikasi StartUp VB.NET

Script/Code dibawah ini untuk membuka atau menjalankan Aplikasi yang sobat buat saat Windows pertama kali di nyalakan .
Asset ; CheckBox, nama tidah usah di ubah

Double Clik pada Form, Lalu masukan Script di bawah di atas Script '' Public Class Form1 "

imports System.IO, Microsoft.Win32

Masukan Script di bawah di bawah Script '' Public Class Form1 "

    Dim RegKey As RegistryKey
    'Start Up code

Menyimpan Pengaturan pada Aplikasi VB.NET

Kadang kita pernah melihat aplikasi yang menerapkan Judul di atas, Fungsi Save Setting/ menyimpan pengaturan bisa kita lihat pada GAME...
GAME akan menyimpan fungsi pengaturan yang kita buat, Seperti Nama Player, Bentuk Tokoh, Level dan masih banyak lagi.
Dan Kebanyakan Setingan di simpan pada File berExtensi *.ini, *.Dll, *.cfg, atau Format lain yang di buat si pembuat Aplikasi...

Dan Script di bawah ini juga bisa melakukan pekerjaan tersebut, Dan tanpa harus membuat File yang berExtensi...
Asset: 2 CheckBox, 2 TextBox, dan 1 Button , Nama tidak usah di rubah

Lalu masukan Script di bawah ini pada Button1 :

'Script Save Setting
SaveSetting("SET", "Main", "TB1", TextBox1.Text)
        SaveSetting("SET", "Main", "TB2", TextBox2.Text)
        SaveSetting("SET", "Main", "CB1", CheckBox1.CheckState)
        SaveSetting("SET", "Main", "CB2", CheckBox2.CheckState)

Mengetahui Informasi Komputer di VB.NET

Script di bawah, Berfungsi untuk mengetahui Informasi Perangkat komputer Sobat, Script di bawah masih bisa sobat kembangin lagi sesuai keinginan
Asset yang di butuhkan cuma 3 Label, dan Beri nama Label 1,2 dan 3

Lalu Copas Script di bawah ini pada Form Load



 Dim InfoKomputer As New Devices.ComputerInfo

        'Nama OS
        Label1.Text = "Nama OS   : " & InfoKomputer .OSFullName

        'Versi OS
        Label2.Text = "Versi OS  : " & InfoKomputer .OSVersion

        'Bahasa Yang Digunakan
        Label3.Text = "Bahasa OS : " & InfoKomputer .InstalledUICulture.DisplayName


Run aplikasi dan Akan tampil informasi komputer pada label yang sobat buat

Membuat Tombol dengan Script VB.NET

Biasanya kita saat ingin membuat Aplikasi membutuhkan tombol untuk di Isikan perintah, Kita tinggal mengambil Control Button pada ToolBox.
Bagaimana jika kita gunakan Script/Code untuk membuatnya..,Di bawah ini adalah Script untuk membuat Tombol


Asset : Tak perlu control apa-apa..,Karna kita yang akan membuat control.nya


Letakan Code 1 di bawah "Public Class Form1"


Code 1  :   Inherits System.Windows.Forms.Form  'susunan yang di ambil
            Dim TOMBOLKU As Button = New Button 'membuat tombol baru


Letakan Code 2 di Form Load

Membuat Jam dan Kalender Digital VB.NET

Kalau judul di atas sobat dah ngerti semua kan, kalau gitu langsung aja di Uji coba...
Asset : 4 label dengan Nama (lblJAM, lblMENIT, lblDETIK, dan lblKALENDER) + 1 timer dan ubah Enabled menjadi True

Double Click pada Timer, dan masukan Script di bawah ini :

 Dim Jam As Date
        Jam = DateTime.Now
        lblJAM.Text = Jam.Hour.ToString()
        lblMENIT.Text = Jam.Minute.ToString()
        lblDETIK.Text = Jam.Second.ToString()
        lblKALENDER.Text = Jam.Date.ToString()


Mudah kan...
Dan kalau mau gabungin JAM dan KALENDER dalam 1 Label.., Gampang
Asset : 1 Label dengan Nama lblTIMEDATE , 1 timer ubah Enabled menjadi True

Double Click timer dan masukan Script dibawah :

 Dim TD As Date
        TD = DateTime.Now
        lblTIMEDATE.Text = TD

Cuma dengan memotong dan merubah sedikit Script kan...Semoga Bermanfaat

Form OnTop & offTop

Script di bawah ini berfungsi untuk menampilkan Form paling depan, Biasanya pengaturan ini di terapkan pada aplikasi-aplikasi Desktop komputer.
Contoh saja TaskManager.,Jika TaskManager Sobat buka pasti task manager ada di posisi paling depan, Walaupun Sobat membuka Explorer tetap saja TaskManager ada di depan, Jika sobat pengen TaskManager di belakang atau posisi Normal, Tinggal Klik Options lalu Hilangkan Always On Top, TaskManager tidak akan bisa paling depan lagi.
Asset : 1 CheckBox, Nama todak usah di rubah

Double Click CheckBox dan masukan Script di bawah ini

Script :
       
'MENAMPILKAN FORM PALING DEPAN
If CheckBox1.Checked = True Then
            Me.TopMost = True
        Else
            Me.TopMost = False
        End If


Simple banget bukan...Karna itu saya buat Penjelasan agak panjang, Supaya agak banyak postinganya Gitu...he..he..he

Animasi Opacity pada form VB.net

'UNTUK FORM LOAD
Me.Opacity = 0
        For i As Integer = 0 To 100
            Me.Opacity = i / 100
            'Untuk Memperlambat(delay), agar fading kelihatan
            Threading.Thread.Sleep(30)
            'Untuk membantu efek semakin terlihat jelas
            Windows.Forms.Application.DoEvents()
        Next




'UNTUK FORM UNLOAD/CLOSED
For i As Integer = 0 To 100
            Me.Opacity = (100 - i) / 100
            'Untuk Memperlambat(delay), agar fading kelihatan
            Threading.Thread.Sleep(30)
            'Untuk membantu efek semakin terlihat jelas
            Windows.Forms.Application.DoEvents()
        Next

Memasukan Game di HP CHINA

Sekarang ini banyak sekali HP CHINA yang beredar luas di Indonesia, Dengan harga murah tentunya.
maka dari itu ,banyak orang yang tertarik untuk membeli HP buatan china.
Beberapa orang juga berpikir untuk tidak membeli hp buatan china, Mungkin karena kualitas, kamera ukuran rendah, & cepat rusak....Katanya sih ..he..he
Tapi kalau saya pikir, itu bukan masalah dari hp.nya..,Tergantung gimana cara pemilik hp memakainya.,
Yang jadi masalah saat ini, Kebanyakan hp cina tidak Suport sama game, walaupun ada tapi terkadang game.nya itu2 aja..seperti Puzlle, Tetris, Sudoku dll.
Tetapi karna hp cina sudah marak dan laris di pasaran indonesia, Sekarang fitur baru udah di tanamkan pada hp cina tersebut, Misal,
sudah suport Java, kamera dengan Resolusi tinggi, Layar sentuh dan masih banyak lagi yang lain.
Nah, dari semua hp yang terdapat Fitur tambahan tersebut, Banyak juga orang yang kesulitan bagaimana memasukan dan memainkan Game di Hp buatan China, Terkadang malah HP tersebut tidak ada Game sama sekali, Walaupun fitur Game.nya sudah ada.
Ada yang bilang ,dengan Membuat Folder Game, Mythroad, dsmgame dan masih banyak lagi...tapi setelah saya coba ,hasilnya Nihil dan tidak ada yang berhasil.
Bahkan Buku petunjuk dari hp saya sudah saya tiru caranya...tapi tetap Nothing.
Untuk masalah ini saya sudah dapat solusinya, Dan berhasil pada HP merk ,Cross G8t ,Nexian ,dan Hp China bajakan..

Supaya Aplikasi VB.NET tidak Berjalan 2x

Judul di atas juga pernah saya terangkan di postingan saya pada Visual Basic 6.0, kalau belum tau, Kesini Dulu biar agak Jelas....
Supaya Aplikasi yang kita buat pada VB.NET tidak bisa jalan atau di load 2 kali, ada 2 cara yang bisa dilakukan...

Pertama, dengan memakai Script/Code :

Bisa download source code di  MasPandji

Dan yang ke Dua, dengan atur properties :

Yang ini lebih mudah dan GPR alias gak pake repot, Dan di jamin 100% work...he..he

1. Buka Properties VB.NET pada Aplikasi yang akan kita buat
2. Pilih Tab Application
3. Pada tulisan Windows Application Framework Properties di bawah Tulisan terdapat pilihan CheckBox
5. Lalu Pilih/Centang CheckBox yang Bertuliskan 'Make Single Instance Application
6. Sekarang Build Aplikasi sobat, dan Coba jalankan aplikasinya .... Gimana hasilnya 

Oya 1 agy, ketinggalan, Aplikasi yang sudah di atur propertiesnya , tidak akan bisa runing 2x walau aplikasinya di Copy

Semoga Tulisan tentang VB.NET pertama saya bisa bermanfaat bagi yang membacanya...Terima kasih

RCS (Right Click Shortcut)

RCS (Right Click Shortcut) adalah sebuah aplikasi yang membuat Shortcut pada klik kanan , ScreenShot ada di bawah ;

 Pada Tab General Shortcut, di tampilkan beberapa Shortcut Umum yang siap pakai, Tinggal centang untuk menerapkan dan Hilangkan centang untuk Menghilangkan Shortcut.
Dan Pada Tab Make New Shortcut , di bagian itu sobat bisa buat shortcut sendiri, tinggal memasukan nama Shortcut yang ingin di buat dan Cari file shortcut yang ingin di buka nantinya (File harus berExtensi "EXE")

Dan Seperti di bawah ini tampilan yang sudah jadi, Tinggal Klik Kanan pada Desktop atau layar kosong di mana aja...

 Satu lagi, Aplikasi ini portable, Ukuranya paling hanya 800kb, Suport Windows Vista dan Seven...
Untuk Download RCS di SINI ....