2 qq 32088519 qq_32088519 于 2016.02.06 21:37 提问

tapstrip控件 求教此程序 为什么运行没反应

????求教此程序 为什么运行没反应 图片说明

5个回答

caozhy
caozhy   Ds   Rxr 2016.02.06 23:37
已采纳

图片说明

caozhy
caozhy 回复qq_32088519: 不客气。
接近 2 年之前 回复
qq_32088519
qq_32088519 多谢了
接近 2 年之前 回复
caozhy
caozhy   Ds   Rxr 2016.02.06 23:38

lz你代码没有问题。我亲自测试,有图在此。那个胡搅蛮缠的用户,请csdn尽早处理。

 Private Sub Command1_Click()
    MsgBox Me.TabStrip1.SelectedItem.Key
End Sub

Private Sub Command2_Click()
    MsgBox Me.TabStrip1.SelectedItem.Key
End Sub

Private Sub Form_Load()
    Me.TabStrip1.Tabs.Clear
    Me.TabStrip1.Tabs.Add , "Key1", "Key1"
    Me.TabStrip1.Tabs.Add , "Key2", "Key2"
End Sub

Private Sub TabStrip1_Click()
    Select Case Me.TabStrip1.SelectedItem.Key
        Case "Key1"
            Command1.Visible = True
            Command2.Visible = False
        Case "Key2"
            Command2.Visible = True
            Command1.Visible = False
    End Select
End Sub

caozhy
caozhy   Ds   Rxr 2016.02.06 21:41

你设置的Caption还是Key

caozhy
caozhy   Ds   Rxr 2016.02.06 21:42

你可以加上一个MsgBox tapstrip1.selecteditem.key在前面输出下

91program
91program   Ds   Rxr 2016.02.06 22:13
qq_32088519
qq_32088519 回复91program: Zorder 不太需要
接近 2 年之前 回复
caozhy
caozhy 回复91program: 奇了怪了,Command按钮里哪里来的“Zorder ”胡乱灌水的倒是振振有词起来了。倒是请大家都来看看这个人到底怎么回事?
接近 2 年之前 回复
91program
91program 回复caozhy: 你以为你的那两个回答,就和 LZ 的相关了?孙子,你既然承认我是你爷爷辈的,你这个孙子是当定了!如果这样,孙子你还在这叫什么。你爸爸没有教你怎么为人吧。看来我要收拾收拾“它”了。
接近 2 年之前 回复
caozhy
caozhy 本身这个网站就是一个抓取csdn社区的垃圾站,而且也没有任何和lz问题相关的地方。
接近 2 年之前 回复
caozhy
caozhy 回复91program: 请管理员删除这些无关问题的垃圾回答。
接近 2 年之前 回复
91program
91program 试试改变 Zorder 来看看有没有效果。
接近 2 年之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!