《VB语言程序设计》习题参考答案.docVIP

VB语言程序设计》 习 题 参 考 答 案 第 1章习题 一、单选题 1．D 2．B 3 ．C 4 ．A 5．C6.A 7．A 8．B 9 ．C 10 ． (1)A (2)B 二、多选题 1．ACDE 2 ．BCDE 3 ．CD 4. CE 三、填空题 1．事件驱动 2 ．解释，编译 3 ．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print VB 语言程序设计 编程及上机调试 按要求设置窗体属性 2．在窗体上建立一个标签 Label1 。程序代码如下： Private Sub Form_Click() Label1.Caption = 你单击了窗体 End Sub Private Sub Form_DblClick() Label1.Caption = 你双击了窗体 End Sub 3． 在窗体上建立两个文本框 Text1( 输入数 ) 、Text2( 输出数 ) 和一个命令按钮 Command1。两个文本框的 Text 属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第 2章习题 一、单选题 1．① D，② D 2 ．①A，② C 3 ．A 4．B 5．B 6．B 7． C 8 ．D 9 ．B 10 ．B 11 ． A 12 ．A 13． B 14 ．A 15 ． B 16．A 17 ． B 二、多选题 1． BD 2 ．CD 3 ．AC 4. AD 三、填空题 1． (1) Sin(50*3.14159/180) (2) (2+x*y)/(2 – y*y) (3) a*a – 3*a*b/(3+a) (4) x^(3/8)+Sqr(y*y+4*a*a/(x+y^3)) 1 2． Int(50+6*Rnd) 3．(1)138 (2)3 (3)214 (4) inchina (5)70 (6) 45 (7)0 4. 系统管理数据库 编程及上机调试 1～3 题：按要求完成操作练习。 4． Private Sub Command1_Click() 最大化 按钮 Form1.WindowState = 2 最大化 End Sub Private Sub Command2_Click() 还原 按钮 Form1.WindowState = 0 还原 End Sub Private Sub Command3_Click() 最小化 按钮 Form1.WindowState = 1 最小化 End Sub 5．在窗体上建立三个文本框 Text1( 第一个数 ) 、 Text2( 第二个数 ) 、 Text3( 计算结果 ) 和一个命令按 钮 Command1(“计算” ) 。 Private Sub Command1_Click() Dim x As Single Dim y As Single x = Val(Text1.Text) y = Val(Text2.Text) Text3.Text = x * x + y * y End Sub 在窗体上建立两个文本框 Text1( 输入一串字符 ) 、Text2( 输出结果 ) 和一个命令按钮 Command1。 Private Sub Command1_Click() Dim x As String x = Left(Text1.Text, 1) + Right(Text1.Text, 1) Text2.Text = x End Sub 第 3章习题 一、单选题 1．C 2 ． B 3 ．D 4 ．D 5 ．B 6 ．C 7．B 8 ． D 9 ． D 10．A 11 ． A 12 ．C 13．C 14 ．B 15 ．(1)A (2)C 16 ．A 17 ．B 18．(1)D (2)B (3)C 19 ．D 二、多选题 1．AC 2 ． AC 3 ． ABCF 三、填空题 1. $000,124 2 ．Label1.Caption=a*b=3 ．Height ，Width 4 ． 2 5 ．Text1.SetFocus 6 ． Multiline, ScrollBars, 2 7 ．编程技术，程序设计 8．Private Sub Text2_Change() ′当文本框 Text2 中的文本内容发生变动时，执行该事件过程 Label1.Caption=Text1.Text ′把文本框 Text1 中的文本内容作为标签 Label1 的标题