求累加和方法多种多样,那么如何利用编程捂执涡扔使用递归方法来实现呢?在这本人就将自己制作的过程和截图分享给大家,希望对你以后的编程提供一定的帮助和启发。
工具/原料
vb6
方法/步骤
1、启动vb6,执行文件-新建工程命令,在弹出的新建工程对话框中选择标准exe文件后点击确定按钮进入窗体界面。
2、选择窗体,拖拽周围正方形调整窗体的大小,在属性窗口中设置caption为“递归求和”,并设置startupposition属性值为“屏幕中心”。
3、在工具箱窗口中找到frame控件并双击,在窗体上创建一个frame1控件,修改其caption属性值为空,并调整大小和位置。
4、在frame控件上创建三个标签控件,修改他们的caption属性值依次为“输入整型数据”、“输出累加和值”、“递归求和”,并调整他们的位置。
5、修改三个标签的font属性值,字体为王羲之书法字体,字号为一号,字形为常规。
6、在窗体上依次创建两个文本框text1和text2,修改两个文本框的text属性值为空,并调整他们的位置。
7、在frame1上创建两个commmand控件,依次修改他们的caption属性值为“计算”、“退出”,并调整他们的位置和大小。
8、双击“计算”按钮进入代码区域,在对象中选择通用,接着输入代码:PrivateFuncti艺皱麾酪onsum(nAsInteger像粜杵泳)AsLongIfn=1Thensum=1Elsesum=n+sum(n-1)EndIfEndFunction自定义一个递归函数。
9、在代码区域中选择对象为commmand1,过程选择click吗,输入代码为Text闸拊福律2.Text=sum(Text1.Text),在commmand2中代码区域输入end。
10、点击工具栏中运行按钮进行编译调试,出现错误提示“子程序或者函数未定义”,这个错误主要是函数名称输入错误,纠正过来,再次进行调试直至无误为止。
11、执行文件-保存工程命令,依次将窗体、工程进行保存,然后接着测试其功能是否正确,输入数据进行测试。