用VB设计一个程序，用一个标签显示当前时间，在窗体上自下而上反复不停移动。

Const i = 30

Private Sub Form_Load()

Form1ScaleHeight = 3250 '以下设置显示的样式

Form1ScaleWidth = 6000

Label1Height = 250

Label1Width = 2000

Label1Left = 2000

Label1Top = 0

Timer1Interval = 100 '设置计时器时间间隔。

End Sub

Private Sub Timer1_Timer()

Label1Caption = Now ' 让label1显示当前时间

Label1Top = Label1Top + i 'label1的顶高度按01秒增加30

If Label1Top >= 3000 Then '如果label的顶高到达form的底部，则重新把它放到顶部去

Label1Top = 0

End If

End Sub

插入一个 精易模块ec，里面有个直接取视频时长语句，如下：

透明标签1标题 ＝ 到文本 (取视频时长 (通用对话框文件名))

或者 透明标签1标题 ＝ 到文本 (取视频时长 (F:\文件夹名称\子文件夹名称\123mp4))

这个是功能模块，而不是你说的标签，前提是你的微信小程序有优惠券这个功能模块，每个小程序都会有不同的功能模块，这个模块是开发商给你开发出来的，假如你的小程序没有这个模块，根本就不会出现。

1、首先在电脑端打开CAD软件，然后打开OP进行 *** 作设置。

2、进入OP选项卡d窗，进行设置，点击显示选项卡，如图所示。

3、然后对显示文件选项卡，把显示卡选项上的显示文件选项卡设置启用状态即可。

4、进行打勾后，点击应用就可以看到效果图。

5、这样，CAD就可以把打开的多个图纸标签显示在窗口上方显示了。

以上就是关于用VB设计一个程序，用一个标签显示当前时间，在窗体上自下而上反复不停移动。全部的内容，包括:用VB设计一个程序，用一个标签显示当前时间，在窗体上自下而上反复不停移动。、易语言 弄一个视频播放器同时添加了标签怎么让标签显示播放器运行的时间、微信小程序列表里小程序的标签怎么出来的等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！