Foxtable(狐表)用户栏目专家坐堂 → 语法解法


  共有20379人关注过本帖平板打印复制链接

主题:语法解法

帅哥哟,离线,有人找我吗?
wtfwsk05
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:398 积分:2369 威望:0 精华:0 注册:2017/3/19 15:30:00
  发帖心情 Post By:2018/9/25 9:41:00 [只看该作者]

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" 这条语句应怎么解读

 回到顶部
总数 316 1 2 3 4 5 6 7 8 9 10 下一页 ..32