GPT答：

7i24.cn

以下是一个简单的VB.NET程序，用于从ACCESS数据库中验证用户登录信息：

1. 首先，在Visual Studio中创建一个新的Windows Forms应用程序。

2. 在“解决方案资源管理器”中，右键单击项目名称并选择“添加”>“现有项”，然后选择要使用的ACCESS数据库文件。

3. 在窗体上添加两个文本框和一个按钮。第一个文本框用于输入用户名，第二个文本框用于输入密码。按钮将在点击时执行验证操作。

4. 双击按钮以打开代码编辑器，并编写以下代码：

Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
    Dim connString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Username\Documents\Database.accdb"
    Dim conn As New OleDbConnection(connString)
    Dim cmdText As String = "SELECT COUNT(*) FROM Users WHERE Username=@username AND Password=@password"
    Dim cmd As New OleDbCommand(cmdText, conn)
    
    cmd.Parameters.AddWithValue("@username", txtUsername.Text)
    cmd.Parameters.AddWithValue("@password", txtPassword.Text)
    
    Try
        conn.Open()
        If Convert.ToInt32(cmd.ExecuteScalar()) > 0 Then
            MessageBox.Show("登录成功！")
        Else
            MessageBox.Show("用户名或密码不正确，请重试。")
        End If
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    Finally
        conn.Close()
    End Try
    
End Sub

5. 这段代码首先定义了连接字符串，指向我们之前添加到项目中的ACCESS数据库文件。然后它创建了一个OleDbConnection对象和OleDbCommand对象，并使用参数化查询语句来检查是否存在具有给定用户名和密码的用户记录。

6. 最后，在try-catch-finally块内部打开连接、执行查询并关闭连接。如果查询返回大于零的结果，则显示成功消息；否则显示错误消息。

7. 现在可以运行应用程序并测试它是否正常工作了！