有如下VB程序段：
s=“Good Luck 2019!”
n=0：m=0：k=0
For i=1 To Len(s)

ch=Mid(s，i，1)

If ch >=”0”And ch<=”9” Then

m=m+1

Else If ch>="a” And ch<=”z” Then

n=n+1

Else

k=k+1

End If

Next i
执行该程序段后，变量k的值为( )

A．2

B．3

C．4

D．5

（加试题）小龙编写了一个简易加法器VB程序，运行界面如图所示。在文本框Text1中输入一个数字后再输入空格表示一个加数输入完毕，连续不断输入不同的加数，待所有需要相加的数输入完毕后，单击“求和”按钮Command1后，在标签label1中显示加数的个数以及总和。(数字0和空格的ASCII码分别为48、32)
实现上述功能的VB程序如下，但加框处代码有错，请改正。
Private Sub Command1_Click()
Dim a As String
Dim x As Integer, s As Integer, k As Integer
a = Text1.Text
x = 1: s = 0: k = 0
For i = 1 To Len(a)
'如果输入的不是0到9的数字或者空格，则给出错误提示后结束子程序
If (Asc(Mid(a, i, 1)) < 48 Or Asc(Mid(a, i,1)) > 57) or(Asc(Mid(a,i,1))= 32) then’①________ Label1.Caption = "只能输入数字或空格"
Exit Sub
End If
If Mid(a, i, 1) = " " Then
s = s + Mid(a,x,i)’②________
x = i + 1
k = k + 1
End If
Next i
Label1.Caption = "这" + Str(k) + "个数的和为:" + Str(s)

在计算平均重量x时，结果中产生了8位小数，若要对x保留一位小数，并对第二位小数四舍五入，则下列表达式中正确的是（ ）。

A．Int（x + 0.5）

B．Int（x * 100 + 0.5）/ 100

C．Int（x * 10）/___1___

D．Int（x * 10 + 0.5）/ 10

对用户输入的字符串进行解密的VB程序段如下：
s = Text1.Text
For i = 1 To Len(s)
ch = Mid(s, i, 1)
nk = Asc(ch) - i
If nk < 0 Then nk = nk + 127
Text2.Text = Text2.Text + Chr(nk)
已知大写字母A的ASCII码值为65，小写字母a的ASCII码值为97，在文本框Text1中输入内容“yhT5”，执行程序段后，文本框Text2显示的内容为（   ）

A．YHt5

B．xgS4

C．zjW9

D．xfQ1

回文字符串是一个对称的字符串，它从左到右读和从右到左读是完全一样的。如“abcba”和“abccba”都是回文字符串，“abc”不是回文字符串。小王编写了一个验证回文字符串的VB程序，功能如下：在文本框Text1里输入一个字符串，单击命令按钮Command1，在文本框Text2中显示验证结果：是回文字符串显示“yes”，否则显示“no”。程序运行界面如图所示。

（1）在设计程序界面时，要窗体Form1的标题栏上显示“判断回文字符串”，应修改Form1的_________属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim st As String
Dim i As Integer, j As Integer
Dim flag As Boolean
①________ 
j = Len(st)
i = 1
flag = True
Do While flag And i <= j
If Mid(st, i, 1) = Mid(st, j, 1) Then
i = i + 1
②________ 
Else
flag = False
End If
Loop
If ③______ Then 
Text2.Text = "yes"
Else
Text2.Text = "no"
End If
End Sub