ラベルに経過時間を表示するには?

解決


くまんばち  2009-11-20 22:14:29  No: 146555

現在POSレジを自作しています。VB2008(WINDOWSXP)です
ボタンを押すとボタン上に貼り付けてあるラベルに押した時間からの経過時間を分単位(50分など)で一定間隔で更新される様にしたいのですが、タイマーコントロールの詳しい使用方法が分かりません。経過時間を取得する既存のメゾッドはあるのでしょうか?無ければどの様なプログラムになるのでしょうか?恐れ入りますが、糸口が見つからないのでご教授お願いいたします。


オショウ  2009-11-20 22:44:42  No: 146556

ボタンをクリックした最初の時刻を保存し、現在時刻との差
を取れば、経過時間が算出できますが・・・

一定間隔での更新は、フォームに貼ったライマーのイベント
間隔をどの程度の時間にするか・・・くらいでしょう〜

以上。参考まで


欽入28呈  2009-11-20 22:50:03  No: 146557

http://q.hatena.ne.jp/1229409119
参考になるかもしれません


くまんばち  2009-11-21 11:35:47  No: 146558

Public time1 As Date(最初の時刻)

keika = DateDiff(DateInterval.Minute, Me.time2, time1)
タイマーコントロールに上記のコードを記述する感じで一応出来たのですが、これで良いのでしょうか?

vbは超初心者なので不安です


くまんばち  2009-11-21 11:38:03  No: 146559

keika = DateDiff(DateInterval.Minute, Me.time1, time2)の間違いでした


オショウ  2009-11-21 23:18:21  No: 146560

やり方っていろいろある・・・

        Dim startTime As DateTime
        Dim ts As TimeSpan

        startTime = Now

        ' 何かの処理

        ts = Now.Subtract(startTime)    ' 経過時間算出

        Debug.WriteLine(ts.TotalMinutes.ToString)  ' 経過時間を分で換算

以上。参考まで


くまんばち  2009-11-23 00:24:12  No: 146561

オショウさんありがとうございました。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加