Access VBA質問箱 IV

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

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


2120 / 2272 ツリー ←次へ | 前へ→

【3826】サブフォームへの移動 rin 04/11/8(月) 20:15 質問[未読]
【3849】Re:サブフォームへの移動 ひろしま 04/11/12(金) 12:37 回答[未読]
【3850】Re:サブフォームへの移動 ひろしま 04/11/12(金) 12:41 回答[未読]

【3826】サブフォームへの移動
質問  rin  - 04/11/8(月) 20:15 -

引用なし
パスワード
   親フォームAでサブフォームB・Cを2つのRequeryで表示できるようにしているのですが、元々のフォームC(サブフォームの1つ)ではコマンドで別のフォームDから検索してテキストに入力できるようVBA[Forms!予約時!他病院名 = Me!リストB.Column(0) ]をしているのですが、このフォームCを親フォームAから読み込みサブフォームCから別のフォームDから検索して入力してもエラーがでます。
誰か助けて下さい(?_?)

【3849】Re:サブフォームへの移動
回答  ひろしま  - 04/11/12(金) 12:37 -

引用なし
パスワード
   すみません。今会社なのでしっかりした説明ができませんので、一応例をあげておきます。
Dim i as long'サブフォームデータ数
i=Froms("メインフォーム")("サブフォーム").form.recordset.recordcount
msgbox "現在サブフォームのデータ数は" & i & "件です。"

サブフォーム名のあとに.formがないと、そのテキストボックスやタブには移動できません。
今のところ説明は以上です。

【3850】Re:サブフォームへの移動
回答  ひろしま  - 04/11/12(金) 12:41 -

引用なし
パスワード
   ▼ひろしま さん:
>すみません。今会社なのでしっかりした説明ができませんので、一応例をあげておきます。
>Dim i as long'サブフォームデータ数
>i=Froms("メインフォーム")("サブフォーム").form.recordset.recordcount
>msgbox "現在サブフォームのデータ数は" & i & "件です。"
>
>サブフォーム名のあとに.formがないと、そのテキストボックスやタブには移動できません。
>今のところ説明は以上です。

すみません。回答した人からです。
Froms⇒Forms です。申し訳ありません。

2120 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078269
(SS)C-BOARD v3.8 is Free