vb static
Private Sub fun()
Static a As Integer
A=a+1
Print a;
End Sub
Private Sub Command1_Click()
Dim m As Integer
For m=1 To 3
Call fun
Next m
End Sub
最后结果是1 2 3
但其中不是有Static a As Integer吗
它的意思不是代表每次调用fun()都是因为Static这个而使a的初值为0吗？这样就应该是1 1 1 了啊
static只是第一次初始化时使a为0
后面a的值就不是0，而是一直保存着了
第一次a=1
保留到下次a=a+1=1+1=2
同理第三次为3
Dim X
Private Sub Form_Click()
X = 2
For K = 3 To 5
AB
s = s + X
Next K
Print s
End Sub
Private Sub AB()
Dim X
X = X + 2
End Sub
根据这个看又好像是dim才是每次调用AB()都是因为dim这个而使x的初值为0
到底是dim还是static每次被调用时使其函数内的变量的初值为0呢
LZ:你的理解是错误的:
Static 语句
在过程级别中使用，用于声明变量并分配存储空间。在整个代码运行期间都能保留使用 Static 语句声明的变量的值。
说明
模块的代码开始运行后，使用 Static 语句声明的变量会一直保持其值，直至该模块复位或重新启动。可以在非静态的过程中使用 Static 语句显式声明只在该过程内可见，但具有与包含该过程定义的模块相同生命期的变量。
理解变量的范
相关问答：
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
用什么？
VB自己好像有画图函数吧,另外VB也是可以用API的,而且很方便
引用
VB自己好像有画图函数吧,另外VB也是可以用API的,而且很方便
为什么vc没有自己的画图函数？
引用
引用 1 楼 wltg2001 � ......
pow(x+sqrt(x*x+1),1.0/3) (x+sqrt(x*x+1))^1.0/3
上面这两个中哪个是对的啊还是都可以 还有其中的1.0是必须用1.0? 可不可以用1啊
sqr是函数，sqrt和pow想必是自定义函数，不� ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
