具体如下:
1、第一个程序是可以执行的，只是必须把j设为全局变量或静态变量，下面是静态变量的方法：
PrivateSubTimer1_Timer()
StaticjAsInteger
Form1.Caption=Space(20-j)&"查找与替换例"
j=(j+1)Mod20
EndSub你自己搞的那个从思路和语法上都是完全错了，而且错得非常离谱，错到姥姥家了！
2、仅从语法上来看，应该这么改：
PrivateSubTimer1_Timer()
IfMe.ScaleLeft<6000Then
Form1.Caption=""+Form1.Caption
ElseIfMe.ScaleLeft>=6000Then
Form1.Caption="查找与替换例"
EndIf
内容全部来源于网络收集，如有侵权，请联系网站删除！