VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/11/22(Wed) 11:24
投稿者： aki21c
Ｅメール：
ＵＲＬ：
タイトル： コントロール型の使用について

はじめて投稿します。
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

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -