[ VISUAL BASIC.NET ] Membuat RadioButton untuk Menjalankan Program Aplikasi

Kali ini saya membahas mengenai pembuatan aplikasi sederhana guna untuk menjalankan program aplikasi/program aplikasi windows. Dulunya itu pingin banget untuk membuat sejenis dari aplikasi tersebut , maksudnya agar mudah untuk menjalankan aplikasi dengan cara satu kali CLICK, .  Disini agan bisa mengetahuinya dalam proses menjalankan aplikasi dalam komputer agan. Program sederhananya hanya memanfaatkan RadioButton dan tombol untuk memasukkan code perintah yaitu Button,

Mengenal dan mengetahui apa  bedanya RadioButton dengan CheckBoxbukannya sama sama saja untuk memilih dari beberapa pilihan, jawabnya ya memang itu benar, tapi disini bedanya  kalau checkbox model pilihannya adalah dengan memberi tanda centang, dan dari beberapa pilihan yang ada dapat dipilih lebih dari satu, sedangkan radio button pilihannya berupa bulatan (lingkaran), dan biasanya kita hanya dapat memilih salah satu pilihan dari beberapa pilihan yang tersedia Syaratnya hanya boleh memilih satu pilihan saja.

kode program kalkulator visual basic windows

kode program visual basic kalkulator

Membuat desain antarmuka  / bebas terserah agan

program kalkulator vb net

Komponen yang dibutuhkan

Label : Digunakan  untuk memberikan judul title

Button :  Digunakan  untuk menyisipkan code program

RadioButton : Digunakan untuk memilih satu pilihan dari beberapa pilihan yang ada

GroupBox : Digunakan untuk mengelompokkan/untuk menempatkan kontrol-kontrol yang berhubungan ke dalam suatu form pada saat proses perancangan aplikasi program. Misalnya pengelompokan beberapa kontrol radiobutton atau checkbox.

Untuk code program bisa dilihat dibawah ini

Kunjungi juga contoh aplikasi laporan CRUD disini

——————————————————————————————————–

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If RadioButton1.Checked = True Then

MessageBox.Show(“Kamu Memilih calculator!”)

Dim Retval

Retval = Shell(“C:\WINDOWS\system32\calc.exe”)

End If

If RadioButton2.Checked = True Then

MessageBox.Show(“Kamu Memilih Notepad!”)

Dim Retval

Retval = Shell(“C:\WINDOWS\system32\notepad.exe”)

End If

If RadioButton3.Checked = True Then

Process.Start(“G:/videoplayback.FLV”)

End If

End Sub

End Class

Keterangan

If RadioButton1.Checked = True Then  // jika radiobutton 1 terpilih Checked, maka muncullah  pesan pada MessageBox,

MessageBox.Show(“Kamu Memilih calculator!”)

kemudian akan memaggil aplikasi windows  proses executionnya dari   Shell(“C:\WINDOWS\system32\calc.exe”)

Dim Retval   //variabel

Retval = Shell(“C:\WINDOWS\system32\calc.exe”)