With e.form
'===========在【设置】表中列出单号规则为1的记录=================
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '单号规则' And 方向 = '1'"
.Controls("TextBox1").value = cmd.ExecuteScalar() '指定控件的值为cmd返回的单个值
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '单号规则' And 方向 = '2'"
.Controls("TextBox2").value = cmd.ExecuteScalar()
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '单号规则' And 方向 = '盘点'"
.Controls("TextBox3").value = cmd.ExecuteScalar()
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '单号规则' And 方向 = '调拨'"
.Controls("TextBox4").value = cmd.ExecuteScalar()
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '全局参数' And 方向 = '上限预警'"
.Controls("NumericComboBox1").value = Val(cmd.ExecuteScalar()) 'Val 将【字符】转换为【数值】
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '全局参数' And 方向 = '下限预警'"
.Controls("NumericComboBox2").value = val(cmd.ExecuteScalar())
cmd.CommandText = "Select 单据前缀 F rom [设置] WHERE 名称 = '全局参数' And 方向 = '生成单号'"
.Controls("CheckBox1").Checked = cmd.ExecuteScalar() = "True"
End With
请问下,上述代码中.Controls("CheckBox1").Checked = cmd.ExecuteScalar() = "True" 这条语句应怎么解读