tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル プロシージャについて
投稿日: 2009/10/14(Wed) 12:43
投稿者むむむ
こんにちわ。下記のような無駄なことを防ぐ方法を教えてください。とても基本的なことかもしれないのですが、調べ方が悪いのか一向に分かりません。

例えば
<標準モジュール>
Sub ABC_000
    ....
End sub
     :
Sub ABC_999
    ....
End Sub

と、プロシージャが1000個あるとして、メインフォームのボタンBtn(0 to 100)からインデックスによってそれぞれをコールしたい時に、

<メインフォーム>
Sub Btn_Click(Index as Integer)
    Select Case Index
        Case 0: Call ABC_000
        Case 1: Call ABC_001
                  :
        Case 999: Call ABC_999
    End Select
End sub

という無駄な方法以外で何かないでしょうか?
例えば

Sub Btn_Click(Index as Integer)
    Dim Obj as xxx
    
    Set Obj = "ABC_" & Index
    Call Obj
End sub

みたいな・・・
プロシージャABC内部で Index によって Select する方法はなしと考えてください。ひとつひとつのプロシージャが大きいものですから・・・

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。