按照教程添加了用户登录窗口的AfterLoad事件代码:
Dim
cmb As WinForm.ComboBox =
e.Form.Controls("UserName")
cmb.ComboList = _UserTable.SQLGetComboListString("Name")
又按照教程添加了项目AfterOpenProject代码:
Dim cmd As New SQLCommand
cmd.ConnectionName = "User"
cmd.CommandText = "SELECT * Fr om {Users} Where [Name] Is Null"
_UserTable = cmd.ExecuteReader(True)
Forms("用户登录").Open()
If _UserName = "" Then
Syscmd.Project.Exit()
Return '这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
End If
但是现在报错:
错误所在事件:窗口,用户登录,AfterLoad
详细错误信息:
无法将类型为“Foxtable.WinForm.TextBox”的对象强制转换为类型“Foxtable.WinForm.ComboBox”。
[此贴子已经被作者于2017/7/20 12:10:24编辑过]