VB解析算法及程序实现
3.1解析算法及程序实现 1.计算长方体体积的算法描述如下：(h) (z)、宽(w)、高①输入长方体的长 v = z * w * h ②计算长方形体积③输出结果④结束（）上述算法属于
A. 枚举算法
B. 排序算法
C. 解析算法
D. 递归算法
2.下列问题适合用解析算法求解的是（）
A.将十三张纸牌按从小到大进行排列
B.统计100内偶数的各位数字之和恰好为10的个数
C.计算一辆车行驶100公里的油耗
D.寻找本年级身高最高的同学
3.有如下问题：
12求出此圆锥体的体积。 V=πr ①已知圆锥的半径和高度h，使用公式hr3②已知班级每位同学的其中成绩总分s，按照s的值从大到小进行成绩排名。
③已知圆的周长s，利用公式r=s/(2*3.14)求出圆的半径。
④已知“水仙花数”的定义，找出1～10000范围内所有的水仙花数。
用计算机解决上述问题时，适合用解析算法的是（）
A.①②
B.①③
C.③④
D.②④
4.出租车计价规则：3公里以内，10元；超出3公里每公里增加2元。假定公里数为x,金额为y.解决此问题的公式和流程图如下图所示：
流程图加框处部分的算法属于：（）
A.解析算法
B.排序算法
C.枚举算法
D.递归算法
程序实现如下功能：分别现要求编写VB5.中输入Text3、和Text1、Text2在文本框Command1单击三条线段的长度，“判断”按钮中显示判断结果。程序后，在标签Label1 运行界面如图：按此要求编写的程序如下：Private Sub Command1_Click()
Dim a As Single ,b As Single
Dim c As Single ,st As String
a=Val(Text1.Text)
b=Val(Text2.Text)
c=Val(Text3.Text)
If Not (a + b > c And b + c > a And c + a > b) Then
st = “这三条线不能构成一个三角形” ElseIf a * a + b * b = c * c Or a * a + c * c = b * b Or b * b + c * c = a * a Then
“可以构成一个直角三角形” st =
Then
① ElseIf
“可以构成一个等边三角形” st =
Else
st = “可以构成一个不等边的斜三角形”
End If
Label1.Caption = ②
End Sub
划线处应填写正确的语句是：
（1）划线处①
（2）划线处②
6.下列VB程序段实现计算s=1+1/2+2/3+3/4+…+99/100的值。请将下面划线处代码补充完整。
Private Sub Command1_Click()
Dim i As Integer
Dim s As Double
s=1
For i=2 To 100
s=
Next i
Text1.Text=Str(s)
End Sub
程序划线处应填入的内容是
VB程序代码如下：7.用解析算法求物体重力的Private Sub Command1_Click()
Dim g As Single
Dim m As Single
m=Val(Text1.Text)
g=m*9.8
label1.Caption=Str(g)
End Sub
程序界面如上图所示：中显示的后，标签Label1在文本框输入15，单击“计算”按钮Command1 内容是
8.根据臀围计算裤子尺寸的换算有以下公式：
①尺=厘米*0.03
②码=厘米*0.3+7
如臀围为90厘米，那么在购买时需要选2.7尺（90*0.03）也即34码（90*0.3+7）的裤子，下面VB程序可用于解决此实际问题，程序运行界面如下图所示：
运行程序，在文本框Text1中输入臀围，单击计算“计算”按钮Command1，在标签Label2中显示裤子购买的参考尺寸，程序代码如下：
Private Sub Command1_Click()
Dim n As Single
Dim c As Single
Dim m As Integer
n=Int(Val(Text1.Text))
c=n*0.03
m=
Label2.Caption=“你需要购买”+Str（c）+“尺（”+Str（m）+“）码是裤子”
End Sub
程序划线处应填入的内容是
元；借书超过一天的，9.某书店出租图书的费用标准如下：借书一天内，收费2程序算法结构与最后费用按四舍五入这算成整数。0.8元收取。超过部分按每天运行界面如下图所示。
程序用于解决此问题：下面VBPrivate Sub Command1_Click()
Dim n As Integer
Dim s As Single ①'
n=Val(Text1.Text)
If n<1 Then
MsgBox “输入错误”
ElseIf n=1 Then
s=2
Else
s=2+n*0.8 '②
End If
Text2.Text=Str(s)
End Sub
程序加框处代码有误，请修改以实现该程序的功能。
（1）加框①处应改为
（2）加框②处应改为
中分别输和Text2VB下列程序实现如下功能：程序运行时，在文本框Text110.的值，并在文本计算的值，单击命令按钮Command1后，调用函数fs入x和
n n23xxx??s?x???框Text3中显示计算结果。其中。!3n!!2Private Sub
Command1_Click()
Dim x As Single ,n As Single ,s As Single
x=Val(Text1.Text)
n=Val(Text2.Text)
s=f(x ,n)
Text3.Text= ①
End Sub
Function f(x As Single ,n As Single)As Single
Dim sum As Single ,i As Integer ,t As Single
sum=0
t=1
For i=1 To n
t=t*x/i
sum= ②
Next i
③
End Function
请在划线处填入合适的代码以实现该程序的功能。
（1）划线处①
（2）划线处②
（3）划线处③
VB程序设计习题
练习一 一、选择题 1、下面列出的程序设计语言中（A ）是面向问题的语言。 A、机器语言 B、汇编语言 C、高级语言 D、0、1二进制语言 解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（D ）不属于VB 6.0的版本。 A、学习版 B、专业版 C、企业版 D、共享版 解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题 1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。 3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。 练习二 一、选择题 1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为蓝色的语句正确的是（ A ） A、Forma1.Backcolor=vbBlue B、Backcolor= vbBlue C、Forma1 =vbBlue D、Forma1′s Backcolor is vbBlue. 2、下面方法中，不能打开编码编辑器的是（D） A、单击“视图”菜单中的“代码窗口”命令。 B、双击窗体设计器的窗体或控件。 C、双击窗体设计器的窗体或控件，单击工程资源管理器中的“查看代码”按钮。 D、双击窗体设计器的窗体或控件，单击标准工具栏中的“代码窗口”按钮。 3 、保存VB应用程序时，下列方法中正确的是（Ａ） A、先保存窗体文件，再保存工程文件。 B、先保存工程文件，再保存窗体文件 C、直接保存窗体文件，系统会自动按顺序先保存窗体文件再保存工程文件。 D、直接保存窗体文件，系统会自动按顺序先保存工程文件再保存窗体文件。 二、填空题 1、VB工程文件的扩展名是工程文件(*.vbp)，窗体文件的扩展名是窗体文件(*.frm)。 2、选中工程资源管理器中的窗体对象，再单击按钮可打开窗体设计器。 3、在VB中，按下工具栏中的“启动”按钮或
高中信息技术《算法与程序设计VB(选修)》
一、算法 （1）、计算机解决问题的过程 计算机程序（Computer Program）是计算机如何去解决问题完成任务的一组可执行指令。 程序设计（Program Design）是寻找解决问题的方法，并将其实现步骤编写成计算机可执行的程序的过程。 程序设计语言（Program Language）泛指一切用于书写计算机程序的语言。 计算机解决问题和人解决问题有着本质区别：计算机解决问题要经历分析问题、确定算法、编程求解等基本过程主。计算机解决问题的流程如下： 开始→分析问题→设计算法→编写程序→运行程序→结束 编写程序时，首先要对问题进行详细分析，明确已知条件下的初始状态及要达到的目标，找出解决问题的方法和过程，并抽取出一个数学模型，形成算法；然后将这个数学模型连同它要处理的数据，用计算机能识别的方式描述出来，使之成为计算机能处理的对像；最后用程序设计语言设计出具体的问题求解过程，形成计算机程序。 （2）算法的描述方法 ①、算法的定义及其特征 算法：就是解决问题的思想方法，对解题过程的精确描述。 计算机解决问题的步骤为分析问题、设计算法、编写程序、调试程序。 算法是程序设计的“灵魂”，世界著名计算机科学家尼克劳斯·沃斯（N.With）指出：算法+数据结构（Data Structure）=程序。 算法具有以下特征。 1、有穷性：一个算法必须保证执行有限步之后结束； 2、确定性：算法的每一步骤必须有确切的定义； 3、输入：一个算法有0个或多个输入，以刻画运算对象的初始情况，所谓0个输入是指算法本身定出了初始条件； 4、输出：一个算法有一个或多个输出，以反映对输入数据加工后的结果。没有输出的算法是毫无意义的； 5、可行性：算法中执行的任何计算步都是可以被分解为基本的可执行的操作步，即每个计算步都可以在有限时间内完成；（也称之为有效性） ②、算法的描述方法有自然语言、流程图、伪代码三种形式 自然语言描述法：指用人们日常生活中使用的语言（本国语言），用自然语言描述符合我们的习惯，且容易理解。 例1：求圆的周长和面积 算法如下：（自然语言描述法） (1)输入半径r ； (2) 计算周长c=2*π*r ； (3) 计算面积 s=π*r*r ； (4) 输出周长c，输出面积s ； (5) 结束 流程图描述：也称程序框图，它是算法的一种图形化表示方法。且描述算法形象、直观，更易理解。
VB程序设计的常用算法填空题
VB程序设计的常用算法 例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。 将程序编写在一个GetTJput过程中，代码如下： Public Sub GetTJput() Dim a(1 To 100) As Integer Dim x(1 To 10) As Integer Dim i As Integer, p As Integer '产生100个[0，99]范围内的随机整数，每行10个打印出来 For i = 1 To If a(i) < 10 Then Form1.Print Space(2); a(i); Else Form1.Print Space(1); a(i); End If If Then Next i '统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来For i = 1 To 100 p = a(i) Mod 10 ' 求个位上的数字 If p = 0 Then p = 10 Next i Form1.Print "统计结果" For i = 1 To 10 p = i If i = 10 Then p = 0 Form1.Print "个位数为" + Str(p) + "共" + Str(x(i)) + "个" Next i End Sub 二、求两个整数的最大公约数、最小公倍数 m=inputBox("m=") n=inputBox("n=") nm=n*m If m < n Then r=m mod n Do While m=n n=r
VB解析算法及程序实现
3.1解析算法及程序实现 1.计算长方体体积的算法描述如下：(h) (z)、宽(w)、高①输入长方体的长 v = z * w * h ②计算长方形体积③输出结果④结束（）上述算法属于 A. 枚举算法 B. 排序算法 C. 解析算法 D. 递归算法 2.下列问题适合用解析算法求解的是（） A.将十三张纸牌按从小到大进行排列 B.统计100内偶数的各位数字之和恰好为10的个数 C.计算一辆车行驶100公里的油耗 D.寻找本年级身高最高的同学 3.有如下问题： 12求出此圆锥体的体积。 V=πr ①已知圆锥的半径和高度h，使用公式hr3②已知班级每位同学的其中成绩总分s，按照s的值从大到小进行成绩排名。 ③已知圆的周长s，利用公式r=s/(2*3.14)求出圆的半径。 ④已知“水仙花数”的定义，找出1～10000范围内所有的水仙花数。 用计算机解决上述问题时，适合用解析算法的是（） A.①② B.①③ C.③④ D.②④ 4.出租车计价规则：3公里以内，10元；超出3公里每公里增加2元。假定公里数为x,金额为y.解决此问题的公式和流程图如下图所示： 流程图加框处部分的算法属于：（） A.解析算法 B.排序算法 C.枚举算法 D.递归算法
程序实现如下功能：分别现要求编写VB5.中输入Text3、和Text1、Text2在文本框Command1单击三条线段的长度，“判断”按钮中显示判断结果。程序后，在标签Label1 运行界面如图：按此要求编写的程序如下：Private Sub Command1_Click() Dim a As Single ,b As Single Dim c As Single ,st As String a=Val(Text1.Text) b=Val(Text2.Text) c=Val(Text3.Text) If Not (a + b > c And b + c > a And c + a > b) Then st = “这三条线不能构成一个三角形” ElseIf a * a + b * b = c * c Or a * a + c * c = b * b Or b * b + c * c = a * a Then “可以构成一个直角三角形” st = Then ① ElseIf “可以构成一个等边三角形” st = Else st = “可以构成一个不等边的斜三角形” End If Label1.Caption = ② End Sub 划线处应填写正确的语句是： （1）划线处① （2）划线处② 6.下列VB程序段实现计算s=1+1/2+2/3+3/4+…+99/100的值。请将下面划线处代码补充完整。 Private Sub Command1_Click() Dim i As Integer Dim s As Double s=1 For i=2 To 100 s= Next i
高中信息技术算法与程序设计VB知识点
高中信息技术《算法与程序设计VB(选修)》 知识要点 相关知识点 (一)算法 1、定义 相关题解: 1算法:就就是解决问题的方法与步骤。算法就是程序设计的“灵魂”,算法+数据结构＝程序。运用计算机程序解决实际问题时,合理的步骤就是B、分析问题→设计算法→编写程序→调试程序 2.算法的描述方法: 1算法的描述:可分多种表达方法,一般用自然语言、流程图与伪代码进行描述。 2自然语言描述法:指用人们日常生活中使用的语言(本国语言),用自然语言描述符合我们的习惯,且容易理解。 3流程图描述:也称程序框图,它就是算法的一种图形化表示方法。且描述算法形象、直观,更易理解。 4伪代码描述法:就是介于自然语言与计算机程序语言之间的一种算法描述。就是专业软件开发人员常用方法。 (二) 程序设计基础 对象、属性＝属性值 对象中属性可以在设计界面时通过属性窗中设置,也可以在运行时通过程序代码设置,方法如下例:给文本框“Txt123”的“Text”属性赋值为字符串“20”,代码如下 Txt123、text =”20” 变量＝对象、属性 如果要获取对象的状态或特性,这时就要读取对象的属性值,方法如下 例:读取文本框“txt123”的“Text”属性的代码如下 a = txt123、text 2方法 ［对象］、方法［参数名表］ 例:form、print ”欢迎使用” 该语句使用print方法在form1窗体中显示字符串“欢迎使用” 3事件及事件驱动 事件就是对象对外部操作的响应,如在程序执行时,单击命令按钮会产生一个Click事件。如需要命令按钮响应Click事件,就把完成Click事件功能的代码写到Click事件的事件过程中,与事件一
vb程序设计的几个简单例子
Option Explicit Private Sub Command1_Click() Dim i%, j%, r! i = Val(Text1.Text) j = Val(Text2.Text) Picture1.Print i; j; Call gysh(i, j) Picture1.Print "最大公约数是" & i r = Val(InputBox("输入半径")) Call S(r) End Sub Public Function gysh(m As Integer, n As Integer) As Integer Dim t% Do t = m Mod n: m = n: n = t Loop While t <> 0 End Function Public function S(r!) Const pi = 3.1415926 S = pi * r ^ 2 MsgBox "圆面积为：" & S End function Public Function 定积分() End Function
Dim a() As Integer, i%, j%, n%, t% Private Sub Command1_Click() Picture1.Print "排序前的数组为：" n = V al(InputBox("请输入一个3到100的整数")) ReDim a(1 To n) Randomize For i = 1 To n a(i) = Int(Rnd * 100) + 1 Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next i End Sub Private Sub Command2_Click() Picture1.Print Picture1.Print "排序后的数组为：" For i = 1 To n - 1 For j = i + 1 To n If a(i) > a(j) Then t = a(i) a(i) = a(j) a(j) = t End If Next Next For i = 1 To n Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next End Sub
算法与程序设计复习资料
江苏省高中信息技术算法与程序设计（选修） 复习要点 相关知识点 （一）算法 1.定义 1算法：就是解决问题的方法和步骤。算法是程序设计的“灵魂”，算法+数据结构＝程序。单选题 1、下列关于算法说法不正确的是( A ) A、算法独立于任何具体的语言，BASIC算法只能用BASIC语言来实现 B、解决问题的过程就是实现算法的过程 C、算法是程序设计的“灵魂” D、其它三项都正确 2．算法的描述方法： 1算法的描述：可分多种表达方法，一般用自然语言、流程图和伪代码进行描述。 2自然语言描述法：指用人们日常生活中使用的语言（本国语言），用自然语言描述符合我们的习惯，且容易理解。 3流程图描述：也称程序框图，它是算法的一种图形化表示方法。且描述算法形象、直观，更易理解。 4伪代码描述法：是介于自然语言和计算机程序语言之间的一种算法描述。是专业软件开发人员常用方法。 相关题解： 单选题 1、图形符号" "在算法流程图描述中表示( B ). A 处理或运算的功能 B 输入输出操作 C 用来判断条件是否满足需求 D 算法的开始或结束 2、图形符号在算法流程图描述中表示( A ). A 处理或运算的功能 B 输入输出操作 C 用来判断条件是否满足需求 D 算法的开始或结束 3、以下哪个是算法的描述方法?( A ) A 流程图描述法 B 枚举法 C 顺序法 D 列表法
4、以下哪个是算法的描述方法?( D ) A 顺序法 B 列表法 C 集合法 D 自然语言描述法 （二）程序设计基础 （1）常用高级编程语言：BASIC、VB、Pascal、C、C++、Java 1面向对象的程序设计语言：其中的对象主要是系统设计好的对象，包括窗体等、控件等2控件：是指工具箱中的工具在窗体中画出的、能实现一定功能的部件，如文本框，命令按钮等。 对象属性＝属性值 对象中属性可以在设计界面时通过属性窗中设置，也可以在运行时通过程序代码设置方法如下 例：给文本框“Txt123”的“Text”属性赋值为字符串“20”，代码如下 Txt123.text =”20” 变量＝对象.属性 如果要获取对象的状态或特性，这时就要读取对象的属性值，方法如下 例：读取文本框“txt123”的“Text”属性的代码如下 a = txt123.text
VB程序设计知识点归纳
第一章 1 从功能上讲，Visual Basic 6.0有3种版本，即：学习版、专业版、企业版 2 与传统的程序设计语言相比，Visual Basic最突出的特点是事件驱动编程机制。 3 Visual Basic 6.0集成环境的主窗口中含有标题栏、菜单栏、工具栏 4用标准工具栏中的工具按钮不能执行的操作是打印源程序。 5关于Visual Basic"方法"的概念错误的是方法是对事件的响应 6在Visual Basic中，称对象的数据为属性 7Visual Basic应用程序可以用解释方式执行也可以用编译方式执行 第二章 1 计时器控件的Interval属性用于设置Timer事件发生的时间间隔，为了暂时关闭计时器，应把该计时器的Enabled 属性设置为False ，如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于1000 2 利用Ctrl + G操作可以打开立即窗口。 3 假定窗体上有一个标签，名为Lable1。为了使该标签透明并且没有边框，则正确的属性设置为：Lable1.BackStyle = 0 Lable1.BorderStyle = 0 4在设计阶段，当双击窗体上的某个控件时，所打开的窗口是代码窗口 5 在Visual Basic中，窗体文件的扩展名为FRM 6 窗体的Name属性指定窗体的名称，用来标识一个窗体 7 改变控件在窗体中的上下位置，应修改该控件的属性是Top 8 表示滚动条控件取值范围最大值的属性是Max 9 如果要改变窗体的标题，则需要设置的属性是Caption 10 在文本框（Text）中，通过ForeColor属性来设置字体颜色 11 若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置Passwordchar属性值 为* 12 能够改变复选框中背景颜色的属性是Backcolor 13 图片框是不具有Picture属性的对象 14 窗体的Name属性指定窗体的名称，用来标识一个窗体 15 要想返回文本框中输入的内容则可利用text属性进行编程 第三章 1用于从字符串左边截取字符的函数是Left( )，设a="Visual Basic"，使b="Basic"的语句是b=Left(a,8,5)。 2下列符号中哪个是VB程序中合法的变量名：A ab7 B 7ab C If D a*bc （A）数字开头，关键字，* 3X是小于100的非负数，用VB表达式表达正确的是0<=X and X<100 4设有如下变量声明Dim TestDate As Date 为变量TestDate正确赋值的表达方式是 TextDate=#1/1/200 2# 5表达式4 + 5 \ 6 * 7 / 8 Mod 9的值是5，设a=3,b=5，则表达式(a>b)Or(b>0)值为真。5/5.25 为1 如果除数与被除数不是整数时，系统会自动对其进行取整运算，取整是有规律的：如果整数部分为偶数，大于 0.5的就进位，小于等于0.5的就直接把小数去掉，5舍6入；如果整数部分为奇数，4舍5入。例如： 5\2.5等价于5\2 5\2.6等价于5\3 6函数String(n，"str")的功能是返回由n个字符组成的字符串 7设有如下声明： Dim X As Integer 如果Sgn(X) 的值为-1，则X的值是小于0的数Sgn(3-5)=-1 Sgn(5-3)=1 8Integer类型的数据由2字节组成，Long类型的数据由4字节组成。 9已知X＜Y，A＞B，正确表示它们之间关系的式子是Sgn(Y-X)-Sgn(A-B)=-2 10在一个有①逻辑运算②算术运算及③关系运算混合在一起的表达式(无括号)中，其运算顺序为②③①
算法与程序设计VB选修
高中信息技术《算法与程序设计VB （选修）》 知识要点 相关知识点 （一）算法 1.定义 相关题解： 1算法：就是解决问题的方法和步骤。算法是程序设计的“灵魂”，算法+数据结构＝程序。 单选题 1、下列关于算法说法不正确的是( A ) A 、算法独立于任何具体的语言，BASIC 算法只能用BASIC 语言来实现 B 、解决问题的过程就是实现算法的过程 C 、算法是程序设计的“灵魂” D 、其它三项都正确 2．算法的描述方法： 1算法的描述：可分多种表达方法，一般用自然语言、流程图和伪代码进行描述。 2自然语言描述法：指用人们日常生活中使用的语言（本国语言），用自然语言描述符合我们的习惯，且容易理解。 3流程图描述：也称程序框图，它是算法的一种图形化表示方法。且描述算法形象、直观，更易理解。 4伪代码描述法：是介于自然语言和计算机程序语言之间的一种算法描述。是专业软件开发人员常用方法。 相关题解： 单选题 1、图形符号" " 在算法流程图描述中表示( B ). A 处理或运算的功能 B 输入输出操作 C D 算法的开始或结束 2、图形符号在算法流程图描述中表示( A ). A B 输入输出操作 C 用来判断条件是否满足需求 D 算法的开始或结束 3、以下哪个是算法的描述方法?( A ) A 流程图描述法 B 枚举法 C 顺序法 D 列表法 4、以下哪个是算法的描述方法?( D ) A 顺序法 B 列表法 C 集合法 D 自然语言描述法 （二）程序设计基础
（1）常用高级编程语言：BASIC、VB、Pascal、C、C++、Java 1面向对象的程序设计语言：其中的对象主要是系统设计好的对象，包括窗体等、控件等 2控件：是指工具箱中的工具在窗体中画出的、能实现一定功能的部件，如文本框，命令按钮等。 对象属性＝属性值 对象中属性可以在设计界面时通过属性窗中设置，也可以在运行时通过程序代码设置,方法如下例：给文本框“Txt123”的“Text”属性赋值为字符串“20”，代码如下 Txt123.text =”20” 变量＝对象.属性 如果要获取对象的状态或特性，这时就要读取对象的属性值，方法如下 例：读取文本框“txt123”的“Text”属性的代码如下 a = txt123.text
算法与程序设计(VB)论文：算法与程序设计(VB)的反思性学习
算法与程序设计(VB)论文：算法与程序设计(VB)的反思性学 习 【摘要】高中信息技术课程标准是以普通高中整体改革为背景的，新课标注重提高信息素养，打造终身学习的平台，培养解决问题的能力，共同建构健康的信息文化。本文就高中算法与程序设计教学，浅谈了自己的几点思考：即教师在正确认识高中阶段开设程序设计教学的重要性基础之上，如何培养学生的反思性学习能力，从而更好的开展程序设计教学，提高学生的信息素养。 【关键词】程序设计教学；认识；反思性学习 江苏省《高中信息技术课程标准要求》指出：选修“算法与程序设计”模块以算法与程序设计为主线，揭示利用计算机解决实际问题的过程。通过本模块的教学，让学生体验算法思想，了解算法与程序设计在解决问题过程中的地位和作用。使学生能从简单问题出发，设计解决问题的算法，并能初步使用一种程序设计语言编制程序、实现算法、解决问题。就高中程序设计教学而言，笔者有这样几点思考。 一、对高中阶段开设程序设计教学的认识 高中阶段开设算法与程序设计教学有其必要性。学生在高中阶段打下基础，有利于他们进入大学的深造和就业以后的继续教育。此外，高考数学中加入了算法模块，也证明了
开设算法与程序设计教学的重要性。 算法与程序设计属于较高层次的学习内容，所以学习的深度和广度要由教师具体情况具体对待。教师要帮助学生充分认识到该部分内容的重要性，让学生在学习过程中积极发挥主观能动性，从而促使教学工作科学、合理、有效地开展。 二、程序设计教学中培养学生反思性学习能力 反思性学习，顾名思义就是通过对学习活动过程的反思来进行学习。学生具有反思性学习的意识是反思性学习的前提。让学生明确没有反思便难有自我改错纠偏的道理；明确反思不仅能及时改正错误，还能优化已有认识，提高自身合理性水平。对于学生的成功予以适当表扬与鼓励，还可以达到强化学生反思意识的效果。另外，教师要营造开放、合作、协调、信任的教学氛围，鼓励学生大胆地质疑，给出别出心裁的答案。学生智慧的激活，会反作用于教师和其他学生，使其能在更高层次上积极思维，从而在师生、学生间积极思维的互动中，不断闪耀出智慧的光芒，从而建立一种互动的反思关系。 反思性学习不仅仅是对学习一般性的回顾或重复，而是深究学习活动中所涉及的知识、方法、思路、策略等，具有了较强的科学研究的性质。新课标强调关注每个学生的情感、态度、价值观和一般能力的培养。所以在教学中，教师
完整word版,VB程序设计例题12例
索引 一、在窗体上画一个文本框，其名称为Text1，Text属性为空白。再画一个命令按钮，其名称为C1，Visible属性为False。编写适当的事件过程。程序运行后，如果在文本框中输入字符，则命令按钮出现。 二、计算圆的周长和面积：在窗体中添加一个文本框（Text1）和一个对应的标签（Label1），再添加两个命令按钮（Command1和Command2）和一个图片框（Picture1）。程序运行时，当单击Command1按钮后，计算圆的周长；当单击Command2按钮后，计算圆的面积；计算结果输出在图片框中。（要求在未输入半径前两个按钮呈灰色不可用。） 三、在窗体上添加三个文本框和对应的三个标签，标签的标题分别是“个位”、“十位”、“百位”。程序运行时，当单击窗体后，随机产生一个【100，999】区间内的整数，将它的个位、十位、百位数字分别显示在对应的文本框中。 四、设计一个计算程序：在窗体上添加四个文本框和四个对应的标签，标签的标题分别是“语文”、“数学”、“外语”、“平均成绩”，三个命令按钮，标题分别为“清除”、“计算”、“退出”。程序运行后，用户按“清除”按钮，则清除文本框中显示的内容，按“计算”按钮，则计算三科平均成绩，将计算结果显示在第四个文本框中（计算结果保留小数点后一位）。单击退出按钮则程序退出。 五、某税务部门征收所得税，规定如下：（1）收入200元以内，免征。（2）收入在200~400元，超过200元的部分纳税3%。（3）收入超过400元的部分，纳税4%。（4）当收入达5000元或超过时，将4%税金改为5%。编程序实现上述操作。 六、给定三角形的三条边的边长，计算三角形的面积。编写程序，首选判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。 七、编程求100以内的全部素数。 八、编程打印钻石图案。 九、输出杨辉三角形。 十、有一个数组，包含了10个不同的随机整数（20~90），要求计算出它们的平均值，并输出这个数组中最接近于平均值的数。 十一、在一个窗体上建有包含三个命令按钮的控件数组和一个文体框。编程实现当按下标题不同的命令按钮时，使文体框中文字的字体发生相应的变化。 十二、编程求1000以内的完全数。所谓完全数是指这样的自然数：它的各个约数（不包括该数本身）。如28=1+2+4+7+14就是一个完全数。
VB编程常用代码 大一练习专用
A,B,C排序由大到小 Dim a As Single,b As Single,c As Single a=Val(Text1.Text) b=Val(Text2.Text) c=Val(Text3.Text) If b>a Then d=a:a=b:b=d End If If c>a Then d=a:a=c:c=d End If If c>b Then d=b:b=c:c=d End If Text4.Text=a Text5.Text=b Text6.Text=c End Sub Private Sub Command2_Click() Text1.Text="" Text2.Text="" Text3.Text="" Text4.Text="" Text5.Text="" Text6.Text="" End Sub 计算a+b Private Sub Command1_Click() Text4.Text=Val(Text2.Text)+Val(Text3.Text) Text1.Text="欢迎新同学" End Sub 清除
Private Sub Command2_Click() Text1.Text="" Text2.Text="" Text3.Text="" Text4.Text="" End Sub 奇偶数显示器 显示 Private Sub Command1_Click() Dim a As Integer a=Val(Text1.Text) If a/2=Int(a/2)Then Text2.Text="您输入的数是偶数" Else Text2.Text="您输入的数是奇数" End If End Sub 清除 Private Sub Command2_Click() Text1.Text="" Text2.Text="" End Sub 奇偶数判断 Dim a,b As Integer Dim result As Integer a=Val(InputBox("请输入一个整数","数的输入",300,400)) b=Val(InputBox("请输入一个整数","数的输入",300,400)) If a/2=Int(a/2)Then result=MsgBox("您输入的数:"&a&"是一个偶数",1,"判断结果") Form1.Print rusult Else m="您输入的数:"&a&"是一个奇数" result=MsgBox("您输入的数:"&a&"是一个奇数",1,"判断结果") Form1.Print result End If If b/2=Int(b/2)Then result=MsgBox("您输入的数:"&b&"是一个偶数",1,"判断结果") Form1.Print rusult Else result=MsgBox("您输入的数:"&b&"是一个奇数",1,"判断结果")
算法与程序设计
算法与程序设计（选修） 相关知识点 （一）算法 1.定义 相关题解： 单选题 1、下列关于算法说法不正确的是( A ) A 、算法独立于任何具体的语言，BASIC 算法只能用BASIC 语言来实现 B 、解决问题的过程就是实现算法的过程 C 、算法是程序设计的“灵魂” D 、其它三项都正确 2、下列关于算法说法不正确的是( D ) . A 、算法是程序设计的“灵魂” B 、解决问题的过程就是实现算法的过程 C 、其它三项都正确 D 、算法独立于任何具体的语言，BASIC 算法只能用BASIC 语言来实现 2．算法的描述方法： （1）自然语言描述法； （2）流程图描述法； （3）常用流程图的符号意义。 相关题解： 单选题 1、图形符号" "在算法流程图描述中表示( B ). A 处理或运算的功能 B 输入输出操作 C 用来判断条件是否满足需求 D 算法的开始或结束 2、图形符号 在算法流程图描述中表示( A ). A 处理或运算的功能 B 输入输出操作 C 用来判断条件是否满足需求 D 算法的开始或结束 3、以下哪个是算法的描述方法?( A ) A 流程图描述法
B 枚举法 C 顺序法 D 列表法 4、以下哪个是算法的描述方法?( D ) A 顺序法 B 列表法 C 集合法 D 自然语言描述法 （二）程序设计基础 （1）常用高级编程语言：BASIC、VB、Pascal、C、C++、Java 相关题解： 单选题 1、下列关于程序设计说法正确的是( B )。 A、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程，比 较流行的高级语言是PASCAL, FORTRAN, EXCEL, C++等 B、程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程 C、程序设计语言和计算机语言是同一个概念的两个方面 D、程序设计就是指示计算机如何去解决间题或完成一组可执行指令的过程 2、下列说法错误的是（D ）. A、程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程 B、程序设计语言的发展经历了机器语言、汇编语言、高级语言的过程 C、计算机程序就是指计算机如何去解决间题或完成一组可执行指令的过程 D、程序设计语言和计算机语言是同一概念的两个方面 2．数据及运算 （1）常用数据类型：Integer、Long、Single、Double、Boolean 表示范围： Integer (-32768 ——32767，存储为16 位，2 个字节) Long(-21亿——21亿，可以表示人口数量) Boolean(True 或False) （2）常量和变量的命名、声明及赋值 符号常量的声明：Const 常量名As 常量类型= 常量值 如：Const pi As Single = 3.14159 变量的声明： Dim 变量名As 变量类型 如：Dim a As Integer 定义一个整型变量，变量名为a 相关题解： 单选题 1、下列变量名写法错误的是( B ) A、abc_123 B、123abc C、abc123 D、abc 2、下列语句中定义了一个实型变量的是( B ) A、Dim end as Integer
VB程序设计例题程序改错程序填空程序设计
'以下程序段用于输出杨辉三角:结果样式如图1 ' Private Sub Form_Click() Const n = 10 Dim arr(n, n) As Integer For I = 1 To n arr(I, I) = 1 '**********SPACE********** 【arr(I, 1) = 1】 Next I For I = 3 To n For j = 2 To I - 1 '**********SPACE********** arr(i, j) =arr(i-1,j-1)+arr(i-1,j) Next j Next I For I = 1 To n For j = 1 To I '**********SPACE********** 【print arr(I,j)】 Next j Print Next I End Sub Option Explicit '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目：用自定义函数的方法求sum（x），求当-1≤x≤1时，' sum（x）=x/2！+x^2/3!+x^3/4!+……+x^n/(n+1)!， ' 当x〉1或x〈-1时，函数值为0。当n〈=0时，输入数' 据错误。X、N都是由用户输入。 '------------------------------------------------ '注意：不可增加或删除程序行，也不可以更改程序结构 '------------------------------------------------ Private Sub Command1_Click() Dim s As Single Dim n As Integer, x As Single, k As Integer n = Val(InputBox("Please input a integer value:"))
VB可视化程序设计实例——小时钟
VB可视化程序设计实例——小时钟 本例专门针对程序设计初学者而设计，尤其适合第一次接触VB的学生学习。通过用VB来设计如图3.39所示的时钟程序，初步感受一下可视化和面向对象的程序设计过程。 图3.39 时钟程序运行效果 小时钟程序中包含窗体控件、标签控件和计时器控件等3个控件。窗体控件是小时钟程序运行时的窗口，标题栏上的标题是“时钟”，在右上角有最小化、最大化和关闭按钮。标签控件可以用来显示文本，本例中用来显示时间，如“9:48:57”。计时器控件每秒一次把计算机的当前系统时间显示到标签控件中，使得小时钟不停地运行。Array启动VB，首先显示“新建工程”对话框（图3.40），在选择“新建”选项卡中的“标 准EXE”项后，单击“打开”按钮，进入VB编程环境，如图3.41所示。 图3.40 “新建工程”对话框
图3.41 VB 可视化编程环境 除了标题栏、菜单栏和标准工具栏外，编程环境中还有工具箱、窗体和属性等窗口。 双击工具箱（图3.42）中的标签控件，在窗体Form1中放置可以显示文本信息的标签控件Label1，见图3.43。时钟的时、分和秒以后就显示在Label1中。拖曳Label1可以移动它，拖曳它的八个控制点，可以改变它的大小。 图3.42 工具箱 图3.43 label1控件 图3.44 计时器控件 双击工具箱中的计时器控件，在窗体Form1中放置计时器控件Timer1，见图3.44。计时器控件以一定的时间周期，调用一个事件。计时器控件只有在设计阶段出现在窗体上，程序运行时是不可见的，它的位置和大小无关紧要。 到目前为止，已经建立了窗体Form1、标签控件Label1和计时器控件Timer1等3个对象。下面，将设置它们的属性。 窗体窗口
VB程序设计的常用算法教案.doc
VB程序设计的常用算法教案 算法（algorithm）：计算机解题的基本思想方法和步骤。算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。通常使用自然语言、结构化流程图、伪代码等来描述算法。 一、计数、求和、求阶乘等简单算法 此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。 例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。 本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，......个位是0的个数存放在x(10)。 将程序编写在一个gettjput过程中，代码如下： public sub gettjput() dim a(1 to 100) as integer
dim x(1 to 10) as integer dim i as integer, p as integer '产生100个[0，99]范围内的随机整数，每行10个打印出来 for i = 1 to 100 a(i) = int(rnd * 100) if a(i) < 10 then form1.print space(2); a(i); else form1.print space(1); a(i); end if if i mod 10 = 0 then form1.print next i '统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来 for i = 1 to 100 p = a(i) mod 10 ' 求个位上的数字 if p = 0 then p = 10 x(p) = x(p) + 1 next i form1.print "统计结果"
VB程序的三种基本结构复习课教学案例
《VB程序的三种基本控制结构》 复习课教案 平桂高级中学陀君一、案例背景信息 模块：算法与程序设计 年级：高一年级 所用教材版本：粤教版《算法与程序设计》 学时数：1课时（40分钟） 二、教学设计： 1、教学目标： 知识与技能：能根据流程图正确区分VB程序的三种基本结构，并记住相关语句格式，能编写出简单明了的程序关键代码； 过程与方法：充分认识VB程序中三种基本结构的实用性，体会生活中算法的存在和精彩。 情感态度与价值观：培养学生在学习过程中积极思考、自我探究的能力和学以致用的意识。 2、教学重点：顺序、选择（分支）和循环三种基本结构的区分及其对应的VB 语句的使用。 教学难点：for循环结构，各类语句关键代码的编写。 三、教学实录 1．复习引入 师：我们之前学过VB的基本结构，通常程序有三种最基本的结构，是哪三种结构？ 大部分学生在底下小声回答，师让某生回答，说：顺序模式、分支模式、循环模式。
师：分支模式也可称为？ 部分学生：选择模式。 师：非常好，接下来看下这三种结构的流程图，然后分别指出这三个流程图是什么结构。（出示三种流程图结构） 2．正题 （1）顺序结构P38： 执行第一条语句后，必然从第二条语句继续，顺序执行所有的语句，直到执行完最后一条语句为止。 例1：例1、 a=1 b=2 c=a+b a=c-a b=c-a
最后，变量b的值是（ 1 ） （2）选择结构（分支结构）：P42 根据条件判断其是否成立，如果成立执行成立的分支；否则执行另一分支。其一般形式为： If 条件Then 语句序列1 Else 语句序列2 End If 单行形式为： If 条件Then 语句组1 Else 语句组2 例2、a =10 If a>=10 Then a=a+1 Else a=a-1 End If 该程序段运行后，变量a的值是（ D ） A. 8 B. 9 C. 10 D. 11 【师读题，学生思考。请同学回答，让同学们思考a=5结果是多少】 （3）循环结构：P51 根据条件判断其是否成立，如果条件成立则重复执行循环体（循环结构中某语句序列），直到条件不成立，退出循环结构为止。 循环结构的常用形式为： for 循环变量= 初值to 终值[step 步长] [循环体] next [循环变量]