VB教程第3章 节 课堂讨论.ppt

第3章 习题讨论;一、单选题; 11. 假设Text1是某一个文本框的名称，下列语句中正确的是 A. Text1.Height = 600 B. Text1.Print 123 C. Text1.Caption=新标题 D. Text1.Name=文本框 ; 1. 要在标签Lab1上显示“计算结果”， 可用 ______ 语句。 A. Lab1.Caption = 计算结果 B. Lab1.Caption = 计算结果 C. Lab1.Name = 计算结果 D. Lab1.Name = 计算结果 2．下列语句序列的执行结果是__________。 a = Space(1) + 学习 + Space(2) + 高级语言 b = Trim(a) + Chr(65) Print Len(a + b) 3．运行下列程序段后，输出结果是 x = 3 : y = 2 : z = 1 x = y : y = z z = x : x = y Print x; 4. 在窗体上已建立两个文本框(Text1和Text2)和一个命令按钮(Command1)，并编写如下两个事件过程： Private Sub Command1_Click() Text1.Text = Val(Text1.Text) + Val(Text2.Text) Text2.Text = Val(Text1.Text + Text2.Text) End Sub Private Sub Form_Load() Text1.Text = 1 Text2.Text = 2 End Sub 程序运行后，单击命令按钮Command1，在两个文本框Text1和Text2中显示的内容分别为___(1)___和___(2)___。 (1) A．0 B. 1 C．2 D. 3 (2) A．32 B. 11 C．21 D. 22; Private Sub Command1_Click() Dim t As String, a As String, b As String t = a a = b b = t Text1.Text = a Text2.Text = b End Sub; Private Sub Command1_Click() Dim t As Integer, a As Integer, b As Integer a = Text1.Text b = Text2.Text t = a a = b b = t End Sub; Private Sub Command1_Click() Dim t As String, a As String, b As String a = Val(Text1.Text) b = Val(Text2.Text) t = a a = b b = t Text1.Text = a Text2.Text = b End Sub;编程及上机调试 第4题讨论