编制计算机程序解决问题_第1页
编制计算机程序解决问题_第2页
编制计算机程序解决问题_第3页
编制计算机程序解决问题_第4页
编制计算机程序解决问题_第5页
已阅读5页,还剩10页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、编制计算机程序解决问题,计算机的程序语言,例:完成“9+8”的加法运算,计算机程序的编写与执行,计算机高级语言程序,计算机机器语言程序,人,计算机,翻译程序,编写,执行,计算机语言系统,Visual Basic,Visual Basic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,程序员可以轻松的使用VB提供的组件快速建立一个应用程序。,认识程序中的基本元素,Private Sub Form_Load() FileName$ = InputBox(请输入需要加密的文件名及路径:) Open FileName$ For

2、Input As #1 Line Input #1, yw$ Close #1 xw$ = n = Len(yw$) For i = 1 To n yz$ = Mid$(yw$, i, 1) xz$ = Chr(Asc(yz$) - 10) xw$ = xw$ & xz$ Next Open FileName$ For output As #1 Print #1, xw$ Close #1 msgbox#加密已完成!# end End Sub,体验程序的作用及其编制环境,编制程序解决问题的过程,编写画出sin函数曲线图的程序。 即Y=Asin(x)+B的曲线图。,描点法,Private Sub

3、 Form_Click() A=5 B=0 C=0.01 cls Scale (-10,10)-(10,-10) Line (-9,0)-(9,0) Line (0,-8)-(0,8) CurrentX=0.5 CurrentY=9 Print y CurrentX=9 CurrentY=-0.5 Print x For x=-8 To 8 Step 1 PSet (x,0.1) Next x For y=-6 To 6 Step 1 PSet (0.1,y) Next y For x=-8 To 8 Step C y=A*Sin(x)+B PSet (x,y) Next x End Sub,把程序代码输入到运行环境中运行,检测程序能否完成我们的目标,解决我们的问题。,课堂练习,参考sin函数曲线程序,画出函数y=ax2+bx+c的曲线图。,小结,拓展任务:韩信点兵“韩信点兵,多多益善”这句话大家都知道,那究竟这“多多”的士兵共有多少呢?韩信说:“如果每3个人编为一队,那最后剩下1个人;如果每5个人编为一队,那最后剩下

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论