Question

VB中 点击按钮,让时间与日期在一个LABEL中出现

还有，让星期也在同一个label中出项，这段程序要怎么编，，谢谢

Answer 1

画一个命令按钮和一个标签：

Private Sub Command1_Click()
n = Weekday(Date)
Select Case n
Case 1
Label1.Caption = Now & "星期日"
Case 2
Label1.Caption = Now & "星期一"
Case 3
Label1.Caption = Now & "星期二"
Case 4
Label1.Caption = Now & "星期三"
Case 5
Label1.Caption = Now & "星期四"
Case 6
Label1.Caption = Now & "星期五"
Case 7
Label1.Caption = Now & "星期六"
End Select
End Sub