实验报告(一)
实验题目:实验循环结构第八题实验 实验环境:VB程序(6.0中文版)
实验目的:掌握常用内部函数的使用,掌握表达式。赋值语句的正确书写规则,掌握IF条件语句的使用掌握情况语句的使用。 实验内容:一个富翁试图与陌生人做一笔换钱生意,换钱规则为:陌生人内天给富翁10万元钱,直到满一个月(30天);而富翁第一天给陌生人1分钱,第二天2分第三天4分,.......富翁每天给陌生人的钱是前一天的两倍,直到满一个月。分别显示富翁给陌生人和陌生人给富翁的钱为多少? 实验步骤:1.首先打开VB程序
2.然后在窗体上使用两个命令按钮。
3.对两个命令按钮分别进行编译具体步骤如下: (1)private sub command1 click() U=0.01 S=0 X=1
Do while x<30 S=s+u U=u*2 X=x+1 Loop
Print ”富翁给陌生人的钱为:”; s; ”元” End sub
Private sub command2 click() Dim t T=100000*30 For e=1 to 30 Next e
Print ”陌生人给富翁的钱为:” ”元” 4.执行程序并进行相应的修改 5.查看最终结果是否正确
实验结果:
实验体会:通过这个学期的学习,对了VB这种高级语言有了初步的认知,对一些小的程序有了初步的设计方案,能根据要求设计出想要的程序,锻炼了自己的创造性思维,也培养了逻辑思维。在学习的过程中我学到了许多东西,引发我了对编程的思考与兴趣,在看到自己与别人的差距时我更是感觉到这门课程的深奥所
在,也激发了我对它的学习兴趣。总而言之,我对这门课程是越来越喜欢了,很喜欢这门课。