2009年1月14日 星期三

99-2

'2.計算兩個時間 (時:分:秒) 的間隔秒數。
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim t1 = #1/14/2009 2:32:00 PM#
        Dim t2 = Now
        MsgBox((t2 - t1).TotalSeconds)
    End Sub
End Class

image

沒有留言:

張貼留言