在FORM中,超宽时,滚动条会自动出现

解决方案 »

  1.   

    使用Tabstrip和Frame控件数组,把窗口分成多个标签页。
    利用Tabstrip的Click事件切换Frame控件的Visible属性,达到切换可见控件的目的。
    Private Sub TabStrip1_Click()
       If TabStrip1.SelectedItem.Index - 1 = mintCurFrame _
          Then Exit Sub ' No need to change frame.
       ' Otherwise, hide old frame, show new.
       Frame1(TabStrip1.SelectedItem.Index - 1).Visible = True
       Frame1(mintCurFrame).Visible = False   ' Set mintCurFrame to new value.
       mintCurFrame = TabStrip1.SelectedItem.Index - 1
    End Sub
    Frame控件中还可以嵌套Tabstrip和Frame控件。