2楼这个好，再顺便请问combobox2:textchanged事件
Dim c2 As String =e.sender.text
If c2>""
Dim dt As DataTable = DataTables("成绩")
Dim cmd As New SQLCommand
cmd.cfont-family: Verdana;"> cmd.CommandText = "SECT DISTINCT 考试名称,单位名称,学段 From {成绩} where 学段 = '小学' and 考试名称 in (Selet 考试名称 From {小学考试名称} where 上分锁定 = 0 and 是否统一上分 = 1)"
dt = cmd.ExecuteReader()
Dim cmb3 As WinForm.ComboBox = e.form.Controls("ComboBox3")
cmb3.ComboList = dt.GetComboListString("单位名称")
End If
录入成绩的用户分组是自己所在学校的单位名称，如要求在统考上分时，上分用户不能录本校成绩
老师，在小学考试名称里有一个列禁止上本校成绩逻辑列，当为1时，cmb3的列表中就不包含该用户所在的单位这怎么办
加好友 
发短信
Post By：2017/5/20 11:23:00 [只看该作者]
