实现SSTab单个选项卡代码

前言

最近在机房中结账部分的SSTab选项卡,我设置了5个选项卡,一开始想要它每点击一个选项可或换一个选项卡时,就执行该选项可对应的代码,通过选项可的索引来调用它的代码部分,但怎么都实现不了!
这是我一开始的关键代码:

Private Sub SSTab1_DblClick()
 Select Case SSTab1.Tab     '根据SSTab1的tab索引 
   Case 0  
    。。。。。。。
   Case 1
    。。。。。。
   Case 2
    。。。。。。
End Sub

过程

后来在网上查了很多,也自己试了试,有的可以,有的运行不出来,我想不是它的代码有问题,而是我没有用对地方!

比如这个我试了一下,结果选项卡根本没有这个方法!:

Select Case SSTab1.SelectedItem.Index
       Case 1
             ....
       Case 2
            ......
End Select

这里写图片描述
这里写图片描述

在比如,试了试这个,也是显示有问题,这个过程根本就不能这样写!

Private Sub SSTab1_Click()
    Select Case SSTab1.Tab
        Case 1
          Text1.Text = "asdfsadf "
    End Select
End Sub

这里写图片描述
这里写图片描述

最后终于找到了一个方法,试了试,给成功了!

Private Sub SSTab1_Click(PreviousTab As Integer)
    If SSTab1.Tab = 0 Then
        。。。。。。。
    End If
    If SSTab1.Tab = 1 Then
        。。。。。。。
    End If
End Sub

在控件的Click事件中,这才是这个控件的最基本的用法。
后来,对比了一下自己的代码和之前第二个自己尝试的错代码。
第二个自己尝试的错代码问题:想使用它的单机事件,但这个事件或者过程再或者这个函数是需要参数的!而错误的原因就是没有写参数
自己的错在:事件用错了,还有就是和自己第二个尝试的错代码一样的问题了!

总结

多查!

  • 2
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 13
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 13
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值