
No.4ベストアンサー
- 回答日時:
>test(form1.Text1.Text)
>
>Public Function test(コントロール変数パラメータ)
>
>コントロール変数パラメータ=値を代入
>
>End Fuction
可能ですよ。サンプルです。試してみてください。
まず、フォームと標準モジュールを準備してください。
フォーム:
Form[Form1]にTextbox[Text1]とCommandButton[Command1]を配置してください。
([]内は、オブジェクト名です。)
Private Sub Command1_Click()
Call test(Text1)
End Sub
標準モジュール:
Public Function test(txt As TextBox)
txt.Text = "aaa"
End Function
CommandButtonを押すと、Textboxに”aaa”と表示されます。
※Public Function test(txt As ****)の****は、
「Textbox」又は「Object」又は「Control」 いずれでもOKです。
例:
Public Function test(txt As Textbox)
Public Function test(txt As Object)
Public Function test(txt As Control)
この辺りは、人それぞれになると思いますが・・・。
遅れてすみませんでした。
おかげさまで、VB初心者ながら、よい開発が出来たと思います。本当によい経験をしたと思っています。助かりました。ありがとうございました。
No.3
- 回答日時:
#2の方の答えでほぼパーフェクトなんですが、助言です。
標準モジュール内に作成した、Public宣言されているプロシージャでの処理に
必要となる値を入手したい、ということならば、
フォームモジュール内のオブジェクトの値を直接見に行くのではなく、
プロシージャを呼び出すときに、引数として呼び出し側から明示的に渡しましょう。
#2の方も触れていますが、もしLoadされていないフォームの中の値を参照しようとすると、
フォームは暗黙的にLoad、つまり起動してしまいます。
これに気がつかないでいて、あとあとバグの原因になってしまうことも少なくないです。
異なるモジュール間での値のやり取りは、きちんと入り口と出口を定めて、
決められたルールの中で限定的に行うべきです。
こうしておかないと、絶対管理できなくなってしまいます。
あとあとソースを追って・・・ということが難しくなるわけですね。
特に第3者には。
という助言でした。
この回答への補足
ご教授ありがとうございます。
今回の質問と路線はずれますが、コントロール系の変数名をpublic関数等にパラメータを渡して、その取得パラメータでコントロール系の変数を参照するにはどうすればよいのでしょうか?
例)
test(form1.Text1.Text)
Public Function test(コントロール変数パラメータ)
コントロール変数パラメータ=値を代入
End Fuction
これが可能であればかなり処理は楽なのですが・・・
ど素人ながらの質問です。
No.2
- 回答日時:
先の回答でTextboxにCaptionプロパティはありませんのでTextプロパティが正解です。
標準モジュールだけでなく別のFromから参照する場合もフォーム名に!(或いは.)を前に付けてやれば参照できます。(但しLoadされていないフォームのオブジェクトを参照するとLoadされますが・・)
From1!TEXT1.TEXT 或いは Form1.TEXT1.TEXT
でいいのでは
No.1
- 回答日時:
明示的にNew等で作られていないFormは、暗黙的にフォーム名と同じ名前でオブジェクトが作成されています。
Form1というフォームのText1というテキストボックスのCaptionプロパティを参照したい場合は、
Form1.Text1.Caption
という記述になります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
標準モジュールからフォームをコントロールしたい
Visual Basic(VBA)
-
Excel VBAで、ユーザーフォームの値を、モジュールで使用したい。
Visual Basic(VBA)
-
Access VBA標準モジュールについてです。
Access(アクセス)
-
-
4
access テキストボックスの値取得
Access(アクセス)
-
5
TextBoxコントロールを引数として渡すには?
その他(教育・科学・学問)
-
6
アクセスVBAのMe!と[ ]
Access(アクセス)
-
7
Access サブフォームでの選択行の取得
その他(データベース)
-
8
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
9
Accessで、フォームからフォームへ値を引き継ぐやり方
Access(アクセス)
-
10
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
11
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
12
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
13
Access 最後のレコードに到達するまでループ処理を行う方法
Access(アクセス)
-
14
VBAです。ユーザーフォームの表示させ、標準モジュールを読み込ませる方法について
Visual Basic(VBA)
-
15
テキストボックスの値を変数に代入したい。
Visual Basic(VBA)
-
16
アクセス VBAについて FROM句の構文エラー
Access(アクセス)
-
17
Accessでフォームから別フォームのテキストボックスの値を設定する
Visual Basic(VBA)
-
18
EXCEL VBAのユーザーフォームに引数を渡す方法について
Excel(エクセル)
-
19
どこにもフォーカスを当てたくない
Access(アクセス)
-
20
VBAで別モジュールへの変数の受け渡し方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ユーザーフォームのテキストボ...
-
ユーザーフォームを表示中にシ...
-
ユーザーフォーム上に現在日時...
-
タスクバーにフォーム名を表示...
-
ExcelVBAのユーザーフォームの...
-
C++Builder 6でフォームを表示...
-
モーダルフォームとモードレス...
-
テキストボックスの番号の取得
-
クリックイベントなのに、2回ク...
-
コントロールの存在確認
-
【VBAユーザーフォームで閉じる...
-
ユーザーフォームをWorkSheet(1...
-
アクセス2013 フォームが...
-
フォームのテキストボックスな...
-
クリックするたびに、フォーム...
-
ACCESSのフォーム、開くんです...
-
Form_Load と Form_Activate の...
-
VBA コンボボックスとテキスト...
-
ユーザーフォームのラベルに時...
-
VBA(エクセル)のユーザー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ユーザーフォームを表示中にシ...
-
モーダルフォームとモードレス...
-
Form_Load と Form_Activate の...
-
ユーザーフォームのテキストボ...
-
ExcelVBAのユーザーフォームの...
-
【VBAユーザーフォームで閉じる...
-
Excelにて、ユーザーフォームで...
-
フォームウィンドウを最前面に...
-
Hideについて(.NET)
-
クリックイベントなのに、2回ク...
-
ユーザーフォーム上に現在日時...
-
ACCESSのフォーム、開くんです...
-
エクセルVBAのフォームを最...
-
MSGBOXのフォント大きさ変更
-
VBAでユーザーフォームを再表示...
-
VBA コンボボックスとテキスト...
-
コントロールの存在確認
-
フォームのテキストボックスな...
-
VBAのテキストフォームの折り返...
-
VBA(エクセル)のユーザー...
おすすめ情報