Private Sub Command1_Click()

Dim a As Integer, b As Integer

a =5

b = Val(Text1.Text)

b = a + b

label1.Caption = Str(b)

End Sub

①工程文件是“工程1 .vbp”   ②将text属性值删除，图中①处将不会显示“text1”  ③该窗体中共有3个对象     ④窗体名称是“整除问题”

小明编写了一个VB程序来计算e的近似值，功能为在文本框Text1中输入公式n值，单击“计算”命令按钮Commong1，在标签Label2中显示计算结果，程序运行界面如图所示。

绘制函数图象y=x²的VB源代码如下，请补充完整。

以上的VB计算机语言是{#blank#}3{#/blank#}语言。（已知计算机语言有：机器语言、汇编语言、高级语言）

例如，节目人数为 6 时队形变化情况如下：

小嘉为此编写了一个 VB 程序，功能如下：在文本框 Text1 中输入跳舞的同学 n（n 为偶数），单击“队形

变化”按钮 Command1，在列表框 list1 中输出每次变化后的队形。程序代码如下，运行效果如图所示。

Private Sub Command1_Click() Dim a(1 To 20) As String

Dim result As String, t As String

Dim n As Integer, i As Integer, j As Integer n = Val(Text1.Text)

For i = 1 To n

    ①    

Next i

For i = 1 To

result = " "

List1.AddItem "第" & Str(i) & "次：" For j = 1 To n \ 2

result = a(j) + " " +   a(n – j + 1 ) List1.AddItem result

Next j

    ②    

For j = n To 3 Step -1 a(j) = a(j - 1)

Next j

a(2) = temp

Next i End Sub

请回答下列问题：