引用:
作者: Living
Frame可以預設為visible=false
這樣一開始就不會有Frame出現
如果輸入的密碼相同
if text.text=password then
frame.visible=true
這樣密碼正確的話Frame就會出現
|
Dim pw As String
pw = 77996
If Text4.Text <> pw Then
Label15.Caption = "密碼錯誤!"
Else
Label15.Caption = "登入成功!感謝您使用本程式"
End If
說明一下 以上程式碼 當text4輸入77996按下Command檢測正確時Frame(有2個)內的"Check"變為可使用(程式剛啟動時為灰色不可動) 不知道上面的要不要改 以及 Frame 要輸入怎樣的程式碼