Assalamualaikum wr wb.
MsgBox dan InputBox
Sebelumnya mari kita bahas satu per satu fungsi dari tool tool pada form tersebut
1. Button MsgBox = Berfungsi untuk menampilkan pesan pop up seperti, memberi peringatan atau informasi.
Scriptnya : MsgBox "Hello Guys", vbInformation, "Informasi"
Outputnya :
2. Button InputBox = Sama seperti MsgBox, inputbox juga pesan pop up bedanya inputbox seperti gabungan antara textbox dan msgbox, jadi kita bisa menginput variable pada inputbox
Scriptnya : a = InputBox("Masukkan Nama Anda ??")
Outputnya :
3. Button InputBox + MsgBox = adalah tombol yang menghasilkan 2 pesan pop up secara bergantian diawali oleh inputbox lalu kita input variablenya, lalu keluar pop up kedua yaitu msgbox yang menampilkan pesan yang kita input tadi di inputbox
Scriptnya : a = InputBox("Masukkan Nama Anda ??")
MsgBox "Hello " & a, vbInformation, "Informasi"
Outputnya :
4. Button InputBox + Label = adalah tombol untuk menghasilkan 1 pesan pop up yaitu inputbox dan menghasilkan 1 label yang tertulis nantinya pada form tersebut.
Scriptnya : a = InputBox("Masukkan Nama Anda ??")
Label1.Caption = "Hello " & a
Outputnya :
5. Button InputBox+MsgBox+Label = gabungan dari ketiga tool tool yang akan menghasilkan 2 pesan pop up dan 1 label tertulis nantinya.
Scriptnya : a = InputBox("Masukkan Nama Anda ??")
MsgBox "Hello " & a, vbInformation, "Informasi"
Label1.Caption = "Hello " & a
Outputnya :
Sebagai Tambahan Saya menambahkan Tombol Hapus Label dan Tombol Exit
Button Hapus Tabel = Berfungsi untuk menghapus label yang sudah bertuliskan di form tersebut
Scriptnya : Label1.Caption = ""
Button Exit = Untuk mengeluarkan / Memberhentikan Program (form) yang berjalan.
Scriptnya : Unload Me