查看單個文章
舊 2009-05-21, 10:21 PM   #26 (permalink)
kppne0931
註冊會員
榮譽勳章
UID - 311122
在線等級: 級別:3 | 在線時長:30小時 | 升級還需:2小時級別:3 | 在線時長:30小時 | 升級還需:2小時級別:3 | 在線時長:30小時 | 升級還需:2小時
註冊日期: 2008-10-06
文章: 65
精華: 0
現金: 124 金幣
資產: 144 金幣
預設

引用:
作者: 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 要輸入怎樣的程式碼
kppne0931 目前離線  
送花文章: 77, 收花文章: 61 篇, 收花: 117 次
回覆時引用此帖
向 kppne0931 送花的會員:
Living (2009-05-21)
感謝您發表一篇好文章