专家坐堂-想写一段根据值判断是否显示控件的代码!Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  想写一段根据值判断是否显示控件的代码!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27738)

--  作者：谢天钰
--  发布时间：2013/1/9 0:07:00
--  想写一段根据值判断是否显示控件的代码!

想写一段根据值判断是否显示控件的代码!

控件1为多值字段   判断1是否包含25 如果包含25则显示控件2

麻烦专家帮助我写一段代码学习!

Dim zzs As new List(of String)
zzs.add(e.Form.Controls("CheckedComboBox1").text)
Dim qtzz As WinForm.TextBox = e.Form.Controls("TextBox3")
If zzs IsNot Nothing Then
    If zzs.Contains(25) = True Then
        qtzz.Visible = True
    Else
        qtzz.Visible = False
    End If
End If

这段代码如果我在("CheckedComboBox1")中输入25 就隐藏了qtzz 如果输入多一个值但是也包含25 就不隐藏了,麻烦看看我错在哪里?

[此贴子已经被作者于2013-1-9 0:16:40编辑过]

--  作者：lin_hailun
--  发布时间：2013/1/9 9:07:00
--
Dim qtzz As WinForm.TextBox = e.Form.Controls("TextBox3")

If qtzz.Text.IndexOf("25") > -1 Then
    qtzz.Visible = True
Else
    qtzz.Visible = False
End If

[此贴子已经被作者于2013-1-9 9:09:29编辑过]