2019浙江选考信息技术Vb基础专题Vb基础专题一、知识要点Visual Basic基本概念1、工程与窗体一个应用程序的总称。
工程文件名的后缀是．vbp。
应用程序最终面向用户的窗口。
窗体文件名的后缀是．frm。
窗体是VB设计时的名称，当它在Windows下运行后就称为窗口。
2、对象及对象的三要素（1）常见的控件（3）对象的属性对象的属性是标识一个对象的所有特征，它实际上就是对象所属类的成员变量。
（4）对象的方法对象的方法是指对象可以进行的操作，也就是对象的动作常见方法：print、clear、additem（5）对象响应的事件(事件驱动)事件是在某种特定状态下由系统触发的方法。
事件驱动是指用VB开发的应用程序的运行，是通过事件来驱动的。
事件过程的一般格式如下：PrivateSub 对象名称＿事件名称（）……事件响应程序代码，我们写的……EndSub3、VB常量、变量、数组及定义常用函数（1）常用的数据类型数据是信息的一种记录形式。
在VB中，数据可以按照本身的特性分为若干种不同的类型，常见类型见下表：（2）常量数据总是以常量或变量的形式出现在程序中。
常量是在程序运行过程中值不变的存储单元或数据。
在VB中，常量有整数常量、实数常量、字符串常量和逻辑常量等类型。
常量的定义方法：Const 常量名＝数值假如：“Const pi ＝ 3.14”，就是定义了一个常量pi，在这个程序中出现的所有pi都会被VB自动转换成3.14。
（3）变量变量是用来表示数据的存储区，也就是存放数据的容器。
VB变量定义的方法：Dim 变量名 As 数据类型例如：Dim a As Integer，即将a 定义为整数型变量。
如果定义两个或两个以上的同类型变量，可以用语句：Dim a, b As Integer，就是定义了a，b 两个整数型变量。
变量定义时，变量的取名有一定的限制，变量的名称跟对象名取名规则相同，都是由字母、数字和下划线组成，必须是字母开头，VB系统中已使用的字符不能作为变量名，比如：Dim String As Integer，该语句错误，因为String 是数据类型名，不能再作为变量名了（4）数组变量数据是由一批同类型的变量构成的一个序列，组成数组的每一个变量被称为数组的元素，也称为下标变量，下标是一个整数，用来指出某个元素在数组中的位置。
一维数组变量定义的常用形式为：Dim 数组变量名(a1 To a2) As 元素的类型二维数组变量定义的常用形式为：Dim 数组变量名(a1 To a2， b1 To b2) As 元素的类型一般情况下，数组变量都采用循环语句进行赋初值。
注意：注释是以英文单引号(')开头的一串文字，可以出现在程序中需要说明语句块0End If（3）循环语句a、For循环语句通过次数控制循环的计算过程。
For语句主要用于循环次数已知的情况，因次，也被称为计数循环。
For语句的一般格式如下：For 循环变量＝初值 To 终值 Step 步长循环体语句块Next 循环变量For语句中步长可以是正数，也可以是负数，但不可为0。
默认的步长为1，即“Step 1”。
Next后面的循环变量与For语句中的循环变量必须一致，执行该语句时循环变量的值增加一个步长值。
注意：一般不要在循环体内修改循环变量的值，否则会造成循环次数的不准确，而且程序调试也非常困难。
如果在循环体内强行退出循环，可用“Exit For”语句。
b、Do循环语句通过条件控制循环的计算过程。
一般情况下，For语句都可以用Do语句来代替，而且在某些情况下，如果事先不知道循环应该执行的次数，但知道在什么条件下需要循环，则不能用For语句而必须用Do语句。
因此，Do语句的适用面比For语句要广。
Do语句的常用格式如下：Do While 条件表达式循环体语句块Loop注意：如果想在Do循环语句中强行退出循环，可用“Exit Do”语句。
8、解析算法解析算法是指用解析的方法找出问题的前提条件与所求结果之间关系的数学表达式，并通过表达式的计算来实现问题求解。
例如：计算以速度作匀速直线运动的一个物体，在t秒内经过的距离s，可通过公式s＝vt得到。
9、枚举算法枚举算法也称穷举算法，就是按照问题本身的性质，一一列举该问题所有可能的解，并在逐一列举的过程中，检验每个可能解是否问题真正的解。
若是，就采纳这个解，否则就抛弃它。
在列举的过程中，既不能遗漏，也不能重复。
比如，要求一个二元一次不定方程的所有正整数解，就可以采用枚举算法。
1、（2015年10月）.编写VB程序，实现如下功能:在文本框Textl和Text2中分别输入一个整数，单击命令按钮Command1,在列表框List1中显示结果，运行效果如第14题-1图所示。
结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。
第1题-1图第1题-2图（1）要使命令按钮Command1上显示的文本改为“转换”，可在其属性窗口（第14题-2图) 中将属性的属性值修改为“转换”。
（2）为实现上述功能，请在划线处填入合适代码或选项。
Private Sub Command1_Click()Dim t1 As Integer, t2 As IntegerDim i As Integer, t As IntegerDim f As SingleList1.Cleart1 = Val(Text1.Text)t2 = Val(Text2.Text)If ① Then '(选填字母,从下列A、B、C、D四个选项中选取一项）t = t1: t1 = t2: t2 = tEnd Ifi = t1Do While ② '(选填字母,从下列A、B、C、D四个选项中选取一项）f = i * 9 / 5 + 32 '摄氏温度转换为华氏温度List1.AddItem Str(i) + " " + Str(f)③ '（填程序代码）LoopEnd Sub划线①、②处的选项:A.i <= t2B.f <= t2C.t1 > t2D. i < f2、（2016年4月）编写VB程序，实现如下功能：在文本框Text1中输入某一年份，单击“天干地支与生肖”按钮Command1，在列表框List1中输出该年份开始的12个年份及对应的“天干地支”与“生肖”，运行界面如图所示，程序代码如下。
（1）代码“Private Sub Command1_Click()”中的Click是。
（单选，填字母：A.对象名/B.属性名/C.事件名）（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()Dim a As Integer, b As IntegerDim i As Integer, n As IntegerDim c1 As String, s1 As StringDim c2 As String, s2 As StringDim c3 As String, s3 As StringList1.Clears1 = "甲乙丙丁戊己庚辛壬癸"s2 = "子丑寅卯辰巳午未申酉戌亥"s3 = "鼠牛虎兔龙蛇马羊猴鸡狗猪"n = Val(Text1.Text)For i = n To ①a = (i + 6) Mod 10b = (i + 8) Mod 12c1 = Mid(s1, a + 1, 1)c2 = Mid(s2, b + 1, 1)c3 = Mid(s3, b + 1, 1)List1.AddItem ② + "年" + c1 + c2 + " " + c3Next iEnd Sub（3）由上述算法可知，2024年对应的“天干地支”为。
3、（2016年10月）编写“加法练习题生成器”程序，实现如下功能：在文本框Text1中输入题数n，单击“生成”按钮Command1，在列表框List1中显示n个两数之和小于100的加法练习题。
程序运行界面如图a所示。
图a 图b（1）在设计程序界面时，应使用图b所示“控制工具箱”中的（填写相应编码）添加“生成”按钮。
（2）实现上述功能的VB程序如下，请在划线处填写合适的代码。
Private Sub Command1_Click()Dim n As Integer, i As Integer, a As Integer, b As IntegerRandomizen = Val(Text1.Text)i = ①Do While i <= na = Int(Rnd * 100)b = Int(Rnd * 100)If ② ThenList1.AddItem "(" + Str(i) + " )" + Str(a) + "+" + Str(b) + "="i = i + 1End IfLoopEnd Sub4、（2017年4月）奇偶校验是一种校验数据传输正确性的方法。
其中奇校验方法：统计二进制数据的数位中“1”的个数，若个数为奇数，则校验位值为0，否则校验位值为1。
小李编写了一个计算奇校验位值得VB程序，功能如下：在文本框Text1中输入1～255十进制待校验数，单击“计算”按钮Command1后，在文本框Text2中显示该数对应的二进制值，并在标签Label3中显示该数的校验位值。
程序运行界面如图所示。
（1）在设计程序界面时，要清空文本框中的显示内容，应修改该文本框中的属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()Dim a As Integer, s As StringDim n As Integer, t As Integer, v As Integern = Val(Text1.Text)t = 0s = ""Do While n > 0a = n Mod 2n = n \ 2t = ①s = Str(a) + sLoopv = t Mod 2Text2.Text = sLabel3.Caption = "校验位值：" + ②End Sub5、（2017年11月）编“字符串生成”程序，实现如下功能：在文本框Text1中（字符位置)输入多个正整数 (以“，”为分割符和结束符），单击“生成”按钮Command1,程序以这些整数为位置信息，依次从文本框Text2中（字典内容）提取字符并连接成字符串，最后将字符串显示在标签Label1中（生成内容）。