以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于In运算符  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=41841)

--  作者:东坡一剑
--  发布时间:2013/10/28 22:09:00
--  关于In运算符

If e.Sender.Name In (\'出库记录\',\'出库明细\',\'库存表\',\'入库记录\',\'入库明细\',\'货品信息\')
    Dim lst As new List(Of String)
    Dim gb As WinForm.GroupBox = e.Form.Controls("GroupBox2")
    Dim cb As WinForm.Control
    For Each cb  In e.Form.Controls
        If Typeof cb Is winform.checkbox Then
            Dim c As WinForm.CheckBox = cb
            If c.Checked = 1 Then
                lst.add(c.Text)
            End If
        End If
    Next
   
    If lst.count > 0 Then
        e.Form.Controls("初始化以下表").Enabled = True
    Else
        e.Form.Controls("初始化以下表").Enabled = False
    End If
End If

 

上面的代码红字部分会报错,因为汉字部分全部被注释掉了。

但是In运算符用去类确实方便,有没有什么办法呢?


--  作者:有点甜
--  发布时间:2013/10/28 22:14:00
--  
 呃,有这种用法的么,楼主?不能这样子的。

 要一个一个写去判断。

--  作者:程兴刚
--  发布时间:2013/10/28 22:47:00
--  
双引号试试
--  作者:东坡一剑
--  发布时间:2013/10/29 1:40:00
--  
谢谢诸位指点!