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


Tidak ada komentar:

Poskan Komentar

Related Posts Plugin for WordPress, Blogger...