2

3270 メインフレームの情報を更新するためにタイマーを 60 秒ごとに実行する必要があるアプリケーションに取り組んでいます。GUI を使用したくないのですが、Tick イベントなしでタイマーを機能させる方法が見つからないようです。ユーザーがタイマーを使用せずにアプリケーションを閉じるまで、タイマーを常に実行することは可能でしょうか?アプリケーションのコンポーネント?

4

2 に答える 2

3

これを試して:

Public Sub Wait(ByVal sec As Integer)
    sec = sec * 1000
    Dim sw As New Stopwatch
    sw.Start()
    Do Until sw.ElapsedMilliseconds >= sec
        Application.DoEvents()
        Threading.Thread.Sleep(1)
    Loop
    sw.Stop()
End Sub


お楽しみください =)

于 2013-06-03T19:39:00.720 に答える