Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1140 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8612】テキストボックスのデータの有無の判定 平 06/9/19(火) 17:47 質問[未読]
【8613】Re:テキストボックスのデータの有無の判定 雅 06/9/19(火) 23:37 回答[未読]
【8614】Re:テキストボックスのデータの有無の判定 平 06/9/20(水) 8:44 お礼[未読]
【8615】Re:テキストボックスのデータの有無の判定 雅 06/9/20(水) 9:08 発言[未読]
【8617】Re:テキストボックスのデータの有無の判定 平 06/9/20(水) 17:52 お礼[未読]
【8612】テキストボックスのデータの有無の判定
質問  平  - 06/9/19(火) 17:47 -
引用なし
パスワード
   お世話になります。

テキストボックスに何らかの文字・数字が入力されているかどうかを
判定する為に

　If Len(Me.txtbx1) > 0 Then
　　・
　　・
　　・
　End If

と組みました。この方法で文字列に関しては問題なく判定するのですが
日付が入ったテキストボックスだけは認識しません（データ無しのまま）

データ形式に関わらず、全てのものを判別するにはどのように
すれば宜しいのでしょうか？

以上、宜しくお願い致します。
【8613】Re:テキストボックスのデータの有無の判定
回答  雅  - 06/9/19(火) 23:37 -
引用なし
パスワード
   こんばんわ。雅です。

>　If Len(Me.txtbx1) > 0 Then
>　　・
>　　・
>　　・
>　End If
>
>と組みました。この方法で文字列に関しては問題なく判定するのですが
>日付が入ったテキストボックスだけは認識しません（データ無しのまま）
>
>データ形式に関わらず、全てのものを判別するにはどのように
>すれば宜しいのでしょうか？

If IsNull(Me.txtbx1) = False Then
とかだとどうですか？

でわ。
【8614】Re:テキストボックスのデータの有無の判定
お礼  平  - 06/9/20(水) 8:44 -
引用なし
パスワード
   雅さん

ご回答ありがとうございます。
試してみましたが、やはりできませんでした。
と言うより、こちらの処理方法ではできないようです。

現状、日付はカレンダーコントロールをクリックした時に
その日付の値をコントロールに渡すようにしているのですが（下記）

　Forms!見積!txtbx1 = Me.カレンダー.Value

これで取得してもtxtbx1_Change()のイベントでは認識されないようです。
（値が入力された後でテキストボックスの日付を変更すると認識されました）

ですので、データの有無で判定するのではなく、カレンダーコントロールで
値を得る時にデータ有の処理をする方が楽そうですので、それで
組んでみます。

お手間を取らせてしまい、申し訳ありませんでした。
【8615】Re:テキストボックスのデータの有無の判定
発言  雅  - 06/9/20(水) 9:08 -
引用なし
パスワード
   おはようございます。雅です。

>　Forms!見積!txtbx1 = Me.カレンダー.Value
>
>これで取得してもtxtbx1_Change()のイベントでは認識されないようです。
>（値が入力された後でテキストボックスの日付を変更すると認識されました）

Changeイベントを発生させたいのでしょうか？
それとも、Changeイベントで判定させたいのでしょうか？
Changeイベントを発生させたいのであれば
Forms![見積]![txtbx1].SetFocus
Forms![見積]![txtbx1].Text = なんか
Changeイベントだ値が入っているか確認したいときは
If Len(Me![txtbx1].Text) > 0 Then
とします。

でわ。
【8617】Re:テキストボックスのデータの有無の判定
お礼  平  - 06/9/20(水) 17:52 -
引用なし
パスワード
   ▼雅 さん：
>Changeイベントを発生させたいのでしょうか？
>それとも、Changeイベントで判定させたいのでしょうか？

Changeイベントで判定させようとしていました。
とりあえず、他の方法で何とかそれらしい動きを
させる事ができましたので、一応解決しました。

ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1140 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1081097
(SS)C-BOARD v3.8 is Free