以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口控件代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=46147)

--  作者:红颜
--  发布时间:2014/2/18 9:45:00
--  [求助]窗口控件代码
Dim vals() As String = e.Form.Controls("ComboBox3").value.split(":")
If vals.length > 1 Then
     e.Form .Controls("ComboBox3").value =vals(1)
Else
     e.Form .Controls("ComboBox3").value =vals(0)
End If

提示缺少  with 等

控件ComboBox3 ValueChanged



问题解决

[此贴子已经被作者于2014-2-18 9:55:11编辑过]

--  作者:Bin
--  发布时间:2014/2/18 9:52:00
--  
代码看起来似乎没问题啊.上个例子看看.
--  作者:红颜
--  发布时间:2014/2/18 9:56:00
--  
缺少判断Dim vals() As String = e.Form.Controls("ComboBox3").value.split(":")