combo的绑定问题。 用combo通过adodc绑定一个字段,有yes和no两种可能。查询时combo不能编辑只能选择yes或no,可以通过update更新到数据库,该怎么做?用style=2 就提示无法绑定。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 没有必要绑定 用 不更好吗? SQL = "select DISTINCT desPort as tt from expcontract where id='" & Zb & "'" r.Open SQL, cN Do While Not r.EOF Me.cmbDesPort.AddItem Trim(r!tt & " ") r.MoveNext Loop r.Close 我也碰到这个问题style是0就没有问题 选了style=2 ,改变选择用什么事件啊,选change没反应啊。 不是jinesc那段代码的意思啊。比如有 text1 和combo1两个控件。combo不可编辑,有两个item:yes和no。表ab中有a,b两列,其中一行为xxx,yes。现在记录集指向这一行,text1里显示xxx,combo1里显示yes。我在combo1里选择no,对记录集update。现在ab表里更新为xxx,no。 就这么简单,如何设置和编程啊。 做个函数进行转换private function ConvertYesNO(byval lngStyle as long) as string if lngStyle=1 then ConvertYesNO="NO" else ConvertYesNO="YES" endifend function 文本比较器的具体实现方法 求助SSTab控件的使用方法 学VB的调查! 又有几个小问题请教!是关于listview,circle(line),form load………… 怎样在picturebox里输入文字,急。。。。 如何在VB中用xml显示数据库里的数据????????能否给个例子????? 请问&h0是什么概念 如果在一个工程中一次性加入很多.cls文件啊 请问一个用VB开发的录音程序如何直接保存为MP3格式啊? 如何对一幅二值化后的图像取得它的直方图?主要算法是什么? (毕业设计) 串口打不开? 如何屏蔽标题栏?
SQL = "select DISTINCT desPort as tt from expcontract where id='" & Zb & "'"
r.Open SQL, cN
Do While Not r.EOF
Me.cmbDesPort.AddItem Trim(r!tt & " ")
r.MoveNext
Loop
r.Close
style是0就没有问题
比如有 text1 和combo1两个控件。combo不可编辑,有两个item:yes和no。表ab中有a,b两列,其中一行为xxx,yes。
现在记录集指向这一行,text1里显示xxx,combo1里显示yes。
我在combo1里选择no,对记录集update。现在ab表里更新为xxx,no。
就这么简单,如何设置和编程啊。
if lngStyle=1 then
ConvertYesNO="NO"
else
ConvertYesNO="YES"
endif
end function