我的程序中有如下一段程序
Dim ltx1(),ltx2(),ltx3(),ltx4(),ltx5() As String
ltx1 = Vars("第一列题型").Split(",")
ltx2 = Vars("第二列题型").Split(",")
ltx3 = Vars("第三列题型").Split(",")
ltx4 = Vars("第四列题型").Split(",")
ltx5 = Vars("第五列题型").Split(",")
后面一段程序中多次用到 ltx5
如:Dim n As Integer = ltx5.length
Ltx5(i) =”abc”
现在我想根据条件判断,将那段程序中的 ltx5 自动替换成 ltx1,ltx2,ltx3,ltx4,或ltx5
如 Vars(”列数”)可能为 1,2,3,4,5 中的一个
那段程序中的ltx5 自动替换为 ltx1,ltx2,ltx3,ltx4,ltx5
应当如何写程序比较好
谢谢老师