以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  登入窗口输入姓名角色自动带入  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=184236)
--  作者：wlj88868
--  发布时间：2022/11/29 12:24:00
--  登入窗口输入姓名角色自动带入

这句代码要绑定数据表才有用的，，，需要怎么改一下，谢谢老师

Dim cm As WinForm.ComboBox = e.Form.Controls("UserName")
\'Dim dr As DataRow = cm.SelectedItem
\'If dr IsNot Nothing Then
 \'   e.Form.Controls("用户角色").Value = dr("用户角色") 
\'End If


图片点击可在新窗口打开查看此主题相关图片如下：1669695598931.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2022/11/29 13:32:00
--  
Dim dr As DataRow = datatables("用户表").find("姓名=\'" & cm.value & "\'")