Visual Basic的简单编程[2]

《Visual Basic的简单编程[2]》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、信息的编程加工高一信息技术讲授课时：1课时信息的编程加工一、教学目标：希望通过本节课的学习，同学们能够了解一些VB的基本常识，知道算法是进行程序设计的关键所在，会自己编写或者修改一些简单的小程序.二、教学重点：1、VB程序设计的界面组成2、算法的描述3、利用VB编写简单的小程序三、教学难点：利用VB来进行编程信息的编程加工四、教学过程引言：演示“欢迎使用VisualBasic”的小程序，请同学们思考下面的问题：我们已学习了信息加工的概述，我们也知道计算机是人们进行信息处理的有效工具。那么我们刚演示的那个程序是通过什么来实现的呢？信息的编程加工回答：是通过编程实现的。什么是编程呢？编程就是我们

2、利用计算机编写一定的程序，可以通过计算机来运行它。我们可以使用不同的软件来进行编程，我们这节课就先介绍一下怎样使用VB来进行编程。信息的编程加工我们已经知道计算机要解决某一问题，必须编写相应的程序。编写程序就需要确定解决问题的思路，并正确的写出求解步骤，这就叫解决这个问题的算法算法是解决问题的方法和步骤2、算法的介绍：1）请一个同学说出“两杯水交换”的过程2）例子：两数交换的实例请同学说一下交换的过程.两数交换：x→ty→xt→y信息的编程加工3、VB程序界面的介绍：1)VisualBasic的启动和退出1.单击任务栏中的“开始”_>“程序”_>“MicrosoftVisualBasic”_

3、>启动VB。2.单击“文件”菜单中的“退出”命令,或单击主窗口右上角的“关闭”按钮，均可退出信息的编程加工2)VisualBasic窗口的组成：标题栏、菜单栏、工具栏、窗体设计器窗口、工具箱、工程资源管理器窗口、属性窗口、代码编辑器窗口等信息的编程加工做出“欢迎使用VisualBasic”的效果。PrivateSubCommand1_Click()Print"欢迎使用VisualBasic"EndSub信息的编程加工1、简单的编程:两数交换PrivateSubCommand1_Click()DimxAsInteger,yAsInteger,tAsIntegerx=InputBox("请输入x

4、的值")y=InputBox("请输入y的值")Print"交换前x=";x,"y=";yt=x'把x的值赋给tx=y'把y的值赋给xy=t'把t的值赋给yMsgBox"交换后x="&x&"y="&y,vbOKOnly,"交换结果"EndSub演示两数交换绘制函数图像PrivateSubCommand1_Click()'事件Dimx,yAsSingle'定义变量Picture1.Scale(-10,25)-(10,-25)'定义坐标系Picture1.Line(-10,0)-(10,0),RGB(0,0,255)'画横坐标轴Picture1.Line(0,25)-(0,-25),RGB(0,

5、0,255)'画纵坐标轴'描点画函数图像Forx=-5To5Step0.0001y=x^2Picture1.PSet(x,y),RGB(255,0,0)NextxEndSub调试“绘制函数图像”程序P46阅读P47“资料”识别程序代码P46在VB中调试信息的编程加工2、简单的编程:两数比较大小PrivateSubCommand1_Click()Dimx(1)AsSingle,tAsSinglex(0)=InputBox("请输入第一个x的值")x(1)=InputBox("请输入第二个x的值")Print"x(0)=";x(0),"x(1)=";x(1)两数取最大数，即比较两数的大小，如果前

6、面数大于后面数，把较大的数放入后一数，此法可称为冒泡法Ifx(0)>x(1)Thent=x(0)x(0)=x(1)x(1)=tEndIfMsgBox"两个数的最大数是"&x(1),vbOKOnly,"比较结果"EndSub信息的编程加工3、简单的编程:三数取最大数PrivateSubCommand1_Click()Dimx(2)AsSingle,tAsSinglex(0)=InputBox("请输入第一个数的值")x(1)=InputBox("请输入第二个数的值")x(2)=InputBox("请输入第三个数的值")Print"x(0)=";x(0),"x(1)=";x(1),"x(2)="

7、;x(2)Ifx(0)>x(1)Thent=x(0)x(0)=x(1)x(1)=tEndIfIfx(1)>x(2)Thent=x(1)x(1)=x(2)x(2)=tEndIfMsgBox"三个数的最大数是"&x(2),vbOKOnly,"比较结果"EndSub3个数取最大数，既从第一数开始，相邻两个数比较大小，把较大数放入后一个数，三个数总共要比较二次，比较完后最后一数是最大数演示三数取最大数信息的编程加工4