24h購物| | PChome| 登入
2008-03-30 15:42:12| 人氣123| 回應0 | 上一篇 | 下一篇

登入系統

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

第一個比較短的程式是打在"結束"的那個按鈕裡面
第二個比較長的程式是打在"開始"的那個按鈕裡面
TextBox1 = 帳號後面的
TextBox2 = 密碼後面的


----------------------------------------------------------


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub

--------------------------------------------------------------------

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim APEN As Integer

If TextBox1.Text = "APEN" Then
If TextBox2.Text = 1234 Then
MsgBox("APEN!歡迎你", MsgBoxStyle.Information)
Else
MsgBox("對不起!密碼錯誤!", MsgBoxStyle.Critical)
End If
Else
MsgBox("對不起!帳號錯誤!", MsgBoxStyle.Critical)
End If

End Sub

台長: ,,飛ㄦ*
人氣(123) | 回應(0)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 不分類 | 個人分類: 程式設計篇 |
此分類下一篇:計算成績
此分類上一篇:販賣機

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