窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入“FormList”，然后单击命令按钮，执行如下程序： Private Sub Command1_Click() Text2．Text=UCase(Mid(Text1．Text，5，4)) End Sub 在Text2中显示的是

单项选择题窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Dim c As String c=UCase(Chr(KeyCode))：Text2．Text=Chr(Asc(c)+2) End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是

单项选择题窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下： Private Type x Private Sub Command l Click() a As Integer：b As Integer Dim Y As x End Type y．a=InputBox(””) If y．a＼2=y．a／2 Then y．b=y．a*y．a Else y．b=Fix(y．a／2) End If Text1．Text=y．b End Sub 对以上程序，下列叙述中错误的是