Question

1、在窗体中有一个命令按钮command1和一个文本框text1,编写事件代码如下：

Private sub command1_click()
For i=1 to 4
x=3
For j=1 to 3
For k=1 to 2
x=x+3
Next k
Next j
Next i
Text1.value=str(x)
End sub
打开窗体运行后，单击命令按钮，文本框text1输出的结果是（ ）

Answer 1

要加两个。。一个是LOAD初使化FORM的时候。一个是在FORM大小改变的时候。

Private Sub Form_Load()‘LOAD初使化FORM
Command1.Left = Me.Width / 2 - Command1.Width / 2
Command1.Top = Me.Height / 2 - Command1.Height / 2 - 400
End Sub

Private Sub Form_Resize()’FORM大小改变
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
End Sub

要么人久写一个过程。去调用。

public sub Command_center()
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
end sub

在加载和改变大小过程里调用 Command_center()
另外,站长团上有产品团购,便宜有保证

Answer 2

上述程序中，Text1.value=str(x)不正确，应改成Text1.text=str(x)，运行结果为21

追问

你们都是NB人物，我啥都看不懂...

Answer 3

21