疑問 - 各位大大好～我又有疑問要問了...VB6.0(還是Command的問題..和之前不一樣)

[mini]

作者: kppne0931

但是我用了 TEXT1檢測SPW是OK 但是TEXT2就像是無效一樣...

也可改成
A例)

     If Form1.Text1 = sPW And Form1.Text2 = sID Then
            Label1.Caption = "連線成功"
     Else
            Label1.Caption = "連線失敗(帳號或密碼有誤)"
     End If

B例)
不過照理說

     If Form1.Text1 <> sPW Or Form1.Text2 <> sID Then
            Label1.Caption = "連線失敗(帳號或密碼有誤)"
     Else
            Label1.Caption = "連線成功"
     End If

B例 與上面 A例 是同樣的邏輯答案

[kppne0931]

作者: mini

也可改成
A例)

     If Form1.Text1 = sPW And Form1.Text2 = sID Then
            Label1.Caption = "連線成功"
     Else
            Label1.Caption = "連線失敗(帳號或密碼有誤)"
     End If

B例)
不過照理說

     If Form1.Text1 <> sPW Or Form1.Text2 <> sID Then
            Label1.Caption = "連線失敗(帳號或密碼有誤)"
     Else
            Label1.Caption = "連線成功"
     End If

B例 與上面 A例 是同樣的邏輯答案

這是Form2的程式碼

PHP 語法:

Private Sub Command1_Click()

    Unload Form2
    With Form1
        .Text4.Enabled = True
        .Command1.Enabled = True
        
        .Text4.SetFocus
        .Text4.SelStart = 0
        .Text4.SelLength = Len(.Text1.Text)
    End With
    

End Sub

Private Sub Form_Load()

    Label1.Caption = "連線中"
    Timer1.Enabled = True
    Timer1.Interval = 500
    Command1.Visible = False
    
End Sub

Private Sub Timer1_Timer()
Static i As Integer
    
    If i > 5 Then
        Timer1.Enabled = False
        
If Form1.Text4 = sPW And Form1.Text5 = sID Then
            Label1.Caption = "連線失敗(帳號或密碼有誤)"
        Else
            Label1.Caption = "連線成功"
          Form1.Frame1.Enabled = True
Form1.Frame2.Enabled = True
Form1.Check1.Enabled = True
Form1.Check2.Enabled = True
Form1.Check3.Enabled = True
Form1.Check4.Enabled = True
Form1.Check5.Enabled = True
Form1.Check6.Enabled = True
Form1.Check7.Enabled = True
Form1.Check8.Enabled = True
Form1.Check9.Enabled = True
Form1.Check10.Enabled = True
Form1.Check11.Enabled = True
Form1.Text1.Enabled = True
Form1.Text2.Enabled = True
Form1.Command1.Enabled = True
Form1.Command2.Enabled = True
Form2.Command1.Visible = True
        End If
        
        i = 0
        Exit Sub
    End If
    
    i = i + 1
    If i = 1 Or i = 4 Then
        Label1.Caption = "連線中。"
    Else
        Label1.Caption = Label1.Caption & "。"
    End If
    
End Sub 


以下是Form1的程式碼

PHP 語法:

Private Sub Command3_Click()


    Text4.Enabled = False
    Command3.Enabled = False
    Form2.Show
    Form2.Move Form1.Left, Form1.Top - Form2.Height

End Sub

Private Sub Form_Activate()
    sPW = "kenc77996"
    sID = "ken33664"
End Sub 


以上程式碼是以text4 和text5 下去編寫

發現 text4 和text5 隨便打 都會顯示連線成功...幫檢查一下卸卸...

[kppne0931]

各位大大幫助我一下....

[mini]

If Form1.Text4 = sPW And Form1.Text5 = sID Then 
    Label1.Caption = "連線失敗(帳號或密碼有誤)"

搞錯了吧...

請再仔細看一下你就能發現

[kppne0931]

作者: mini

If Form1.Text4 = sPW And Form1.Text5 = sID Then 
    Label1.Caption = "連線失敗(帳號或密碼有誤)"

搞錯了吧...

請再仔細看一下你就能發現

我已經發現我打相反了....但是現在 只能檢測Text4會正常 text5似乎無法檢測...

[kppne0931]

大大幫忙一下......

[cwvdavid]

你所謂的【但是現在 只能檢測Text4會正常 text5似乎無法檢測...】是指什麼?

說一下你輸入帳號密碼的情況吧...
Text4輸入kenc77996, Text5輸入123．．結果是什麼？
Text4輸入ken33664, Text5輸入123．．結果是什麼？
Text4輸入234, Text5輸入kenc77996．．結果是什麼？
Text4輸入234, Text5輸入ken33664．．結果是什麼？