表示选中某页用TabStrip1.Tabs(i).Selected = True
看看一下代码就明白了,明白了以上两个问题就迎刃而解Private Sub Form_Load()
  Frame1.Visible = False
  Frame2.Visible = True
  Frame3.Visible = False
  TabStrip1.Tabs(2).Selected = True '启动时选中第二页
End SubPrivate Sub mnu1_Click() '第一页
  TabStrip1.Tabs(1).Selected = True
  Frame1.Visible = True
  Frame2.Visible = False
  Frame3.Visible = False
End SubPrivate Sub mnu2_Click() '第二页
  TabStrip1.Tabs(2).Selected = True
  Frame1.Visible = False
  Frame2.Visible = True
  Frame3.Visible = False
End SubPrivate Sub mnu3_Click() '第三页
  TabStrip1.Tabs(3).Selected = True
  Frame1.Visible = False
  Frame2.Visible = False
  Frame3.Visible = True
End Sub