香港老演员男明星:vb问题 关于sstab的小问题

来源：百度文库 编辑：神马品牌网 时间：2024/05/11 00:23:07
我想这样

单击sstab1的tab1表头 执行命令A 在没有切换其他表头的时候不再执行命令
当单击过其他tab表头后 再单击tab1 又可以执行命令A

单击sstab1的tab2表头 执行命令B 在没有切换其他表头的时候不再执行命令
当单击过其他tab表头后 再单击tab2 又可以执行命令B

单击sstab1的tab2表头 执行命令B 在没有切……

单击sstab1的tab2表头 执行命令B 在没有切……

……

应该怎么写呢？

楼上的程序有错，应该改为如下程序：
Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case SSTab1.Tab '注意在这里修改，不能用PreviousTab
Case 0
命令A
Case 1
命令B
Case 2
命令C

……

……
End Select
End Sub

以上程序在VB6中调试通过。

Private Sub SSTab1_Click(PreviousTab As Integer)
Dim Msg As String
Msg = SSTab1.Caption
Msg = LCase(Msg) '字符串转小写，以便下一行的 IF 好处理

If Msg = "tab 1" Then MsgBox ("Tab 1")
If Msg = "tab 2" Then MsgBox ("Tab 2")
End Sub

Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case PreviousTab
Case 0
命令A
Case 1
命令B
Case 2
命令C

……

……
End Select
End Sub

vb问题 关于sstab的小问题 vb问题 关于sstab 关于VB中的 SSTab控件的一个问题 请教VB中的SSTab问题 vb中使用sstab控件出现的严重问题！ sstab分辨率调整时候的问题？（VB高手进） 关于VB的filter的小问题 关于VB.NET的一个小问题 关于VB的一些小问题 关于VB的一个小问题