Sunday, 22 October 2017

Contoh Penggunaan If pada Message Box

Contoh source code penggunaan if pada Message Box

 If MessageBox.Show(Label1.Text & Environment.NewLine & Label2.Text, 
                    "IF", MessageBoxButtons.OKCancel, MessageBoxIcon.Exclamation)=
 Windows.Forms.DialogResult.OK Then
     MessageBox.Show("You click" + chr(34) + "OK" + chr(34), "OKAY", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
 Else : MessageBox.Show("You click" + chr(34) + "Cancel" + chr(34), "Cancelled", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
 End If
- Code diatas digunakan pada sebuah button dan memerlukan dua buah label.
- Environtment.NewLine digunakan untuk membuat baris baru (line break) pada message box.

No comments:

Post a Comment

Odoo 11 - Create a new sample module

How To Create or Develop a Custom Module in Odoo 11 In this blog, we‘ll be focusing on how we can create or develop a custom mo...