《教育专题:13初试身手体验编程.ppt》由会员分享,可在线阅读,更多相关《教育专题:13初试身手体验编程.ppt(19页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、1.31.3初试身手初试身手 体验编程体验编程自自然然语语言言流流程程图图伪伪代代码码计算机无法识别以上的三种描述算法!计算机无法识别以上的三种描述算法!对于用计算机解决问题而言,我们设计算法、描述算法不是最终目的,最终目的是编写程序代码,实现算法设计。Visual Basic 6.0(简称VB6.0)是一种基于BASIC语言的可视化程序开发工具。所谓可视化程序设计是一种全新的程序设计方法,像搭积木式的构造应用程序的各种界面,然后再编写少量代码就可以构建应用程序。通过桌面快捷方式启动通过桌面快捷方式启动VB6.0,新建,新建“标准标准.EXE”还记得运算符还记得运算符mod吗?吗?x mod
2、y 表示整数表示整数x除以整数除以整数y的余数。的余数。利用利用VB的输出语句:用的输出语句:用print输出下列表达式的值。输出下列表达式的值。1、3 mod 52、342 mod 83、23.5 mod 432.74、875.3 mod 33.9一一分析问题分析问题“判断闰年条件判断闰年条件”如果该年份能被如果该年份能被 4 整除但不能被整除但不能被100整除,或者能被整除,或者能被400整除,则该年整除,则该年为闰年。为闰年。利用利用Mod求两个整数相除的余数来判求两个整数相除的余数来判断年份数是否能被断年份数是否能被4、100、400整除。整除。P7二二设计算法设计算法N开始输入年份y
3、y能被4整除y不能被100整除YYYNN输出不是闰年输出是闰年结束y能被400整除三三界面设计界面设计设置设置Form1的的Caption属性值属性值设置设置Form1的的BackColor属性值属性值设置设置Command1的的Caption属性值属性值双击此按钮双击此按钮四四编写代码编写代码Private Sub Command1_Click()Dim y As Integer y=Form1.Text1.Text If y Mod 4=0 Then If y Mod 100 0 Then Label2.Caption=Str(y)+是闰年 Else If y Mod 400=0 Then Label2.Caption=Str(y)+是闰年 Else Label2.Caption=Str(y)+不是闰年 End If End If Else Label2.Caption=Str(y)+不是闰年 End IfEnd Sub保存工程或导出保存工程或导出EXE文件文件实践:实践:根据第根据第1011页的制页的制作流程,编写桌面小时钟作流程,编写桌面小时钟程序。程序。展示学生作品展示学生作品课堂小结课堂小结1.体验如何启动体验如何启动VB2.知道设计知道设计VB应用程序的基本步骤应用程序的基本步骤3.知道如何运行与保存知道如何运行与保存VB的应用程序的应用程序