VB在三个文本框内分别输入时分秒,在第四个里打出时间

来源：百度知道 编辑：UC知道 时间：2024/06/16 10:09:22

加入一个按钮，在按钮的事件中令
TextBox4.Text ＝
TextBox1.Text & ":" & TextBox2.Text & ":" & TextBox3.Text

是要这样吗？
hh=int(text1.text)
mm=int(text2.text)
ss=int(text3.text)

text4.text=format(hh,"00")+":"+format(mm,"00")+":"+format(ss,"00")

Private Sub Form_Load()
Text1.Text = Hour(Now)
Text2.Text = Minute(Now)
Text3.Text = Second(Now)
Text4.Text = Time
End Sub

textbox4.text = text3.text & text2.text & text1.text