《VB程序设计》课程09秋北航视频串讲讲义.pptVIP

22、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：PrivateSubForm_Click()Text1.Text=“hello worldEnd Sub Private SubText1_Change()Picture1.Print“hello classmates”End Sub程序运行后，单击窗体，在文本框中显示的内容是_____________，而在图片框中显示的内容是_____________ 【解析】考察text和picture显示内容的设置 【答案】 hello world, hello classmates 23、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：PrivateSubForm_Click()Text1.Text=“hello worldEnd Sub Private SubText1_Change()Picture1.Print“how are you?”End Sub程序运行后，单击窗体，在文本框中显示的内容是_____________，而在图片框中显示的内容是_____________ 【解析】考察对象属性的设置 Text1.text属性——设置文本框显示的文字内容 Text1.font属性——设置文字的字型/大小等 在picture（图片框）中显示文字——picture.print 【答案】 hello world, how are you? 24、prime函数判断参数x是否为质数，将代码补充完整。 Private Function prime(ByVal x As Integer) As BooleanPrime=trueFor i = 2 To Sqr(x) If ________ Then prime = False Exit Function End IfNext iEnd Function 【解析】考察质数的概念和循环 质数： 1）质数这样的正整数：它大于1， 且除了能表示为它自己和1的乘积以外，不能表示为任何其它两个正整数的乘积。 2）最小的素数是2， 也是唯一的偶素数。 最前面的素数依次排列为：2，3，5，7，11，13，17，......【答案】x Mod i = 0 二、程序阅读题 25、编程实现：假设目前有座冰山体积为1000立方米,由于全球温度变暖，其以每年1.4%的速度融化,多少年后其体积达到或小于700立方米。 【参考代码】 Private Sub Form_Click()Dim p As DoubleDim r As SingleDim n As Integerp = 1000#r = 0.014n = 0Do While p 700# p = p * (1 - r) n = n + 1LoopPrint n; “年后”; “其体积变为; pEnd Sub? 【解析】考察do while…loop循环 1）Do while(循环准入语句) …循环语句 Loop 在满足while的条件后执行do后的语句，不满足则跳出循环；可能一次都不会执行。 2）do …循环语句 Loop while(循环准入语句) 满足while后的条件后再次执行循环内容。至少会执行循环内容一次， 三、编程题 辅助复习资料 1）北航09秋学期《VB程序设计》模拟题一.doc 2）北航09秋学期《VB程序设计》模拟题二.doc 遇到不会的问题，欢迎大家随时到论坛发贴提问，或者直接发邮件给我? 到论坛逛逛：北航《VB程序设计》论坛 发邮件给老师: dzxxzy0032@ 预祝大家考试顺利！ ?很高兴和大家共度这一学期！ VB 6.0是解释型语言.在输入代码的同时,解释系统将高级语言翻译成机器指令,并可判断语法是否正确.在设计程序时,还可以运行程序.设计,调试成功的程序可以编译生成可执行文件(.ExE),这样的文件 * * * * * 北航09秋学期考前串讲VB程序设计 主讲教师：傅冬晓 2009年12月 欢迎大家来到奥鹏在线视频教室 各位学员大家好！ 这里是北航《VB程序设计 》考前串讲课堂， 我是傅老师，欢迎各位同学的到来！ 希望今天的串讲会对你的考试有所帮助！ 也请大家保持课堂秩序！ 课程知识点列表1/3 对象的主要属性、方法和事件 常用的数据类型 常量和变量的使用 各类运算符和表达式 赋值语句 基本的输入输出函数 注释、暂停和程序结束语句 If语句的几种格式及Iif函数的使用 Select Case 语句的使用 循环的概念 循环的基本语句结构和流程（Do…Loop语句、While…Wend语句、For语句）