以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  停留在页面集合的页签上自动显示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27504)

--  作者:hpingpp
--  发布时间:2013/1/3 10:44:00
--  停留在页面集合的页签上自动显示

以下是在 MouseHover 写的代码,但是没反应,请教哪里出错了。

Dim nm As String = e.Sender.Name
Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
If nm = "订单状况" Then
tab.SelectedIndex = 0
ElseIf nm = "生产状况" Then
tab.SelectedIndex = 1
ElseIf nm = "财务状况" Then
tab.SelectedIndex = 2
ElseIf nm = "天 猫" Then
tab.SelectedIndex = 3
End If


--  作者:sunsenfeng
--  发布时间:2013/1/3 11:34:00
--  

估计是e.sender.name返回的就是一个值,Tab控件的名称,所以下面代码不执行

你可以MessageBox.Show(nm)试一下