养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

VB6.0自定义函数的过程

时间:2024-11-12 03:15:28

VB6.0作为一种编程语言,已经为用户提供了许多常用函数,但是毕竟有限,不能完全满足开发者的需求,这时我们就需要根据自己的需求进行自定义函数。接下来简要介绍步骤:

工具/原料

VB6.0

计算机(WIN7系统)

方法/步骤

1、打开VB6.0,新建一个工程,在窗体中添加一个命令按钮,caption分别改为“调用函数”,将窗体Form1的caption属性改为“VB6.0自定义函数”,将界面设置成下图:

VB6.0自定义函数的过程

2、双击窗体Form1,进入代码编辑窗口,单击左侧下拉三角形,选择通用。

VB6.0自定义函数的过程

3、在通用段输入如下代码:PublicSubF1(n%,ByValm%)n=咯悝滩镞nMod10m=m\10EndSub并将Form_Load事件删坛冰核哧除。以上代码就定义了函数F1,其中包括两个参数,类型均是整型,%表示短整型,Byval表明了值传递方式,表示值传递,与地址传递相对应。这也是默认的传递方式。

VB6.0自定义函数的过程

4、双击“调用函数”命令按钮,进入代码编辑窗口,输入如下代码:Dimx%,y%x=12砜实蛰斓:y=34CallF吭稿荔徊1(x,y)Printx,yyongcall进行函数的调用,参数与自定义函数中参数一一对应。

VB6.0自定义函数的过程

5、关闭代码窗口,按下F5运行程序,单击“调用函数”命令按钮,在窗体中打印输出234,可以自己想下为什么是这个结果,这个结果和函数的值传递方式有关,如图:

VB6.0自定义函数的过程

© 一点知识