编写VB程序，实现如下功能：单击启动按钮Start1，在列表框List1内每隔2秒输出一个由10个大小写字母组合成的字符串，运行界面如图所示：

（注：字母“A”的ASCII码值为65，字母“a” 的ASCII码值为97）
（1）按观察程序代码，可知“启动”按钮的对象名为_________ 。（单选，填字母

A．Timer1 /

B．Start /

C．Command1 /

D．Start_1  /

E．启动）

（2）实现上述功能的 VB 程序如下，请在划线处填入合适代码。
Private Sub Start_1_Click()
Timer1.Enabled = ①
End Sub
Private Sub Timer1_Timer()
Dim s As String, c As String
Dim i As Integer, e As Integer, h As Integer
Randomize
s = ""
flag = True
For i = 1 To 10
e = Int(Rnd * 52 + 1)
If e <= 26 Then
h = e + 64
Else
②
End If
③
s = s + c
Next i
List1.AddItem s
End Sub
划线处的代码为：
①_______________________________
②________________________________
③________________________________

假设x=1,y=2,下面有四个程序段，运行后结果为x=2,y=1的是（   ）

④x="x-" y y= x+y x= y－x

③t =" x" x= y y= t

②x =" x" + y y= x－y x= x－y

①x = y y =x

 

A．④

B．②④

C．②③④

D．①③④

要求将某一字符串中指定的字符改写成小写或大写（如果原先是大写就改成小写，反之改成大写），并将处理后的字符重新输出。
程序界面如下图所示，在Text1中输入原始字符串，在Text2中输入需要改变的字符，单机“改变”按钮后，在Text3中输出处理后的结果。程序代码如下：

Private Sub Command1_Click()
Dim s As String, result As String, k As String
Dim zs As String, n As Integer
result = ""
s = Text1.Text
k = Text2.Text
For n =" 1" To Len(s)
①
If zs =" k" Then
If Asc(zs) >=" 65" And Asc(zs) <=" 90" Then
zs =" Chr(Asc(zs)" + 32)
ElseIf Asc(zs) >=" 97" And Asc(zs) <=" 122" Then
zs =" Chr(Asc(zs)" - 32)
End If
End If
②
Next n:Z#xx#k.Com
③
End Sub
在程序①、②、③划线处，填入适当的语句或表达式，把程序补充完整:
程序中①划线处应填入___________________。
程序中②划线处应填入___________________。
程序中③划线处应填入___________________。

编写一段程序求1Í2Í3Í……Í100的值，程序代码如下：
Private Sub Command1_Click()
Dim i As Integer, t As Integer
t = 1
For i =" 1" To 100
    ①    
Next i
Text1.Text = Str(t)
End Sub
（1）  请补充①处的代码___________________。
（2）  运行此程序，单击Command1按钮，出现对话框如图所示：

请分析出现该错误的原因__________，如何修改可以解决此问题_______________________。

已知Asc(“A”)的值为65，下列Visual Basic表达式的值等于数值131的是（ ）

A．ASC(“A+B”)

B．CHR(65)+CHR(66)

C．"13"+"1"

D．Abs(69-200)