主题：自定义用户登录出错

在打开项目的时候，按取消，出现错误提示

求解决方案

谢谢！

此主题相关图片如下：捕获.png

发现以下代码错误，求助
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 产品型号 From {产品信息表}"
dt = cmd.ExecuteReader
Tables("产品信息表").Cols("产品型号").Combolist = dt.GetComboListString("产品型号")

Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd1.C
cmd1.CommandText = "SELECT DISTINCT 产品名称 From {产品信息表}"
dt1 = cmd1.ExecuteReader
Tables("产品信息表").Cols("产品名称").Combolist = dt1.GetComboListString("产品名称")

问题已解决

谢谢