单项选择题

在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为Command1)，然后编写如下两个事件过程：
Private Sub Command1_Click( )
　　Text1.Text = "Microsoft Visual Basic"
End Sub
Private Sub Text1_Change( )
　　Text2.Text = UCase(Text1.Text)
End Sub
程序运行后，单击命令按钮，则在Text2文本框中显示的内容是________。

A．Microsoft Visual Basic
B．microsoft visual basic
C．MICROSOFT VISUAL BASIC
D．空字符串
<上一题 目录 下一题>
热门 试题

单项选择题
某线性表采用顺序存储结构，每个元素占4个存储单元，首地址为200，则第12个元素的存储地址为________。
A．248
B．247
C．246
D．244
单项选择题
在窗体中添加两个文本框，其名称为别为Text1和Text2；两个标签，其名称为别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母ASCII代码小4的大写字母，结果显示在文本框Text1中。如输入 efg ，则输出结果为 ABC ，运行后如下。能够实现上述功能的程序是________。
A．Private Sub Form_Load( )
　　Show
　　Text1.Text = ""
　　Text2.Text = ""
　　Text2.SetFocus
End Sub
Private Sub Text2_KeyDown(KeyCode As Integer， Shift As Integer)
　　Text1.Text = Chr(KeyCode - 4)
End Sub
B．Private Sub Form_Load( )
　　Show
　　Text1.Text = ""
　　Text2.Text = ""
　　Text2.SetFocus
End Sub
Private Sub Text2_KeyDown(KeyCode As Integer， Shift As Integer)
　　Text1.Text = Text1.Text + Chr(KeyCode - 4)
End Sub
C．Private Sub Form_Load( )
　　Show
　　Text1.Text = ""
　　Text2.Text = ""
　　Text2.SetFocus
End Sub
Private Sub Text2_Click(KeyCode As Integer， Shift As Integer)
　　Text1.Text = Text1.Text + Chr(KeyCode - 4)
End Sub
D．Private Sub Form_Load( )
　　Show
　　Text1.Text = ""
　　Text2.Text = ""
　　Text2.SetFocus
End Sub
Private Sub Text2_Click(KeyCode As Integer， Shift As Integer)
　　Text1.Text = Chr(KeyCode - 4)
End Sub
相关试题