如果有几百个：
  If ..... Then
   ...........
   ...........
   End If
放在Command1下会因为行数太多无法通过，应当怎么处理？是否可以建个模块放在里边？
下面是报错提示：


[ 本帖最后由 益西翁登 于 2013-9-13 10:19 编辑 ]

如果有几百个：
  If ..... Then
   ...........
   ...........
   End If
放在Command1下会太多无法通过，应当怎么处理？是否可以建个模块放在里边？
下面是报错提示：


[ 本帖最后由 益西翁登 于 2013-9-13 10:18 编辑 ]

下边只是弄了两年的，我想弄个两百年的，照这个方法根本行不通，请教各位老师如何优化，我想弄成数组或模块应当怎么弄？盼高手解答，谢谢！
If Combo1.Text = "1924" And Combo2.Text = "1" Then
   y(0).Caption = "8"
   y(1).Caption = "9"
   y(2).Caption = "1"
   y(3).Caption = "2"
   y(4).Caption = "3"
   y(5).Caption = "4"
   y(6).Caption = "5"
   y(7).Caption = "6"
   y(8).Caption = "7"
End If

[ 本帖最后由 益西翁登 于 2013-9-14 06:47 编辑 ]

谢谢风吹过b老师的解答，但我不想用调用文本的方式，盼望lowxiong老师给出代码答案，多谢二位老师！

多谢老师指导，非常感谢！