24h購物| | PChome| 登入
2007-04-18 09:27:57| 人氣115| 回應0 | 上一篇 | 下一篇

程式 提供下載

推薦 0 收藏 0 轉貼0 訂閱站台

Private Sub Command1_Click()
Dim pwd As String
pwd = InputBox(”請輸入密碼:”, ”密碼程式(if-then)”)
If pwd = ”5566” Then
MsgBox ”密碼正確”, vbOKOnly + vbInformation, ”密碼正確!你即將進入本系統.”

End If


End Sub

我要檢舉
#程式
台長： ㄉ一ㄜˊ先生
人氣(115) | 回應(0)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 數位資訊(科技、網路、通訊、家電) | 個人分類: 〃耍白痴用ㄉ |
此分類下一篇:程式p88

我要回應
否 是 (若未登入"個人新聞台帳號"則看不到回覆唷!)
* 請輸入識別碼：
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP
詳全文