以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个错误是何故呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38108)

--  作者:晕了快扶我
--  发布时间:2013/7/19 17:14:00
--  这个错误是何故呢?

以下代码在tabcontrol的SelectedIndexChangging事件里

Dim yq As String = e.Sender.SelectedPage.Name
Select Case yq
    Case "供应商信息"
        Forms("主界面").Controls("SplitContainer1").Panel1.Collapsed = True
End Select

 

以下代码在tabcontrol的双击事件里

If e.Sender.SelectedPage.text <> "首页" Then
     e.Sender.SelectedPage.Visible = False
End If
Forms("主界面").Controls("页签").SelectedIndex = 0
e.form.controls("页签").basecontrol.visualstyle =5

 

SelectedIndexChangging的代码取掉,双击事件正常,添加后双击就出错,出错提示为,求解


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20130719171404.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2013-7-19 17:14:56编辑过]

--  作者:Bin
--  发布时间:2013/7/19 17:16:00
--  
上例子,原因是某个变量是空值.
--  作者:晕了快扶我
--  发布时间:2013/7/19 17:25:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试页签.foxdb


--  作者:Bin
--  发布时间:2013/7/19 17:28:00
--  
没有问题啊.一切正常啊.
--  作者:晕了快扶我
--  发布时间:2013/7/19 17:30:00
--  
以下是引用Bin在2013-7-19 17:28:00的发言:
没有问题啊.一切正常啊.

要加一个页面就有,我刚才多手删除掉了一个,所以没错误,我也发现了


--  作者:Bin
--  发布时间:2013/7/19 17:33:00
--  
3个页码也没报错啊.正常变换样式了啊.
--  作者:晕了快扶我
--  发布时间:2013/7/19 17:35:00
--  
以下是引用Bin在2013-7-19 17:33:00的发言:
3个页码也没报错啊.正常变换样式了啊.

你先关第三个页面,然后再双击关第二个页面看看,我怎么测试都报错的


--  作者:晕了快扶我
--  发布时间:2013/7/19 17:37:00
--  
要最后关PAGE2就会报错
--  作者:Bin
--  发布时间:2013/7/19 17:38:00
--  
原因很简单因为你关闭了就不存在e.Sender.SelectedPage.Name了.自然会报错.  
--  作者:晕了快扶我
--  发布时间:2013/7/19 17:39:00
--  
以下是引用Bin在2013-7-19 17:38:00的发言:
原因很简单因为你关闭了就不存在e.Sender.SelectedPage.Name了.自然会报错.  

那我应该直接用forms("XX").xxx.xx指明对吗?