よろしくお願いします。
Access2000です。初級者ですが、多少モジュールがわかります。
現在の状況
フォームでメニュー画面があります。
コマンドボタンを使い、押すとIDを聞かれるようにしています。
クエリーでそうしています。
で、IDを入力すると該当するレコードのレポート画面が表示されます。その画面は顧客名と入金額が表示されるようになっています。
お聞きしたいのはここからです。
入金額のテキストボックスの大きさを変えるようにしたいのです。
IDを聞かれて入力した後に、大きさを聞かれるようにして、
例えば"1"と入力すると金額のテキストボックスが3cmで表示され、
"2"と入力すると4cmという具合に。
可能でしょうか。お助けください。
説明が足りなければ補足いたします。
No.1ベストアンサー
- 回答日時:
VBAで長さを取り扱う場合、twipという単位を使います。
1cm = 567twip です。
レポートの「開く時」のイベントで InputBox関数を使ってみました。
Private Sub Report_Open(Cancel As Integer)
Dim strWidth As String
Do While True
strWidth = InputBox("大きさを入力してください", "サイズ指定")
Select Case strWidth
Case "" 'キャンセルまたは未入力は変更せず開く
Exit Do
Case "1" '3cm
Me.入金額.Width = 567 * 3
Exit Do
Case "2" '4cm
Me.入金額.Width = 567 * 4
Exit Do
' ・・・ '以下同様に
Case Else 'それ以外は再入力
MsgBox "大きさが不正です", vbExclamation, "サイズ指定"
End Select
Loop
End Sub
この回答への補足
Me.の部分でエラーになってしまい、折角教えていただいたのに自分の実力不足が情けないです。また、一難去ってまた一難という状況で、今度は違う質問をたてることになりました。なので、別件なので私の質問を見ても、気を悪くなさらないでくださいね。ありがとうございました。
補足日時:2005/12/21 13:40お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access IF文でテーブルに存在しない場合の処理について 2 2022/10/10 18:09
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- Access(アクセス) Dlookupにエラーがでてしまう 1 2022/10/31 14:35
- Visual Basic(VBA) Excel VBAのリストボックスの値を他のフォームに反映させる方法を教えてください。 2 2023/07/14 14:06
- Access(アクセス) capeofdragonと申します。 Access2016を使っております。 あるフォームがあり、テ 2 2022/09/09 13:18
- HTML・CSS ボタンをクリックした時に、入力フォームのすぐ下部に、「入力欄が空白です」というテキストメッセージが表 1 2022/04/27 16:25
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- JavaScript [Java] Edgeでのアドレスバー非表示について 3 2022/04/20 17:51
- JavaScript 入力フォームの javascript で メールアドレスの正規チェックをを行い、ボタンをクリックして 2 2022/04/27 16:06
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
データベースのINT型項目にNULL...
-
passwordが入れられません・・・・
-
アクセスで数値型のフィールド...
-
sqlldrの使用方法について
-
日付のテキストボックスに(例...
-
フォームで入力しても反映されない
-
エクセル 自動入力
-
Accessで小数の入力について
-
Access(office)のマクロの「値...
-
ACCESS2000にて「うるう年」の...
-
MA ACCESSデータベースに詳しい...
-
アクセスのテキストボックスの...
-
Accessフォームのコントロール...
-
入力規則違反-任意のエラーメ...
-
このオブジェクトに値を代入す...
-
ファイルメーカー 一ヵ月後の...
-
ファイルメーカー:フィールド...
-
Access2000VBAでEscキーを禁止!
-
Access2007、フォームのテキス...
-
PostgreSQLでのクエリ登録
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
passwordが入れられません・・・・
-
データベースのINT型項目にNULL...
-
アクセスで数値型のフィールド...
-
フォームで入力しても反映されない
-
Access(office)のマクロの「値...
-
Excelで入力したデータを自動的...
-
日付のテキストボックスに(例...
-
Access2007 textboxに入力でき...
-
このオブジェクトに値を代入す...
-
アクセスのテキストボックスの...
-
ファイルメーカー 一ヵ月後の...
-
ユーザーフォームで数字にカン...
-
sqlldrの使用方法について
-
ACCESS 時間の入力方法
-
入力規則違反-任意のエラーメ...
-
Access2007、フォームのテキス...
-
Accessで主キーの最終番号を取...
-
ファイルメーカで経過月数を出...
-
Accessで所要時間の足し算
-
Accessのパラメータクエリに入...
おすすめ情報