窗体上有一控件,用来显示从数据库中提取的数据, 显示的数据是预设的几种,不希望用户自行输入,就将其STYLE设为2,但运行后每一次COMBO显示的数据与上一次显示的数据不同时就会出错:TEXT是只读属性.代码如下:
czinfo_rs1.Open "select * from cz_info where czxm='" & Trim$(Combo2.Text) & "'", co, , , adCmdText
Combo3.Text = czinfo_rs1!cx
我知道是因为COMBO3的TEXT是只读,但我该怎样才能达到目的?谢谢.
czinfo_rs1.Open "select * from cz_info where czxm='" & Trim$(Combo2.Text) & "'", co, , , adCmdText
Combo3.Text = czinfo_rs1!cx
我知道是因为COMBO3的TEXT是只读,但我该怎样才能达到目的?谢谢.
解决方案 »
- 继续请教数据库布尔类型更新问题?
- online祝陈锐TechnoFantasy生日快乐
- 把文件输出到打印机100分
- 关于事件处理
- 我的VB的引用菜单不能用了,出现访问系统注册表错误
- 雷锋贴:再论Word的合并问题!
- 我的vb程序访问access数据库是出现vb错误"找不到可插入的isam",原因何在?
- dll文件中资源的调用,急!!
- 这本书叫《旗标系列丛书 Visual Basic6.0数据库程序设计》 王国荣著 ?
- 我在做写字板的“编辑”菜单,难啊,一大堆问题,谁能帮我一把,万分感谢!
- 怎么样把VB程序放在后台运行,在任务栏上显示一个图标?
- ActiveReport2.0这个软件要注册吗? 怎样注册. 在客户端安装时要些什么文件啊 谢谢
那么 combo3.listindex=0显示第n条数据,combo3.listindex=n-1不显示,combo3.listindex=-1
因为数据只有一项,用textbox 或label就可以了
例如要显示的是 string1 ,则for i=0 to combo1.listcount-1
if combo1.list(i)=string1 then
combo1.listindex=i
exit for
end ifnext i
楼主的问题是将 combo的STYLE设为2to:nieer(笨鸟)
不要只是谢谢,给分啦