Re: [VB6 ] 密碼問題

[cawQQ (無痕的旋律)]

我手邊沒有灌VB6(目前沒在用..)
所以我用VB.NET裡面我的寫法給你看..
希望對你有幫助~其實想法差不多.
語法改一下就好了..


            Dim LOGIN_TRIAL As Integer

Try
                myConn.Open()
            Catch ex As Exception
                LOGIN_TRIAL = LOGIN_TRIAL + 1
            Finally
                If (myConn.State = ConnectionState.Open) Then
                    LOGIN_TRIAL = 0
                    Me.Text = "OK"
                    Got_ID(LOGIN_ACCOUNT)
                    Me.Close()
                Else
                    MsgBox("帳號密碼錯誤，在試一次", MsgBoxStyle.Critical)
                    If (LOGIN_TRIAL >= 3) Then
                        Me.Text = "ERR"
                        Me.Close()
                    End If
                End If
            End Try

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 61.64.117.158