Foxtable(狐表)用户栏目专家坐堂 → [求助]有关ComboBox控件问题


  共有2033人关注过本帖树形打印复制链接

主题:[求助]有关ComboBox控件问题

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/25 16:32:00 [显示全部帖子]

Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim str = cmb.SelectedValue

msgbox(str)

Dim dr As DataRow = DataTables("表A").Find("第一列 = '" & str & "'")
If dr IsNot Nothing Then
    e.Form.Controls("TextBox1").Value= dr("部门")
    e.Form.Controls("TextBox2").Value= dr("姓名")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/25 17:06:00 [显示全部帖子]

以下是引用swimmer01在2018/7/25 16:45:00的发言:
我是通过SQL从后台数据库提取的数据,没得"表A"

 

那你就需要执行sqlcommand后台查找值

 

http://www.foxtable.com/webhelp/scr/0696.htm

 


 回到顶部