vb 問題求解答

load 裏面不能 print~因為在Print時窗體還沒有載入內存。在Print之前加壹句話讓窗體顯示的語句即可有效~例如

Private Sub Form_Load()

form1.show

Dim hh%, mm%, ss%, Totals!

hh = Val(InputBox("輸入小時"))

mm = Val(InputBox("輸入分鐘"))

ss = Val(InputBox("輸入秒鐘"))

Totals = hh * 3600 + mm * 60 + ss

Print hh & "小時" & mm & "分" & ss & "秒"

Print "總計:" & Totals & "秒"

End Sub