Cara Membuat Pesan Msgbox Pada VB .net

Dalam menampilkan pesan pada program visual studio kamu ada 2 cara yaitu

• Menggunakan MsgBox
• Menggunakan MessageBox.Show

Untuk perbedaan diatas mudah menggunakan yang mana bisa mampir ke artikel sebelumnya yang pernah saya buat : Perbedaan Msgbox dengan MessageBox.show Pada VB .net

Namun pada pembahasan ini saya akan menggunakan MsgBox () 

Secara sederhana penulisanya seperti ini MsgBox("Ini isi text dalam pesan")  . Maka akan tampil seperti gambar dibawah ini dan ayo kita pahami struktur MsgBox Form dibawah ini : 

Warna Kuning :  Merupakan judul dari sebuah MsgBox (). karena dalam codingan diatas tidak saya tentukan judulnya maka secara default judul diambil dari nama project yang kita buat

Warna Biru : Merupakan isi dalam sebuah form pesan MsgBox ()

Warna Hijau : Merupakan tempat button. Nanti ada Buton OK dan Cancel, ada lagi button Yes, No, dan  Cancel  dan ada lagi yes dan no. Nanti akan kita bahas di artikel ini 

Cara membuat MsgBox () dengan judul dan icon : 

MsgBox("Ini isi text dalam pesan", vbInformation, "judulnya")

Untuk merubah iconya tinggal kalian rubah saja yang saya beri warna text merah dibawah ini sesuai dengan keinginan kamu .

MsgBox("Ini isi text dalam pesan", vbInformation, "judulnya")

Text warna merah diganti dengan :

• vbQuestion untuk icon tanda tanya
• vbInformation untuk icon informasi
• vbCritical untuk icon error

Cara membuat MsgBox () dengan button  Yes No :

       Dim nilaiMsg As String

        nilaiMsg = MsgBox("Lanjutkan?", MsgBoxStyle.YesNo, "Pesan")

        ' jika kamu tekan ye maka :

        If nilaiMsg = DialogResult.Yes Then

            ' disini kamu isi perintah apa ketika kamu menekan yes

            ' misalnya saya menampilkan pesan yes

            MsgBox(" Yes")

        'jika kamu teka no maka :

        ElseIf nilaiMsg = DialogResult.No Then

            ' disini kamu isi perintah apa ketika kamu menekan yes

            ' misalnya saya menampilkan pesan no

            MsgBox("Anda menekan tombol No")

        End If 

Note: Dim nilaiMsg As String .ini hanya sebagai variable string, dimana nama dari huruf tebal bisa kalian rubah sesuka hati, codingan bawahnya juga harus dirubah sesuai nama variable yang kamu buat.

Maka Akan Tampil Form pesan seperti berikut ini :

Cara membuat MsgBox () dengan button  Retry :

 Dim nilaiMsg As String

        nilaiMsg = MsgBox("Lanjutkan?", MsgBoxStyle.RetryCancel, "Pesan")

        ' jika kamu tekan ye maka :

        If nilaiMsg = DialogResult.Retry Then

            ' disini kamu isi perintah apa ketika kamu menekan yes

            ' misalnya saya menampilkan pesan yes

            MsgBox(" Tombol ulang")

            'jika kamu teka no maka :

        ElseIf nilaiMsg = DialogResult.Cancel Then

            ' disini kamu isi perintah apa ketika kamu menekan yes

            ' misalnya saya menampilkan pesan no

            MsgBox("Anda menekan tombol Cancel")

        End If

TERIMA KASIH 

Selamat Mecoba, Semoga membatu, Sehat selalu, Sampai bertemu diartikel lainya