Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/django/21.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Winforms 为数字计数动画_Winforms_Animation - Fatal编程技术网

Winforms 为数字计数动画

Winforms 为数字计数动画,winforms,animation,Winforms,Animation,我想创建一个倒计时/倒计时动画,如。这是可能的标签?任何指针都将不胜感激。下面是一个非常简单的示例,它使用一个带有两个文本框(开始和结束)和一个显示标签的表单。随着距离最终目标越来越近,轻松度越来越高,过程也越来越慢 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim cntr As Integer = CInt(Me.txtStart.Te

我想创建一个倒计时/倒计时动画,如。这是可能的标签?任何指针都将不胜感激。

下面是一个非常简单的示例,它使用一个带有两个文本框(开始和结束)和一个显示标签的表单。随着距离最终目标越来越近,轻松度越来越高,过程也越来越慢

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim cntr As Integer = CInt(Me.txtStart.Text)
    Dim ease As Integer = 0
    Do While cntr < Me.txtEnd.Text
        cntr += 1

        Me.lblCount.Text = cntr
        Me.lblCount.Refresh()

        Select Case Me.txtEnd.Text - cntr
            Case Is < 5
                ease = 100
            Case Is < 10
                ease = 40
            Case Is < 100
                ease = 10
            Case Is < 200
                ease = 1
        End Select

        If ease > 0 Then
            System.Threading.Thread.Sleep(ease)
        End If
    Loop
End Sub
Private子按钮1\u单击(发送方作为System.Object,e作为System.EventArgs)处理按钮1。单击
Dim cntr As Integer=CInt(Me.txtStart.Text)
以整数=0的形式显示
当cntr0,则
系统。线程。线程。睡眠(轻松)
如果结束
环
端接头

这个问题显示出缺乏研究努力,而且内容太广泛。也许我对这个问题的措辞不好。我真正想做的是在数字计数中实现放松。计数部分是一个简单的for循环。我想要的是在接近循环结束时减慢计数。我实际上在考虑插值和所有这些,但是这个答案很简单,经过一些调整,它工作了。在UI线程上睡觉。