- Back to Home »
- Contoh rumus visual basic
Posted by : fachru
Sunday, February 2, 2014
If TextBox1.text>=”70″ Then
TextBox2.text=”LULUS”
ElseIf TextBox1.text<"70" Then
TextBox2.text="TIDAK LULUS"
Else
TextBox2.text="Nilai Tidak Valid"
End If
Rumus Konfirmasi tutup aplikasi
Dim keluar As MsgBoxResult
keluar=MsgBox (“Apakah anda yakin mau keluar dari aplikasi ini ?”, MsgBoxStyle.YesNo, “Tutup Aplikasi”)
If keluar=MsgBoxResult.Yes Then
Close ()
End If
*sekian dari saya ini hanya percobaan dari saya*
