怎么把数据库连接到VB中

来源：百度知道编辑：UC知道时间：2024/09/22 03:28:58

Private Sub Form_initialize()
DatPersonInfo.Recordset.MoveFirst
Do While DatPersonInfo.Recordset.EOF = False
cmbName.AddItem DatPersonInfo.Recordset("姓名")
DatPersonInfo.Recordset.MoveNext
Loop
DatPersonInfo.Recordset.MoveFirst
cmbName.Text = DatPersonInfo.Recordset("姓名")
Call grid_refresh
End Sub
Private Sub cmbName_click()
Dim strName As String
Dim mybookmark As Variant
mybookmark = DatPersonInfo.Recordset.Bookmark
strName = cmbName.Text
DatPersonInfo.Recordset.MoveFirst
DatPersonInfo.Recordset.Index = "姓名"
DatPersonInfo.Recordset.Seek "=", strName
If DatPersonInfo.Recordset.NoMatch = False Then
Call grid_refresh
If DatPersonInfo.Recordset("性别") Then
optFemale = True
Else
optMale = True
End If
Else

你可以用data控件易懂
要把数据库转换成97的才能使工具、转换、97格式
添加完data后在data属性里找databasename选择路径
再在属性里找到recordsource找到表名
再在某个控件上找datasource选择你的data名
再点datafiled选择哪个
后面不用说了吧

用data控件

VB里怎么把工程和数据库连接? 请教:vb中数据库连接问题 vb中数据库连接的问题在VB中怎么把文字保存到数据库中？ VB中如何定义SQL数据库连接 vb 数据库连接 VB中怎么把内容保存到文本文档？ vb adodc 怎么用代码实现数据库连接 VB怎么和数据库连接，求详细讲解！请教VB前辈关于VB 中ADO数据库连接的问题