Private Sub Button1_Click(ByVal sender
As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("作成日時:" & System.IO.File.GetCreationTime(Application.ExecutablePath))
MsgBox("更新日時:" & System.IO.File.GetLastWriteTime(Application.ExecutablePath))
MsgBox("アクセス日時:" & System.IO.File.GetLastAccessTime(Application.ExecutablePath))
End Sub