附录 主要习题参考答案第1章习题答案1.7.1 选择题1. C2. D3. A4. D 5. D 6. B 7. A 8. B 9. C10. C 11. B12. A 13A14. C 15. B1.7.2 填空题1. 面向对象事件驱动2. .vbproj3. 固定浮动4. “项目”“添加Windows窗体”5. F56属性事件方法7Name8程序运行9. 公共语言运行库 .NET FrameWork类库1.7.3 编程题略第2章习题答案2.8.1 选择题1. C 2. D 3. C 4. D 5. B 6. D 7. A 8. B 9. C10. B 11. C 12. A 13. B 14. C 15. D 16. D 17. B18. D 19. C 20. D2.8.2 填空题1Cos(2*3.14)3 2 -4 3 -3004 Basic学习教程和C教程 5 -5.23123 6 -6 7 abcd123xyzopq8 Exp(-4)+Log(5)/Log(10) 或 Exp(-4)+Log10(5)9 x=1 And x=10010 0 11 16 、 4 、2008 、 4 12 A 66 13 Log10(Abs(10+Sin(3.14/6) +(x2+1)(1/3)14 Option Explicit On15 LongSingleIntegerDoubleDecimal16 0 False0:00:0017 （1）End Structure （2）Dim e1 As Employee （3）e1.Salary=700018 （1） 0 1011 （2）Dim MyColor As color （3）MyColor=color.Green19 Imports System.Math20 EndStop 第3章习题答案3.7.1 选择题1. B2. D3. C4. D5. A6. B7. A8. A9. B10. C11. A12. C13. C14. B15. A16. D17. C3.7.2 填空题1MultilineScrollBarsScrollBars.Both2TextAlignContentAlignment.MiddleRight3TextBox1.Focus()4LostFoucsGotFocus5EnabledVisibleTrueTabStopFalse6TabIndex7TextBox1.Text = VisualBasicLabel1.Text = VisualBasic8Load9FlatStyleFlatStyle.System3.7.3 编程题略第4章习题答案4.4.1 选择题1. C2. D3. B4. C5. A6. D7. A8. D9. D10. A11. B 12. C 13. C 4.4.2 填空题1. Case ElseEnd Select2. x Mod 3 = 0 Or x Mod 5 = 0End If3StringMsgBoxResult枚举4. MsgBoxResult.Retry5Mid(s, i, 1) Mid(s, Len(s) - i + 1, 1)i Len(s) 262 * n + 1Exit Do7i 0i + Len(b)8n Mod 2 & sn 2Text1.Text = s4.4.3 编程题略第5章习题答案5.6.1 选择题1. C2. D3. D4. B5. D6. A7. B5.6.2 填空题121 0 202ReDim x(m - 1, n - 1)max x(i, j)rows = icols = j3 6 4. n = UBound(a) Exit For a(i - 1) = a(i) n = n - 15.6.3 编程题略第6章习题答案6.6.1 选择题1. D2. A3. C4. B5. D6. B6.6.2 填空题15 、 552 15 3fb(i) = fb(i - 1) + fb(i - 2) Dim fb() As IntegerCalSub(fb, n)4 6 2 5 55 6dat() As Integer Find = i Find = -1 Find(x, n)6.6.3 编程题略第7章习题答案7.10.1 选择题1. B2. D3. C4. D5. B6. B7. A8. A9. C10. D11. A12. D13. B14. A15. D7.10.2 填空题1TickMyTime.Interval=200MyTime_TickEnabledFalse2chkFont.Checked=TruerdoSize.Checked=True3DropDownStyle ComboBoxStyle.DropDown ComboBoxStyle.DropDownList ComboBoxStyle.Simple 4EnabledInterval Timer1_Tick Label1.Text544446ListBox1.Items.Add(TextBox1.Text)7TextBox1.Text = ComboBox1.Text 8TextBox1.SelectionStart=0TextBox1.SelectionLength=Len(TextBox1.Text)9HScrollBar1.Value10. Increment11. SizeMode12. Value7.10.3 编程题略第8章习题答案8.5.1 选择题1. A2. D3. C4. B5. C6. B7. C8. A8.5.2 填空题1下拉式菜单弹出式菜单2Enabled = FalseVisible = FalseChecked = True3Not mnuDisp.CheckedmnuDisp.Checked4. 工具(&T)8.5.3 编程题略第9章习题答案9.7.1 选择题1. B2. C3. D4. A5. D6. A7. D8. B9. C10. A11. C12. A13. D 14. C 15. D9.7.2 填空题1预定义对话框通用对话框自定义对话框2Color3Font4ShowDialog5. DialogResult DialogResult.OK6 2 DialogResult.Cancel OFD1.FileNameOFD1.FileName7. Form3.Hide() Form4.ShowDialog()8. “项目” “项目属性” “项目属性”9. 所有模块 本窗体模块10. 窗体Form1 窗体Form2 20011. a 65 9.7.3 编程题略第10章习题答案10.5.1 选择题1. C2. A3. B4. B5. D6. A7. A8. C9. D10. B10.5.2 填空题1继承2基类（或父类） 派生类（或子类）3Private4单继承 多重继承5. 封装性 继承性 多态性 6Protected7. New Finalize8. 方法的重载 方法的重写9. Inherits C110. Event RaiseEvent WithEvents10.5.3 编程题略第11章习题答案11.4.1 选择题1. A2. C3. C4. B5. A 11.4.2 填空题1数据程序顺序随机二进制ASCII（文本）2. BaseStream3. StreamWriter BinaryReader4. Peek5. WriteByte6. FileAccess FileAccess.ReadWrite11.4.3 编程题略第12章习题答案12.3.1 选择题1. C2. B3. D4. A5. B6. D7. A 12.3.2 填空题1. Graphics System.Drawing CreateGraphics2. Graphics Device Interface 图形设备接口3. Dim pen1 As New Pen(Color.Red, 5)4. DrawPolygon5. SolidBrush HatchBrush LinearGradientBrush TextureBrush6. Point Dim p1 As New Point(100, 200) Rectangle Dim rect1 As New Rectangle(10, 20, 50, 60)7. Imports System.Drawing.Drawing2D CreateGraphics()Pen(Color.Blue, 5) DrawLine8. Dim b1 As New SolidBrush(Color.Green) Dim f1 As New Font(隶书, 16, FontStyle.Bold Or FontStyle.Italic) G1.DrawString(文字示例, f1, b1, 5, 5)12.3.3 编程题略第13章习题答案13.4.1 选择题1. D2. B3. A4. B5. A6. C7. D 8. D13.4.2 填空题1. Dim cmd As New SqlCommand(Select * From