你可以在Tabscrip控件上的Tab页上分别放置一个Frame控件,然后再在各自的Frame上编辑按钮控件。然后在程序运行时期,对各自进行控制。要注意一点第二个Frame控件不要放到第一个Frame上面了,要不然的话,第二个按钮就不会出来了。
Runtime时期可以对Tabstrip_Click()事件进行控制。如:
Private Sub TabStrip1_Click()
Select Case TabStrip1.SelectedItem.Key
       Case "key1"
            Frame1.Visible = True
            Frame2.Visible = False
            Cmdpush.Enabled = True
            Cmdclear.Enabled = True
            Text1 = ""
            Text1.SetFocus
       Case "key2"
            Frame1.Visible = False
            Frame2.Visible = True
            CmdFirst.Enabled = True
            CmdNext.Enabled = True
            CmdPrevious.Enabled = True
            CmdLast.Enabled = True
            Text3 = ""
            CmdFirst.SetFocus
End Select
End Sub其中的Cmdpush、Cmdclear、CmdFirst、CmdNext、CmdLast、CmdPrevious均为CommandButton控件。