读书人

初学者vb读写数据库有关问题

发布时间: 2012-11-05 09:35:12 作者: rapoo

菜鸟求助vb读写数据库问题
已知数据库名为A,含表格B vb程序定义变量为c,如果要读取数据库中某一格的数据,并记录在c里面,print出来,该怎么做?

[解决办法]

VB code
    '模块    Public Con As ADODB.Connection    Public Rcset As ADODB.Recordset    Public Sqlstr As String      Public ConStr As String    Sub Main()    Set Con = New ADODB.Connection    ConStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\A.mdb" & ";Persist Security Info=False"    Con.Open ConStr   Form1.ShowEnd Sub'窗体Set Rcset = New ADODB.RecordsetSqlstr = "select * from B" Rcset.Open Sqlstr, Con, adOpenStatic, adLockPessimisticIf Rcset.RecordCount > 0 Then    c=Rcset(下标)End IfRcset.Close 

读书人网 >VB

热点推荐