Minggu, 14 Agustus 2011
Belajar Fungsi VB6
Private Sub OK_Click()
Dim userMsg As
String userMsg = InputBox(“What is your message?”, “Message Entry
Form”, “Enter your messge here”, 500, 700) If
userMsg <> “” Then
message.Caption = userMsg Else
message.Caption = “No Message” End IfEnd Sub
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar