VB程序设计基础 全套课件 VB教程第3章课堂讨论.pptVIP

第3章 习题讨论 一、单选题 6. 设a=12，b=34，下列语句能显示“34-12”的是_______。 A. Print Val(b)-Val(a) B. Print b-a C. Print b;Chr(45);a D. Print Asc(a) + - + Asc(b) 8. 下列程序段执行后，输出结果是_______。 Dim a As String*4 a=Computer a$= Internet Print a Print a$ A. Computer B. Comp C. Comp D. Inte Internet Internet Inte Inte 14. 假设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．12 B. 11 C．21 D. 22 例3.2程序讨论 要求：设计程序，实现两个文本框内容的交换 若采用中间变量实现交换，程序代码如下： Private Sub Command1_Click() ′“交换”按钮 Dim t As String, a As String, b As String a = Text1.Text b = Text2.Text t = a a = b b = t Text1.Text = a Text2.Text = b End Sub 错