Question

VB求助，如何实现让一个按钮点击一次执行一段程序，再点一次继续执行下一段。 请问格式怎么写，谢谢！

Answer 1

你可以设置一个public变量，例如：
public x as interger
x=0
sub YourProgram()
当第一次运行这个按钮时，你可以在第一段程序开始前给一个条件，if x=0 then。。。开始执行程序，执行结束后，令x=x+1,此时x=1了。
然后，你可以在在这段程序开始时加上一个 esleif x=1 then...执行第二段程序。
这样就能实现了。你试试看。

public x as interger
x=0
sub yourprogram()
if x=0 then
程序1
x=x+1
elseif x=1 then
程序2
x=x+1
end if
end sub
目前想到的就是这么思路。肯定是可以实现的。

Answer 2

Private Sub Command1_Click()
static a as integer
if a=0 then
Call 程序一
elseif a=1 then
Call 程序二
elseif a=2 then
Call 程序三
……
elseif a=某个最大值 then
a=0
end if
a=a+1
End Sub

function 程序一()
……
End Function
function 程序二()
……
End Function
function 程序三()
……
End Function