湖南省计算机等级考试.ppt

湖南省计算机等级考试VB程序设计辅导 2007年10月 计算机系—刘永逸 内容提要 概括性指导 基础知识、重点结构、常用标准函数、自定义函数、基本处理、逻辑表达式 常用算法：穷举法、递推 分类练习 十多种常见类型（详见下页） 1、简单的求和问题 2、等比数列及求和 3、递推问题（Excel可解） 4、常见数字问题的处理 5、因子问题--因子个数、和 6、组合问题：不定方程求解 7、高精度计算—除法 8、同构数 9、完全平方数 10、数制转换 11、素数（质数）问题 12、猴子选大王 VB面向对象基本概念 对象、事件、方法 对象：窗体、标签、文本框、命令按钮、计时器、…… 事件：Load、Unload、Chang、Click、KeyPress、LostFocus、GotFocus、… 方法：Print、Cls、Show、Move 对象属性 Name、Caption / Text、Left、Top、Width、Height、 Enabled、Visible、 Font、 … VB程序执行方式 事件驱动编程机制 VB常用数据类型 数值型 Integer(%)、Long() Single(!)、Double(#) 字符串型 String($) 变体型 Variant VB常用运算符 数值运算 ^、-（负号）、*、/、\ 、Mod 、 +、- 字符串运算 、+ 逻辑运算 And、Or、Not VB常用函数 系统内部标准函数 取整：Int(x) 求余数：a Mod b 求平方根：Sqr(x) 绝对值：Abs(x) 四舍五入：Round(x,n) 其它... 用户自定义函数 逻辑函数判定：prime(x) 外部函数的方法(不讲) 内部函数的方法(程序的一部分) 见：有关素数程序设计部分 注：二级必备！ VB基本输入、输出 InputBox输入和MsgBox输出 文本框输入、输出 x=Val(Text1)、Text1=… 窗体和立即窗口输出 Print 和 Debug.Print Tab(x)、Format(x,…) VB程序基本结构与示例 顺序结构 选择（分支）结构 If...Then … Else ... If...Then … Else ... End If 判断成绩是否合格 x = Val(Text1) If x 60 Then Text2 = 不合格 If x = 60 Then Text2 = 合格 或（第2、3行为） If x 60 Then Text2 = 不合格 Else Text2 = 合格 也可写成多行形式：… 多选择（分支）结构（一） If … Then  …ElseIf … Then …Else …End If 判断成绩等级 Private Sub Command1_Click() x = Val(Text1) If x 60 Then Text2 = 不及格 ElseIf x 70 Then Text2 = 及格 ElseIf x 85 Then Text2 = 良好 Else Text2 = 优秀 End If End Sub 多选择（分支）结构（二） Select Case 测试表达式 Case 表达式列表1 … Case Else …End Select 表达式列表：(三种形式，见例题) 判断成绩等级 Private Sub Command1_Click() Select Case Val(Text1) Case Is 60 Text2 = 不及格 Case 60, 61, 62, 63, 64, 65, 66, 67, 68, 69 Text2 = 及格 Case 70 To 84 Text2 = 良好 Case Else Text2 = 优秀 End Select End Sub 循环结构 For ... Next While...Wend （无退出中途语句） Do While...Loop （共4种形式） 中途退出：Exit For/Do 嵌套 分支与分支 循环与循环 循环与分支 For循环输出20以内的奇数 Private Sub Form_Click() For k = 1 To 20 Step 2 Print k; Next End Sub While循环输出20以内的奇数 Private Sub Form_Click() k = 1 While k = 20 Print k; k = k +