-1

我正在尝试制作一个接受 1 次登录的代码,然后将其移至 Form2,但它不会让我!它说存在构建错误:

    Public Class Form1


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If TextBox1.Text = "User" And TextBox2.Text = "Qf17yu" And TextBox3.Text = "QW56-7456-8UIP" Then MsgBox("Correct login, welcome.", 0 + 64 + "Welcome")
    Else
    MsgBox("Username, password or Secret Key incorrect!", 0 + 64, "Try again")
    End If
End Sub

结束类

4

3 回答 3

3

VB 允许您使用两种不同类型的If语句,单行版本和多行版本,但不允许您混合使用它们。

请参阅:http: //msdn.microsoft.com/en-us/library/752y8abs.aspx

你可以做:

If condition Then dostuff Else dootherstuff End If

或者你可以这样做:

If condition Then
  Dostuff
Else
  Dootherstuff
End If

但是你不能以你试图做的方式混合它们。

于 2013-09-22T13:01:34.617 回答
1

你和你MsgBox的在同一行If。后面加一行Then

于 2013-09-22T12:59:41.210 回答
0

尝试这个:-

If TextBox1.Text = "User" And TextBox2.Text = "Qf17yu" And TextBox3.Text = "QW56-7456-8UIP" Then 
MsgBox("Correct login, welcome.", 0 + 64 + "Welcome")
Else
MsgBox("Username, password or Secret Key incorrect!", 0 + 64, "Try again")
End If
于 2013-09-22T13:02:31.780 回答