Berikut sedikit tulisan yang mungkin bisa berguna :
1. Desain Form :
- 2 Button
2. Source Code Program :
' Gambas class file
Public Sub _new()
End
Public Sub Form_Open()
End
Public Sub Button1_Click()
Select Case
Message.Question("Yakin Keluar?", "Ya", "Tidak")
Case 1
Me.Close
End Select
End
Public Sub Button2_Click()
Message.Question("Hai, ini adalah message question", "OK")
End
Hasil nya seperti berikut :
Source bisa di download disini
Semoga Membantu
EmoticonEmoticon