怎样使VB显示现在的分钟

来源：百度知道 编辑：UC知道 时间：2024/05/20 09:31:00
用VB编一个表,需要显示现在是几分(如现在是10:20:30,要让它显示"20"),应该用什么语句?

完全代码，在窗体上放一个label控件，一个timer控件
Private Sub Form_Load()
Timer1.Interval = 1000 '每秒刷新一次
Label1 = Minute(Time) '显示初值
End Sub

Private Sub Timer1_Timer()
Label1 = Minute(Time) '显示的是当前时间的分钟数
End Sub

在formload事件中写入(编辑模式下双击form)：
text1.caption=time()
__________________
如果要做时钟的话，需要拖入时间控件timer,
设定间隔为1000毫秒，执行
text1.caption=time() 语句

参考资料:百度!

假如显示10:20:30是TIME的变量
那么分钟就是MIN（TIME）
小时是HOUR（TIME）
以此类推
学过好长时间了都忘了
试试就出来了