Visual Basic程序设计实践教程 教学课件 作者 王成敏 李忠 第7章.pptVIP

知识要点 1．过程的概念 2．Sub过程（子过程） 3．Function过程（函数过程） 4．参数传递 （1）按地址传递参数 （2）按值传递参数 5．变量的作用域 （1）局部变量（过程级变量） （2）窗体/模块级变量 （3）全局级变量 （4）静态变量 6．过程的作用域 7．键盘事件过程 8．鼠标事件过程 实验 过程在程序设计中的应用 一、实验目的 1．掌握Sub过程的编写方法和调用格式。 2．掌握Function过程的编写方法和调用格式。 3．理解Sub过程和Function过程之间的联系和区别。 二、实验示例 【例题7.1】 验证哥德巴赫猜想：一个不小于6的偶 数可以表示为两个素数之和。程序运行结果如图7.1所示 。 1．分析 在本例题中，基于如下算法进行程序设计：假设有一 个偶数n，将它表示为两个整数a和b的和，即n = a + b ，如果n = 10，先令a = 2，判断2是否是素数，经检查2 是素数，由于b = n-a，故b的值为8，经检查8不是素数 ，则这一组合（10 = 2 + 8）不合要求。再使a加1，即a = 3，经检查3是素数，b = n-a = 7，经检查7也是素数 ，则这一组合（10 = 3 + 7）符合要求。依此类推，可 以验证哥德巴赫猜想的适用范围。 2．界面设计 在窗体上添加一个框架Frame1、一个标签Label1、 一个命令按钮Command1、两个文本框Text1和Text2。在 属性窗口中进行相关属性的设定，控件的属性值如表 7.1所示。 表7.1 控件属性列表 3．代码设计 【例题7.2】 编写一个Function过程，实现一个十 进制数转换成2～16任意进制字符串。程序运行结果如 图7.2所示。 1．分析 一个十进制正整数m转换成r进制的方法是：将m不 断除r取余数，直到商为0，以反序排列得到结果，即最 后得到的余数在最高位。 2．界面设计 在窗体上添加一个框架Frame1、3个标签Label1 ～Label3、3个文本框Text1～Text3、一个命令按钮 Command1。 3．代码设计 【例题7.3】 计算s = 1! +2! + 3!+ … + n!。要 求分别用子过程和函数过程来实现。程序运行结果如图 7.3所示。 （1）用过程实现。 （2）用函数实现。 【例题7.4】 编写一键盘事件过程，实现只能在文本 框里输入数字的功能，并且在文本框中显示为“@”号 。程序运行结果如图7.4所示。 1．分析 2．界面设计 3．代码设计 【例题7.5】 编写一鼠标事件过程，按下鼠标左键开 始画图，若按下鼠标左键时按下“Shift”键开始擦图。 程序运行结果如图7.5所示。 三、实验内容 1．编写一函数过程，实现对3个数x、y、z的大小 比较，并将最大的数显示在窗体上。 2．回文判别。 3．编程计算级数 的值，直到最后一个级数项的值小于 10-6为止。 4．编写判断一个整数是否为素数的过程，调用此过程 判断2～1000之间哪些数是素数。 5．编写求 的函数过程，调用此函数求下列表达式的值。 6．设计一个检查字符串是否为数字字符串的通用过程 ，调用该过程检验2个文本框中输入的字符是否都是数字 。如果都是数字，求这2个文本框中的数字之和并把结果 显示在第3个文本框中。 7．编写一个标准模块，该模块包含一个Sub过程，用于 找3个整数中的最大数。调用该过程来求6个数的最大数。 利用文本框控件数组和文本框来分别输入数据和输出最大 数。 本章节目录 过程 第7章 * * 知识要点 实验 过程在程序设计中的应用 1 2 * 图7.1 验证哥德巴赫猜想程序界面 Caption Command1 命令按钮 1个不小于6的偶数可以表示为两个素数之和 Caption Label1 标签 验证哥德巴赫猜想 Caption Frame1 框架 属性值 属性 对象名 类型 图7.2 数制转换程序界面 图7.3 计算1! +2!?+?3!+ … + n!的程序界面 图7.4 键盘事件程序界面 图7.5 鼠标事件程序界面 本章节目录