2016/03/27(Sun) 23:37:38 編集(投稿者)
■No79374 (shu さん) に返信
ありがとうございます。
これは30秒毎にとある処理をしょうとするものです。
これで合ってるでしょうか?
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Do
If Mid(DateTime.Now, 18, 2) = "00" Then '時計の00秒になればスタート
MessageBox.Show(DateTime.Now.ToString()) 'ここでとある処理を実行
System.Threading.Thread.Sleep(30000) '30秒のスリープ
MessageBox.Show(DateTime.Now.ToString()) 'ここでとある処理を実行
End If
Loop
End Sub
End Class