以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  有关 组合框与表同步的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61491)
--  作者：jswjyjf
--  发布时间：2014/12/13 13:27:00
--  有关 组合框与表同步的问题

帮助有这个 案例

SelectedIndexChanged

选择不同列表项目后执行。

e参数属性:

Form:     返回触发事件的窗口
Sender：  返回触发事件的控件

示例

某组合框绑定到客户表，希望从该组合框选择一个客户后，能够将该客户的电话和姓名填入另两个文本框中。
为实现此目的，可将该组合框的SelectedIndexChanged事件代码设为：

Dim cm AsWinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim dr As DataRow = cm.SelectedItem
If dr IsNot Nothing Then
    e.Form.Controls("txtName").Value = dr("姓名")
    e.Form.Controls("txtTel").Value = dr("电话")
End If

 

 

 

我用了下出错的
--  作者：新福星
--  发布时间：2014/12/13 13:43:00
--  
Dim dr As DataRow = cm.SelectedItem 这句应该错了 
Dim dr As DataRow = Datatables（"XXX").Sqlfind("姓名=\'" & cm.SelectedItem & "\'")
--  作者：jswjyjf
--  发布时间：2014/12/13 16:47:00
--  

 2楼的方法也是可以的，但违背了帮助的本来意思 ，1楼的对的，只不过 要在表属性设置 不能设置combobox