Posted by : fachru Sunday, February 2, 2014

Contoh Sedikit Rumus Visual Basic



Logika
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*

Leave a Reply

Subscribe to Posts | Subscribe to Comments

- Copyright © 84601's Knowledge - Date A Live - Powered by Blogger - Designed by Fachru Crew -