1、启动vb6,执行文件-新建工程命令,在弹出的新建工程对话框中选择标准exe文件后点击确定按钮进入窗体界面。
2、选择窗体,拖拽周围正方形调整窗体的大小,在属性窗口中设置caption为“递归求和”,并设置startupposition属性值为“屏幕中心”。
3、在工具箱窗口中找到frame控件并双击,在窗体上创建一个frame1控件,修改其caption属性值为空,并调整大小和位置。
4、在frame控件上创建三个标签控件,修改他们的caption属性值依次为“输入整型数据”、“输出累加和值”、“递归求和”,并调整他们的位置。
5、修改三个标签的font属性值,字体为王羲之书法字体,字号为一号,字形为常规。
6、在窗体上依次创建两个文本框text1和text2,修改两个文本框的text属性值为空,并调整他们的位置。
7、在frame1上创建两个commmand控件,依次修改他们的caption属性值为“计算”、“退出”,并调整他们的位置和大小。
8、双击“计算”按钮进入代码区域,在对象中选择通用,接着输入代码:Private Function sum(n As Integer像粜杵泳) As LongIf n = 1 Thensum = 1Elsesum = n + sum(n - 1)End IfEnd Function自定义一个递归函数。
9、在代码区域中选择对象为commmand1,过程选择click吗,输入代码为Text2.Text = sum(Text1.Text),在commmand2中代码区域输入end。
10、点击工具栏中运行按钮进行编译调试,出现错误提示“子程序或者函数未定义”,这个错误主要是函数名称输入错误,纠正过来,再次进行调试直至无误为止。
11、执行文件-保存工程命令,依次将窗体、工程进行保存,然后接着测试其功能是否正确,输入数据进行测试。