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 语句显式声明只在该过程内可见，但具有与包含该过程定义的模块相同生命期的变量。
理解变量的范
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
form1 中，我在Text1里输入1111111111
Dim str1 As String
Private Sub Command1_Click()
str1 = Me.Text1.Text
Combo1.AddItem str1
End Sub
点Command1，就写到Combo1的 下拉菜单里去了 ......
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中有个变量str=0.00016如何计算让它变成是1.6*10的4次方
还有个问题是关于数据库查询的
在ACCESS中如何查询时，判断字段1是否为空如果是则查询字段2
在SQL中应该是select case 字段1 isn ......
我有自动生成序列号的程序，但是怎么跟打包后的安装程序结合在一起，在安装时提示用户输入序列号，正确后再继续安装？？？
方法1：你可以在运行程序后输入序列号注册，很多软件都是这样的。
方法2：使用Setu ......
