For i = 0 To rs.RecordCount - 1
vntTemp = rs(i).value
Combo1.AddItem vntTemp
rs.MoveNext
Next
i = 0 时可以,但下一个循环中rs(i)就说记录中无此项目!
请问应该如何取得记录中的具体值呢?vntTemp = rs(i).value正确写发应是什么?
在线等!
vntTemp = rs(i).value
Combo1.AddItem vntTemp
rs.MoveNext
Next
i = 0 时可以,但下一个循环中rs(i)就说记录中无此项目!
请问应该如何取得记录中的具体值呢?vntTemp = rs(i).value正确写发应是什么?
在线等!
解决方案 »
- webbrowser保存一个网页中的超连接
- 请问高手:系统托盘图标问题!
- 怎样获取一个窗体中文本框(控件组)的最大索引值?
- VB需要区别大小写吗?
- 那位高人知道对字符串赋值时,如何区分字符串为NULL,为"",有内容不为""这三种情况?
- 3行代码也错??唉。。。
- 我做了个系统,用VB编的应用程序,后台数据库是SQL2000.请问各位高手在应用程序里怎么设置才能访问远程SQL2000.谢谢了
- ADSI中创建一个用户后如何指定“用户下次登录必须更改密码”?
- VB中感叹号“!”与圆点“.”的用法差异
- VB6.0调用dll,char* 类型该如何写
- 如何让控件从属关系解除?解决即结贴
- 再请教一个关于MSHFlexGrid控件的问题?
vntTemp = rs.value
Combo1.AddItem vntTemp
rs.MoveNext
Next
rs.value通不过!“没有此方法或数据成员!”
do while not rs.eof
Combo1.AddItem rs(0).value 'rs.fields(0).value
rs.Movenext
loop
还是没有此项目!
Data2.Refresh
Set rs = Data2.Recordset
另外,上面的代码是设置数据源的!
vntTemp = rs.fileds(i)
Combo1.AddItem vntTemp
rs.MoveNext
Next
do while not rs.bof and not rs.eof
vntTemp = rs.fileds(0).value '若只有一个字段的时候,vntTemp与字段里的类型要一直!
rs.movenext
loop
rs.RecordCount的值为4,已经用MSGBOX显示了!
谢谢!已经成功!