Formulir Kontak

 

Msgbox dan Inputbox

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

Total comment

Author

Rio Fazri

0   komentar

Cancel Reply