Private Sub Form_Load()
10 T = 0: S = 0
20 READ X
30 If X = 0 Then GoTo 80
40 If X > 0 Then T = T + X Else S = S + X
50 GoTo 20
60 Data 1023, -575, -329, 984, 127, -98, 352
70 Data -603, -25, -85, 424, 359, 568, 0
80 Print "t="; T, "S="; S, "t+s="; T = S
End Sub
初学VB也没人教看的书上的,这段是:
10 T = 0: S = 0
20 READ X
30 If X = 0 Then GoTo 80
40 If X > 0 Then T = T + X Else S = S + X
50 GoTo 20
60 Data 1023, -575, -329, 984, 127, -98, 352
70 Data -603, -25, -85, 424, 359, 568, 0
80 Print "t="; T, "S="; S, "t+s="; T = S
这两句是VB新建工程就有了的:
Private Sub Form_Load()
End Sub
我把上一段加到VB那两句的中间运行想先看看效果是什么,可是提示子程序和函数没定义,不知道这是什么?本人对编程一点也不懂,请知道的给个教程或者说说是怎么回事好吗。谢谢!
[课程]FART 脱壳王!加量不加价!FART作者讲授!