我的界面上有两个combobox,分别是cboDept和cboUser当窗体加载时我用以下方法将部门信息的数据加载到cboDept中
cboDept.DataSource = ds.Tables(0)
cboDept.ValueMember = "DeptNo"
cboDept.DisplayMember = "DeptName"我想要cboDept的内容改变后,根据改变后的信息获取该部门操作员的数据并加载到cboUser中,在cboDept的SelectedIndexChanged事件中有以下代码:
Dim dt As New DataTable
Dim strSQL As String Try
strSQL = "Select U_Code,U_Name From Sys_User Where U_Dept ='" & cboDept.SelectedValue & "'" dt = GetTable(strSQL) cboUser.DataSource = dt
cboUser.ValueMember = "U_Code"
cboUser.DisplayMember = "U_Name" Catch ex As Exception
MsgBox(Err.Description)
End Try问题:
现在在窗体加载时往cboDept中添加数据时就会报错了"没有为 字符串“Select U_Code,U_Name From Sys_Us” 和 类型“DataRowView” 定义运算符“&”。"
请高手指点一下,谢谢!
cboDept.DataSource = ds.Tables(0)
cboDept.ValueMember = "DeptNo"
cboDept.DisplayMember = "DeptName"我想要cboDept的内容改变后,根据改变后的信息获取该部门操作员的数据并加载到cboUser中,在cboDept的SelectedIndexChanged事件中有以下代码:
Dim dt As New DataTable
Dim strSQL As String Try
strSQL = "Select U_Code,U_Name From Sys_User Where U_Dept ='" & cboDept.SelectedValue & "'" dt = GetTable(strSQL) cboUser.DataSource = dt
cboUser.ValueMember = "U_Code"
cboUser.DisplayMember = "U_Name" Catch ex As Exception
MsgBox(Err.Description)
End Try问题:
现在在窗体加载时往cboDept中添加数据时就会报错了"没有为 字符串“Select U_Code,U_Name From Sys_Us” 和 类型“DataRowView” 定义运算符“&”。"
请高手指点一下,谢谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货