填空题

编程实现加法运算，在两个文本框中输入加数，用标签表示结果，单击按钮进行计算，完成下列计算过程。
Private Sub Command1_Click()
Dim AAs Integer,B As Integer
A= (6)
B=Val(Text2.Text)
(7) =A+B
End Sub

【参考答案】

Val(Text1.Text)

<上一题目录下一题>

热门试题

单项选择题

下列程序的执行结果是( )。 Privaae Sub Form_Activate Dim score(3)As Integer,total As Integer Dim aa_score As Variant score(1)=50:score(2)=14:score(3)=36 total=0:i=0 For Each aa_score In score i=i+1 total=total+aa_score Print i,aa_score,total Next End Sub

A．1 0 0 2 50 50 3 14 64 4 36 100
B．1 50 50 2 14 64 3 36 100
C．0 50 50 1 14 64 2 36 100 3 36 100
D．0 0 0 1 50 50 2 14 64

单项选择题

设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text= Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer，_ Shift As Integer,X As Single,Y As Single) Print 程序设计 End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Visual Basic ; End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗本上显示的内容是( )。

A．Visual Basic
B．程序设计
C．Visual Basic程序设计
D．a程序设计

相关试题