VB.NET中如何在Label内部嵌入Timer控件？

2026-05-08 11:523阅读0评论SEO资讯

内容介绍
文章标签
相关推荐

本文共计239个文字，预计阅读时间需要1分钟。

我正在尝试将倒计时计时器集成到我的程序中，但当我运行程序时，计时器不会倒计时。它跳到一个数字，然后停止。这是我的代码：

vbPrivate Sub CompactTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CompactTimer.Tick 'CompactTimerEnd Sub

我正在尝试将倒数计时器放入我的程序中,但是当我运行程序时,它不会倒计时.它跳到一个,就是这样.

Private Sub CompactTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CompactTimer.Tick Dim Time As Integer = 11 Do Until Time = 0 ClockLabel.Text = "Compacting database in: " & Time Time -= 1 Loop End Sub

我也启动了计时器并在Form_Load routuine中将间隔声明为500.

摆脱循环并在范围外声明Time变量.

Dim Time As Integer = 11 Private Sub CompactTimer_Tick(ByVal sender As Object, ByVal e As EventArgs) _ Handles CompactTimer.Tick If Time >= 0 Then ClockLabel.Text = "Compacting database in: " & Time Time -= 1 Else CompactTimer.Stop End If End Sub

标签：VBNet –timer Inside label