我不会做上一步，下一步。

Question

把 Frame 做为一个控件数组。

Answer 1

那我又如何调用呢？何况我现在是frame1,frame2....有人有办法吗?如果举例说明的话,我再给你20分.心情好的话再加20.

Answer 2

把你的frame的index改为相应的数就是控件数组了
然后在把名称改为一致的framecmdnext_Click
i=i+1
frame(i).visible = true
end subcmdprev_Click
i=i-1
frame(i).visible = true
end sub

Answer 3

把Frame控件重叠在一起dim curStep as integer
cmdNext_Click
 Select case curStep
    Case 1
      Frame1.Zorder 0
    Case 2
      Frame2.Zorder 0
    ...
 End Select
 curStep=curStep+1
end subcmdPrev_Click
 Select case curStep
    Case 1
      Frame1.Zorder 0
    Case 2
      Frame2.Zorder 0
    ...
 End Select
 curStep=curStep-1
end sub

Answer 4

对不起，改正如下
dim curStep as integer
cmdNext_Click
curStep=curStep+1
Select case curStep
    Case 1
      Frame1.Zorder 0
    Case 2
      Frame2.Zorder 0
    ...
End Select
end subcmdPrev_Click
curStep=curStep-1
Select case curStep
    Case 1
      Frame1.Zorder 0
    Case 2
      Frame2.Zorder 0
    ...
End Select
end sub

Answer 5

kingxing:你的方法不可取，因为我是多事件，打开窗口的次序是不一样的。ozw(沧浪客)：当再次点击cmdNext_Click后curStep值认为1，怎么解决？
并用你的方法有点复杂啊！~~~

Answer 6

用controls(data(i)）.visible=true  ‘data(i)为数组。
谢谢各位！~~
加分咯，人人有