翻页动画

时间:2010-08-24 08:36:16

标签: vb.net

我正在构建一个应用程序。这表明表格,页眉和页脚要保持固定 在中间有一个Group Box,它有一个不同选项的问题。 当用户单击底部的“下一步”按钮时,“组框”会加载下一个问题。 我想让这个变化动画化。我希望显示一个翻页动画,当点击下一个按钮时运行...................

请帮忙 谢谢 Furqan

2 个答案:

答案 0 :(得分:0)

doing this in C# and GDI 有一个非常精心编写的教程,但它相当复杂。

对于 doing this with Silverlight ,还有一个更简单的教程,也在CodeProject上。

答案 1 :(得分:0)

如何在VB.Net中创建加载屏幕

要创建加载屏幕,您需要了解“BackgroundWorker”,它是Imports System.ComponentModel

的一部分。
  1. 使用您的加载消息和图片创建一个加载表单。此表单将作为弹出窗体
  2. 我调用了我的表单'frmPleaseWait',并将以下代码放入其中
  3. 公共类frmPleaseWait

    Private _worker As BackgroundWorker
    
    Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
        MyBase.OnLoad(e)
        _worker = New BackgroundWorker()
        AddHandler _worker.DoWork, AddressOf WorkerDoWork
        AddHandler _worker.RunWorkerCompleted, AddressOf WorkerCompleted
        _worker.RunWorkerAsync()
    End Sub
    
    Private Sub WorkerDoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs)
        Threading.Thread.Sleep(5000)
        'your loading animation code goes here
    End Sub
    
    Private Sub WorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs)
        Me.DialogResult = Windows.Forms.DialogResult.OK
        Me.Close()
    End Sub
    

    结束班

    1. 在主要表单中处理正在处理时间的代码
    2. Dim frm As New frmPleaseWait
      frm.ShowDialog()
      'your time consuming main processing code goes here
      frm.Close()
      
      1. 就是这样,如果你想让弹出窗口显示得更长,那么就改变WorkerDoWork方法中的线程时间。
      2. @Furqan,在您的情况下,在本节中,您需要将动画代码放入WorkerDoWork方法

        不要忘记在加载表单类

        的顶部使用Imports System.ComponentModel

        感谢Eddy Jawed