主题：窗口提示错误，请问原因（已解决）

我按贺老师的示例：自定义用户管理，做了一个用户登录的窗体，在窗口的AfterLoad　事件中写入以下代码：

 

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("用户名")
cmd.C
cmd.CommandText = "SELECT DISTINCT Name From {用户}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
   cmb.Items.Add(dr("用户名"))
Next
cmb.SelectedIndex = 0

 

但是在打开此窗口时会提示错误，现在不知这个提示是什么原因？错在何处？我自己认为错在红字部分，但是我查看了，并没有写错啊

此主题相关图片如下：窗口提示错误.jpg

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("用户名")
cmd.ConnectionName = "User" ’原帮助这里指定数据源
cmd.CommandText = "SELECT DISTINCT Name From {用户}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
    cmb.Items.Add(dr("用户名"))
Next

if .Items.Count > 0 Then ‘原帮助这里多了一个判断
    cmb.SelectedIndex = 0

end if

请说的明白些？呵

没有办法直接看出来，用这个方法检查一下：
 
http://www.foxtable.com/help/topics/1485.htm
 
我估计是dt为nothing。

我原来看错了再看看二楼

对不起，我查到原因了，确实后台的表是空表，原因是列名搞错了，

错误：SELECT DISTINCT Name From {用户}"

正确：SELECT DISTINCT 用户名 From {用户}"

谢谢二位老师！呵