请教VB如何进行mysql数据库录入 *** 作？

首先连接数据库，上网上找一下，有很多的例子，但是记得sql sever要配置，这个是很重要的，然后是按钮的程序，用connection去执行那个SQL语句，就是那个insert 语句，插入语句，如果你想判断是否重复的话，可以用recordset去执行insert语句，根据返回的recordcount去判断或者判断那个EOF还是BOF我忘了，其实这个代码还行，工作量还可以

If rs("userid") <> Text2 Then这个条件错了啊
text2你这应该是密码框吧，怎么使用rs("userid")来相等呢！同时，你上面使用的是
SQL = "select from uc_members where username='" & Text1Text & "' and password='" & Text2Text & "'"
如果用户名和密码都存在一条记录中，那么这个用户就代表存在了，所以你可以使用下面的条件
if rseof then意思就是说如果找不到符合用户名和密码的用户则认为密码错误，反之则登录成功！

首先你要在工程部件里引用一个ADO Data Control 20控件，拖到窗体上
Private Sub Command1_Click()
Adodc1ConnectionString = "Driver={SQL Server};Server=MYSQL;DataBase=account2"
Adodc1RecordSource = "SELECT FROM account"
Adodc1Refresh
Adodc1RecordsetAddNew
'---------------------------添加新记录
Adodc1RecordsetFields("name") = MeText1
Adodc1RecordsetFields("password") = MeText2
Adodc1RecordsetUpdate
'-------------------------恢复初始设置
MeText1 = ""
Metext2 = ""
metext1SETFOCUS
End Sub
可以了

---