はじめて投稿します。
aki21cです。

初歩的な話かもしれませんが、
使用項目が殆ど同じ２つのフォームを制御する場合、
以下のようにコントロール型で宣言して使用するのは
一般的ではないのでしょうか？

やはり文字型や整数型に比べてメモリを多く消費するのでしょうか？
あまり見かけたことが無いので、迷っています。

どなたか御教授いただけませんでしょうか。

＝宣言部＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Public g_ctlHogeCD As ComboBox
Public g_ctlHoge2CD As TextBox
Public g_ctlHoge2Name As ComboBox

＝フォーム内処理＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Form_Load()

    ' グローバルコントロール変数にセット
    Set g_ctlHogeCD = Me.cmbHoge
    Call SC_subSetForm
    Set g_ctlHogeCD = Nothing

End Sub

＝共通モジュール内処理＝＝＝＝＝＝＝＝＝＝＝＝＝
Public Sub SC_subSetForm()
Dim i As Integer
    
    For i = 0 to Ubound(arrHogeCD,2)
        g_ctlHogeCD.AddItem arrHoge(1,i) & vbNullString
        g_ctlHogeCD.ItemData(i) = Val(arrHoge(0,i))
        G_RST1.MoveNext
    Loop
    
End Sub

aki21c さん　こんにちは。

> 以下のようにコントロール型で宣言して使用するのは
> 一般的ではないのでしょうか？
１０個も２０個もあるならともかく、２〜３個なら、Subルーチンの引数に指定すればよさそうですが・・・


> やはり文字型や整数型に比べてメモリを多く消費するのでしょうか？

ヘルプ（MSDNライブラリ）の「データ型の概要」によれば、
「記憶領域のサイズ」は、
-------------------------------------------------------
文字列型 (String) (可変長) 10 バイト + 文字列の長さ
長整数型 (Long) 4 バイト
日付型 (Date) 8 バイト
-------------------------------------------------------

等で、コントロール型変数の様なObject型は、

-------------------------------------------------------
オブジェクト型 (Object) 4 バイト
-------------------------------------------------------

ですね。

大吉末吉さん、ありがとうございます。

> > 以下のようにコントロール型で宣言して使用するのは
> > 一般的ではないのでしょうか？
> １０個も２０個もあるならともかく、２〜３個なら、Subルーチンの引数に指定すればよさそうですが・・・

確かに、10個もないので引数に指定した方がよさそうですね。

>
> > やはり文字型や整数型に比べてメモリを多く消費するのでしょうか？
>
> ヘルプ（MSDNライブラリ）の「データ型の概要」によれば、
> 「記憶領域のサイズ」は、
> -------------------------------------------------------
> 文字列型 (String) (可変長) 10 バイト + 文字列の長さ
> 長整数型 (Long) 4 バイト
> 日付型 (Date) 8 バイト
> -------------------------------------------------------
>
> 等で、コントロール型変数の様なObject型は、
>
> -------------------------------------------------------
> オブジェクト型 (Object) 4 バイト
> -------------------------------------------------------

調べてくださってありがとうございます。
ありがとうございます。

それほどメモリを消費するわけではないのですね。
心配せず使用できそうです。

どうもありがとうございました。