有如下Visual Basic程序段，用于计算前n个自然数之和。程序划线处应填写的语句是（  ）
s =" 0:" i = 1
n = Val(Text1.Text)
Do While i < n
s =" s" + i
i =" i" + 1
 
Label1.Caption = Str(s)

A．Loop	B．Next i
C．End If	D．End Sub

下面程序执行的结果是（  ）
Private Sub Form_Load()
A="123":B="456"
C=Val(A)+Val(B)
Print C\100
End Sub

A．123

B．3

C．5

D．579

生活中，许多女士喜欢穿高跟鞋，那穿高跟鞋会使人感到美吗？黄金分割能解释这个问题。人体躯干与身高比例的黄金分割点是肚脐。换句话说，这一比值越接近0.618，愈给人美之感。现按要求编写“高跟鞋的最佳之选”的VB程序（界面如下图所示），实现如下功能：首先，设某女躯干a米和身高b米，分别从文本框Text1和Text2中输入，比值为g。鞋跟高度为s（单位与 a、b 一致），那么比值g=（a+s）/（b+s），如果g=0.618，那么鞋跟高度S的值就是最佳高度,所以最佳的鞋跟高度s=(0.618b-a)/0.382,设计程序计算最佳鞋跟高度的程序。

（1）应用程序界面设计时，为了显示s的值，在窗体中添加了 控件，一般需将它的  属性值设置为空。
（2）图中的人物是通过设置Image1对象的  属性,将外部图像文件添加进去的。
（3）请根据题意将下列程序补充完整。
Private Sub Command1_Click（）
Dim a As Single, b As Single，s As Single
a = Val（Text1.Text）
b = ①    
②
Label4.caption=str(s)
End Sub

   数字频率统计：小王编写 VB 程序，实现如下功能：在文本框中输入一串任意字符串（含数字），单击“统计”按钮 Command1，在列表框 List1 中统计并输出数字 0~9 出现的次数。运行界面如图所示，VB 程序代码如下。

 

（1）根据代码可知，文本框对象的名称为________________________。
（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim a(0 To 9) As Integer, s As String Dim k As String, i As Integer
s = Tabc.Text
List1.Clear
For i = 1 To Len(s)
_____①
If k >= "0" And k <= "9" Then
_____②
S=k+s
End If
Next i
For i = 0 To 9
List1.AddItem Str(i) & "出现了:" & a(i) & "次"
Next i
End Sub
（3）如果输入的是“hello 8102!” ,执行完以上程序后，变量S的值为________

有下列 VB 程序段：
Dim strA As String, strB As String strA = "hongda"：strB = ""
For i = 1 To Len(strA) * 2 If i / 2 = Int(i / 2) Then

strB = strB + Chr(Asc(Mid(strA, (i - 1) Mod Len(strA) + 1, 1)) + 2) End If

Next i
该程序段运行后，变量 strB 的值是（ ）

A．"jpfqic "

B．"qicqic"

C．"phbqic"

D．"qicoga"