我想要動態的Call共約60的不同SUB(),但因為若用
If Then 或Selec Case..End Case會使程式太冗長‧
我想把Sub()的Name放在String之中,然後轉換為
Sub()的Name,例如:
Dim sName(1 to 60) as string
Dim SubName as string
sName(1)="showSub1"
SubName=sName(1) & "()"
Call SubName <===在這裡,請問高手們,
該如何將SubName"取值",以便呼叫showSub1()
----------------------------------
Private showSub1()

  ‧
End Sub

arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(2) 人氣()