vb.net中的tabpages动画

Question

是否可以在用VB.NET切换时对tabpages进行动画制作？

因此，当一个人切换目录时，当前的人可能会滑动以显示下一个。

这可能吗，还是很复杂？提前谢谢。

Answer 1

您可以简单地将所有控件放在面板上的标签页上。然后使用15毫秒计时器滑动面板：

Dim tabPageOffset As Integer

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    tabPageOffset -= 10          `` Tweak to change speed
    If tabPageOffset <= 0 Then
        tabPageOffset = 0
        Timer1.Enabled = False
    End If
    TabControl1.SelectedTab.Controls(0).Left = tabPageOffset
End Sub

Private Sub TabControl1_Selecting(sender As Object, e As TabControlCancelEventArgs) Handles TabControl1.Selecting
    tabPageOffset = e.TabPage.ClientSize.Width
    Timer1.Enabled = True
End Sub