如何在VB中根据时间显示问候语?如：8:00-10:00显示早上好,11:00-12:00显示中午好,以此类推,谢谢.

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/10/07 00:46:22

加一个时钟控件,代码：
Private Sub Timer1_Timer()
h = Hour(Now)
If h = 8 Or h = 9 Then
  Me.Caption = "早上好"
ElseIf h = 11 Or h = 12 Then
  Me.Caption = "中午好"
ElseIf h >= 18 And h <= 23 Then
  Me.Caption = "晚上好"
End If
End Sub
再问：我想让那些问候语显示在一个Lebel中，请问如何做呢
再答： Me.Caption改成Label1.Caption
再问：

没成功耶
再答：你要把Timer2的Interval设置为1000

如何在VB中根据时间显示问候语?如：8:00-10:00显示早上好,11:00-12:00显示中午好,以此类推,谢谢. 在excel中,如何不显示结果,而是显示公式? 在银行存十万存折上显示10,000,00请问是这样显示的吗!那五万七千三百三十九在存折是怎么显示的? 在VB中如何在一个标签里同时显示平均数和平均数的个数如何在word中正确显示音标标准差在计算器中如何显示设计一个数字电子钟用于显示时间的变化.（1）时分秒显示功能,时分秒分别用2个数码管显示,要求在00点00分00秒到23点现实生活中的数学题,我家微波炉带时钟显示功能,但断电后时钟自动回到1:00,问某一时间停电后,微波炉显示的时间为11：1 电子数码中如下图所示,指示时间由00：00：00到23：59：59.那么在一昼夜里,这个钟上恰好显示4个数字“3”的时间 12小时制的电子钟显示的时间想通数字连续排列3个以上的情况一天中会发生几次正午和凌晨都显示为12:00 VB编程问题.如何让计算出的100以内的勾股数的计算结果显示在List中? 如何在一个单元格中显示公式,另一个单元格中显示该公式的计算结果