Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

281 / 9994

←次へ　｜　前へ→


	【13027】標準モジュールからフォームのトグルボタンのキャプションを変更したい

りょうりょう - 16/6/2(木) 15:01 -


	引用なし

	パスワード

初めまして。
アクセス2010を始めて1年ほどの初心者です。
よろしくお願いします。

１４個のトグルボタンのキャプションを押したときに、(6/02木)から→(休み)
のようにキャプションを切り替えたい。（ボタン色･テキスト色）
個別にコードを書くとゴミゴミしてみづらいので各ボタン共通で使えるよう標準モジュールに書いてみようとしたのですが、上手く行きません。
各HPを調べて見ましたが、
例）
Sub test1()
　　MsgBox "こんにちは"
End Sub
メッセージボックスでの表示は簡単に実行できるのですが、フォーム上のボタンに行おうと思うと上手く行かず、行き詰まってしまいました・・・。
文字を出すという基本的な事でつまづき恥ずかしいのですが、

Sub Cap(ByVal Test As String)
If Test = "0" Then
　 Form1.トグルボタン1.Caption = "休み"
End If
End Sub

おわかりになる方、ヒントを頂けますでしょうか。
どうぞよろしくお願いいたします。

134 hits

▼

【13027】標準モジュールからフォームのトグルボタンのキャプションを変更したい りょうりょう 16/6/2(木) 15:01