Accessにて24時を越えた場合の表示

Accessのフォーム上で開始時間１というテキストボックスと終了時間１というテキストボックスがあります。
データ型は日付・時刻型です。
24時間表記で終了時間が26時の場合は2時と入力しています。
入力する際はそれで構わないのですが、
それをレポートとして印字する時に26時と印字されるようにはならないでしょうか？
開始時間１と終了時間１を比べて開始時間１のほうが大きければ終了時間１は24足した数字を表示したいのですが、うまく書けません。
よろしくお願いします

No.5 ベストアンサー 回答者： yu_tang 回答日時： 2009/03/20 01:35

レポートにテキストボックスを配置して、コントロールソースに

=([終了時間１]-([終了時間１]<[開始時間１]))*24
のような式を設定するとか。関数は不要です。
「26」のような数値が表示されるはずですので、書式プロパティに
「#\時」とでも設定しておけば、「26時」と表示させることが
できるでしょう。
テキストボックスの名前は「終了時間１」や「開始時間１」と
カブらない別の名前にしてください（でないと循環参照が発生
しますので）。

なお、TimeDiff() を使うなら、
=TimeDiff([終了時間１]-([終了時間１]<[開始時間１]))
のような式を設定すれば「26:00:00」のようには表示できます。
ただし「26時」の表示形式にはなりませんので、今回の場合は
微妙にニーズとマッチしないかも。
TimeDiff() も使いどころにハマれば便利な関数だと思いますので、
機会があればご利用ください。

この回答への補足

ありがとうございます。
思ったより簡単な式で何とかなるのですね！
驚きです。

なのですが、もうひとつ教えて頂きたいことが…

テキストA（終了時間) = ([終了時間１]-([終了時間１]<[開始時間１]))*24
ここには26時と表示されるのですが、

もうひとつ[開始時間２][終了時間２]という項目があって、

テキストB（開始時間) = ([開始時間２]-([開始時間２]<[テキストA(終了時間)])*24

という風にするとすべてに24が足されてしまいます。

つまり
終了時間１が２２時の場合テキストA(終了時間)には２２と表示され、
開始時間２が２３の場合、そのまま２３と表示させたいところ、
この式だと４７となってしまうのです。

純粋にテーブルからデータを入れたテキストボックスを参照していないからかな？と思ったりするのですが、
何か解決策を教えていただければありがたいです。

補足日時：2009/03/26 21:58

No.4 回答者： fuuten_no_neko 回答日時： 2009/03/19 10:28

試してみました

Private Sub 時刻x_LostFocus()
Me.テキスト2 = Me.時刻x - Me.時刻
If Me.テキスト2 < 0 Then
Me.テキスト2 = Me.テキスト2 + 1
End If
End Sub
関数など使わずに済むみたいです。

この回答へのお礼

ありがとうございます。

できればプロパティのコントロールソースで何とかならないかな？
とは思っていましたが、
こういった方法もあるのですね。

今後の参考にしたいと思います。

お礼日時：2009/03/26 22:03

No.3 回答者： nda23 回答日時： 2009/03/19 09:23

>=iff([開始時間１]>[終了時間１],[終了時間１]+２４,[終了時間１]）

日付時刻型は内部は実数で、整数部分が日付（日単位）、小数部が
時刻を表しています。”[終了時間１]+２４”これは24日後を意味
します。単位別の計算はDateAddを使います。
http://msdn.microsoft.com/ja-jp/library/cc410235 …

ところで、「２時」が26時なのか、ただの2時なのかはどうやって
判定するんでしょう？日付の部分も必要なきがするんですが・・・

この回答へのお礼

ありがとうございました。
２時か26時かは左側と右側を比べて、
２２～２　←　２６時
１～２　　←　２時　
と判断しようと思っています

お礼日時：2009/03/26 22:01

No.2 回答者： kurodai2 回答日時： 2009/03/19 08:36

どううまく書かれないのか？内容が書いていないので

今されている事が解りませんが
If Me.開始時間1 > Me.終了時間1 Then
MsgBox (DatePart("h", Me.終了時間1) + 24)
End If
これは、フォームに開始時間1、終了時間1を時刻の書式で
入力させ、ボタンクリック時　お望みの　26と言う数値を
表示させた場合です。
参考になれば。

この回答へのお礼

ありがとうございます。

できればプロパティのコントロールソースで何とかならないかな？
とは思っていましたが、
こういった方法もあるのですね。

今後の参考にしたいと思います。

お礼日時：2009/03/26 22:04

No.1 回答者： bonaron 回答日時： 2009/03/17 18:54

こちらの Timediff 関数でご希望のことができると思います。

http://www.f3.dion.ne.jp/~element/msaccess/AcTip …

この回答へのお礼

ありがとうございます。

このページは私も見て、使えるかも！？
と思ったのですが、実際どのように書けばよいのかわかりませんでした。

たとえば
=iff([開始時間１]>[終了時間１],[終了時間１]+２４,[終了時間１]）

このような感じで考えたのですが、+２４をの部分にTimeDiffを使うのでしょうか？

お忙しいところ恐縮ですが、教えていただければ幸いです。

お礼日時：2009/03/17 23:04