编译显示变量未定义，初学者求救

2011-03-10 08:18:47 243 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【个人记录】关于初学者刚开始可能遇到的一些Dev c++报错及其解决方案（随缘更新）个人是从2020年8月下旬才开始接触C语言的，看（白嫖）的是浙江大学翁老师的视频，以下是一些遇到的报错问题和解决方法   ·Error 1.分号 ·[Error] expected ';' before 'return' 这个问题主要是：老忘记打分号（不过问题不大，反正编译都不能过） PS：你的编译器只会告诉你，这一段前面缺一个分号，但是你其实要加在上一句话 int main() { printf("Hello world!\n")//你要加在这一行末尾 return 阅读详情



Private Sub cmdLogin_Click()

    Dim objRecordset As ADODB.Recordset

    Dim strSQL As String

    

    strSQL = "select UserName from Users where UserName='" & _

            Trim(txtUserName.Text) & ""

    Set objRecordset = ExecuteSQL(strSQL)

    If objRecordset.EOF = True Then

        MsgBox "用户名错误！", vbExclamation + vbOKOnly, "警告"

        txtUserName.SetFocus

        txtUserName.SelStart = 0

        txtUserName.SelLength = Len(txtUserName.Text)

        Exit Sub

    End If

    UserName = objRecordset.Fields(0)

    

    strSQL = "select UserName from Users where Password='" & _

            Trim(txtPassword.Text) & ""

    Set objRecordset = ExecuteSQL(strSQL)

    If objRecordset.EOF = True Or UserName <> objRecordset.Fields(0) Then

        MsgBox "密码错误！", vbExclamation + vbOKOnly, "警告"

        txtPassword.SetFocus

        txtPassword.SelStart = 0

        txtPassword.SelLength = Len(txtPassword.Text)

        Exit Sub

    End If

    

    mdiMain.Show

    Unload Me

End Sub