Private Sub Form_Load()
'连接数据库
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Users\a\Documents\数据库\家庭财务\JTCW.mdb;" & "Persist Security Info=False"
'打开记录集
Dim strSQL As String
strSQL = "SELECT 姓名 from 家庭成员 ORDER BY 姓名"
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open strSQL, conn, adOpenKeyset, adLockOptimistic
Set txtName.DataSource = rs
txtName.DataField = "姓名"
Set DataList1.RowSource = rs
DataList1.ListField = "姓名"
End Sub
运行时没有未找到方法和数据成员
VB ListBox控件没有RowSource和ListField属性
……RowSource和ListField属性要Datalist和DataCombo这样的ActiveX控件才有,并不是VB自带的LISTBOX控件对应的属性,必须在“部件”选项卡中选择"Microsoft Datalist Control 6.0(OLEDB)加载以后才可以使用。
vb怎么用ADODC和LISTBOX绑定?
你使用Adodc数据控件应与DataList控件绑定,连接好Adodc的数据源和数据表名后,绑定DataList,将其属性RowSource为Adodc1,属性ListField设置为数据表中的某字段.也可用代码连接数据库.Private Sub Form_Load()Set DataList1.RowSource = Adodc1 DataList1.ListField = "NAME"Adodc1.ConnectionString = "Provi...
关于VB的listbox文件绑定
Private Sub Form_Load()Set DataList1.RowSource = Adodc1 DataList1.ListField = "0"Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\\DateName.mdb;Persist Security Info=False"Adodc1.RecordSource = "select NAME from MAP"Adodc1.RecordSource =...
VB中combo1.list怎么连接到数据库,详细代码,谢谢
这个没有绑定列表的属性,要用dataCombo控件,它多两个属性listField,rowsource 控件全名是Microsoft DataList Controls 6.0 (OLEDB),里面有两个控件。Private Sub Command1_Click() Dim Rs As New Recordset Const cntString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\\User Document...
VB的COMBO的问题!急用啊
应该用DataCombo做,在"部件"里添加DataList Controls 假设数据库表为"表1",有省份和城市数据.添加两个DataCombo控件到窗体(DataCombo1,DataCombo2),用ADO连接数据库(CONN),定义两个RecordSet变量,Rs1,Rs2 Rs1.open "select Distinct * From 表1",CONN '这句可获得所有的省份名 set Datacombo1....
VB6中的DATACOMBO问题,怎么样才能读取一个值但返回另一个值?
Set.RowSource=rsPublisher .ListField=〃Name〃.BoundColumn=〃PubID〃Set.DataSource=rsTitles .DataField=〃PubID〃EndWith 从这个例子中,我们可以看到dbcPublisher所显示的内容来自于rsPublisher的Name字段,由RowSource属性和ListField属性指定;而用户使用中如果选定了某个出版商,则自动将对应的rs...
VisualBasic中DataCombo和DataList控件的使用
要实现这一点,可以将 DataSource 和 RowSource 属性设置为同一个数据控件,并且将 DataField 和 BoundColumn 属性设置为该数据控件的记录集中的同一个字段。在这种情形下,将使用 ListField 的值来填充该列表,且这些值来自于被更新的同一个记录集。如果指定了一个 ListField 属性,但没有设置 ...
vb6.0中怎么把查询到的内容显示到combo中
DataCombo1_Click (0)End Sub 设置combo的以前属性:1,BoundColumn属性一般设置成所查询表的主键,以便执行SQL语句 2,RowSource设置为ADODC1,其中ADODC1的connectstring属性为你所连接的数据源RecordSource设置为你连接的表的名字 3,ListField设置为combo中你所要显示内容所在列的列字段名 这样就能实现显示 ...
vb 编程问题 说标准表达式中数据类型不匹配
VB不怎么会,但我在ASP,ASP.NET中也经常遇到这问题,一般情况是,SQL语句中查询语句指定的值的类型和数据库中字段类型不一致了。。比如你数据库中uid字段的类型是int,但是你查询语句用uid='1',这样就会出现标准表达式中数据类型不匹配。。
VB怎么连接 SQL 数据库?
1、打开代码窗口,添加引用:Imports System.Data.SqlClient。2、输入以下代码:“Public conn1 As SqlConnection = New SqlConnection _("server=192.168.1.79; Initial Catalog= student; User ID= panqe;PWD=shentai768@")”,vb就已经成功连接sql数据库了。3、代码详解:声明关键字Public(...