vbPrivate Sub Command1_Click()

Private Sub Command1_Click()
Static X As Integer
Static Y As Integer
Cls
Y = 1
Y = Y + 5
X = 5 + X
Print X, Y
End Sub
为什么答案是15 6,求解释

static是定义静态变量。
相对的,如果用“dim”定义的就是动态变量。
如果是定义静态变量的话,当事件结束后,变量的值依然是保存了过程结束时的值。
我试过了,第一次点击,出来的是5,6;第二次点击,出来的是10,6;第三次才是15,6追问

我就是不明白具体的,为什么会是15.6,,,这个过程是怎么出来的??就是它的运算过程~~

追答

Y不用说吧,每次都重新赋值Y = 1,所以Y都是6,X初始时默认0,第一次点击=5,第2次点击时,因为是静态变量,上次事件结束后的值作为初始值参与计算,所以是10,同理,第3次是15

温馨提示:内容为网友见解,仅供参考
第1个回答  2014-05-25
那个下划线(也就是“横”)左边的是控件名(Command1),右边的是事件(Click),括号里包含的是参数(空白就表示没有参数)。
整个的意思就是:当你用鼠标点击名为Command1的按钮时,就执行这一行下面的多行代码,直到遇到End Sub结束
这样可以么?追问

我想知道具体的xy的数值出来的过程,,我觉得是x=5.y=6

第2个回答  2014-05-25
Static Y As Integer 我知道这个答案是假的,真的我不知道。追问

答案对啊,,我有vb测验过了

VB里的“Private Sub Command1_Click()”是什么意思?
意思就是:当你用鼠标点击名为Command1的按钮时,就执行这一行下面的多行代码,直到遇到End Sub结束。那个下划线(也就是“横”)左边的是控件名(Command1),右边的是事件(Click),括号里包含的是参数(空白就表示没有参数)。

private sub command1_click ()是什么意思
这是bv里的语句吧。意思是当前对command1按钮操作,事件为鼠标左键单击。

某Visual Basic程序如下: Private Sub Command1_Click()
说单击 command1了,所以 不会是command1 .这里只用到了两个对象

...vb编程 以下程序的运行结果是 private sub command1_click...
Private Sub command1_click()For i = 1 To 10 GetValue iNext iPrint GetValue(i)End SubPrivate Function GetValue(ByVal a As Integer)Static s As Integers = s + aGetValue = sEnd Function'因为s是静态变量,所以每次执行完后s的值会保留'当i=1 时,调用 GetValue i ,s的值...

VB问题Private Sub Command1_Click()
用以下代码即可。 Private Sub Command1_Click() If Combo1.ListIndex Then List1.AddItem Combo1.List(Combo1.ListIndex) End If End Sub 另外Combo1是没有Selected(i)属性的,可以使用Combo1.ListIndex来表示当前选择的项索引; 因Combo1是控件名,所以Combo1(i)是用来表示控件数组的,Combo1(...

...常见的是这种格式private sub command1_click(),括号里面什么都没有...
因为按钮数组,所有的按钮触发的事件都是一样的,所以它就要传一个Index(按钮是第几个号)来表示具体是哪个按钮触发的。这个也有由不同控件和事件决定,例如Command_MouseDown的内容与Command_Click也不一样,因为不同的事件要传递的信息不同,不仅仅担负一个“现在触发了这个事件”的任务 ...

VB编程中 Private Sub Cmd1_Click()是什么意思?
cmd是一个控件名称,这里应该是命令按钮。click是单击鼠标左键。Private Sub Cmd1_Click()整体就是当你用鼠标点击这个按钮时应该执行的程序。Lab2.Caption=t1+t2 中。lab2是标签控件,用于显示信息。这里的caption属性表示显示的内容。后面赋值为t1+t2 ,实际上就是把t1+t2 的和显示出来。

Private Sub Command1_Click()
Private Sub command1_click() '点击按钮command1产生的事件 Dim a(25), b(25), c(25) '声明一维数组a,b,c下标为(0-25)X1 = Replace(Text1.Text, " ", "") 'X1等于文本框Text1的去掉空格后的字符 X2 = Replace(Text2.Text, " ", "") 'X2等于文本框Text2的去掉空...

vb中调式中光标出现在Private Sub Command1_Click()什么意思
Private Sub Command1_Click()要么你设置了断点?要么这短代码有问题?

...Basic程序如下: Private Sub Command1_Click() Dim i As Integer...
选择D 提示的错误为“要求对象”在ABCD中只有D中涉及到对象名为text1的文本框

相似回答