2019浙江选考信息技术Vb基础专题

合集下载

浙江高中技术选考第二轮复习VB基础3

浙江高中技术选考第二轮复习VB基础3

第二轮VB基础3
行政班:教学班:姓名:学号:
一、随机函数Rnd/Rnd()
记住:Rnd范围为[0,1)
1、产生随机数,范围为[0,10)的实数,并存储在Double类型变量x中
2、产生随机数,范围为[0,10)的整数,并存储在Integer类型变量x中
3、产生随机数,范围为[5,16)的整数,并存储在Integer类型变量x中
4、产生随机数,范围为[5,16]的整数,并存储在Integer类型变量x中
例如: Dim a(1 to n) as Integer,当n=10时,假设每个数组元素已经赋值如下:
5、将数组元素a(i)的值在文本框Text1上显示
6、将数组元素a(i)的值在标签Label1上显示
7、将数组元素a(i)的值添加到列表框List1中显示
8、将数组元素a(i)前面1个元素的值存储在Integer类型变量x中
9、将数组元素a(i)后面1个元素的值存储在Integer类型变量x中
二、完善程序,并上机调试完成作品。

浙江省高中信息技术选考加试题VB专项练习题二及答案

浙江省高中信息技术选考加试题VB专项练习题二及答案

浙江省高中信息技术选考加试题VB专项练习题二一、选择题:本大题13小题,第小题2分,共26分。

在每小题给出的四个选项中,只有一个是符合题目要求的。

1.在VB中,用变量p存储货物编码(如"0188901190",其中每二位数字都代表相应的含义),则合适的数据类型应定义为:(A)Single (B)Long (C)String (D)Boolean2.下列VB表达式中计算结果为4的是:(A)len(“a1234”)(B)Sqr(4)(C)Fix(3.6)(D)Abs(Int(4.2))3.编写小型VB程序时,下面选项可省的是:①布局界面②编写事件处理代码③通过属性窗口设置控件属性④在事件处理过程中必须加入设置控件属性的代码⑤调试、运行程序⑥给每行程序代码增加程序注释(A)②③④(B)①④⑤(C)②⑤⑥(D)④⑥4.将数学表达式sin30o+3x2写成VB表达式,正确的是:(A)Sin(30)+3x2(B)Sin30+3x2(C)sin(30*3.1416/180)+3*x^2(D)Sin(30o)+3*x^25.下列可作为VB变量名的是:(A)const(B)not(C)edu93(D)Zj2011#6.某VB程序代码如下:Private Sub Command1_Click()Dim s(5) As Integers(0) = 10For i = 1 To 5s(i) = s(i - 1) Mod 3Next iPrint s(1)Print s(5)End Sub则程序运行后的输出结果是:(A)1 5(B)0 2(C)0 7(D)1 17.如果a=5,b=4,执行“if a>b then x=5 else y=4”后,变量x和y的值改变的是:(A)x和y都发生改变(B)x改变,y不变(C)x不变,y改变(D)x和y都没改变8.VB表达式int(rnd(-5))+val("0580")的值是:(A)580(B)-50580(C)575(D)05809.某VB程序代码如下:Private Sub Command1_Click()Text1.Text = Text2.TextEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenText2.Text = Text1.TextEnd IfEnd Sub如果在文本框text1和text2中分别输入6和12,然后单击命令按钮Command1,则文本框text1和text2分别显示的内容是:(A)6 6(B)12 12(C)12 6(D)6 1210.标签控件Label的常用属性是:(A)text(B)caption(C)form(D)name11.有如下VB程序段Private Sub Command1_Click()For i = 1 To 3 step 2x = Mid("330903", 1, 2)Next iPrint xEnd Sub该程序执行后,窗体上显示的值是:(A)33(B)09(C)03(D)9012.小王同学在调试VB程序时,会出现下图错误提示信息的是:(A)Function sina(n) As Integer .......End Function (B)Private Sub abc(a, b) as double .......End Sub(C)Private Sub Command1_click() .......End Sub (D)Private Sub Command1_click() Private Sub Command1_click() .......End Sub13.求二个数的最大公约数和最小公倍数的VB程序如下:Private Sub command1_click()m = Val(Text1.Text)n = Val(Text2.Text)a = mb = nDor = Abs(m - n)m = nn = rLoop While m <> nPrint rPrint a * b / rEnd Sub该程序运行后,如果在文本框text1中输入5,在文本框text2中输入22,则输出结果是:(A)5 22 (B)5 22 (C)22 22 (D)1 110二、综合题:本大题5小题,其中第14题2分,第15题4分,第17题4分,第18题5分,共19分。

2019年4月浙江技术选考真题及解析(信息技术部分)

2019年4月浙江技术选考真题及解析(信息技术部分)

选择题1. 下列有关信息的说法,正确的是A. 计算机中的信息是以十六进制形式存储的B.计算机信息处理能力只与CPU有关C.离开计算机网络,信息便无法传递D.使用加密技术可以提高信息的安全性解析:计算机中的信息是以二进制形式存储的,计算机信息处理能力不只与CPU,还与显卡内存等等都有关系, 信息传递的方式有很多种,计算机网络只是其中之一,比如报纸等选D2. 电子邮局协议(POP3)用于A. 从收件人电子邮件服务器中将邮件读取到收件人计算机中B. 从发件人计算机中将邮件发送到发件人电子邮件服务器中C. 从发件人电子邮件服务器中将邮件发送到收件人电子邮件服务器中D. 从发件人计算机中将邮件发送到收件人电子邮件服务器中发件者 D.在数据表中不能通过“导入Excel电子表格”的操作来添加记录解析:遇到这种题目,平时要多在电脑上练习数据表中至少要有一个字段。

数据表中有记录时,字段类型可以修改。

外部数据可以通过很多种格式导入Jr X开始划津外加库工具廖香已除孑的Acce&s 导入厂据一S □文本文牛时血出炯L丈件Excel SharePoint -”匸比列恚沪他选B5.将十六进制数56转换成8位二进制数,再将该8位二进制数从左向右按两位一组一次分为4组,相互交换,得到新的8位二进制数,则新的8位二进制数对应的十六进制数是由附牛用.户代理MUA邮館用理丽TP LP0P3IurnMTASMTP邮件服势器解析:看图比较直观选A3.下列应用中,没有体现人工智能技术的是A.门禁系统通过指纹识别确认身份B.某软件将输入的语音自动转换为文字C.机器人导游回答游客的问题,并提供帮助D.通过键盘输入商品编码,屏幕上显示出相应价格解析:人工智能就其本质而言,是对人的思维的信息过程的模拟,通过后台设置,商品编码和价格,键盘输入商品编码便显示相应价格并不能体现人工智能4.下列关于Access数据表的说法,正确的是A. 数据表中的字段数可以为0B. 同一数据表中各记录的字段数是相同的C. 数据表中有记录时,该表的字段类型无法修每组中的两位A.D0B.34C.A9D.65解析:十六进制56换成8位二进制为0101 0110,交换后得到新的 8位二进制数为1010 1001,然后转换成十六进制为 A96. 某算法的部分流程图如第6题图所示。

浙江省2019-2020学年普通高校招生选考科目信息技术考试试卷(六)

浙江省2019-2020学年普通高校招生选考科目信息技术考试试卷(六)

浙江省2019-2020学年普通高校招生选考科目信息技术考试试卷(六)一、选择题(本大题共12小题,每小题2分,共24分。

在每小题给出的四个选项中,只有一个符合题目要求)1. ( 2分) 下列有关信息的说法,正确的是( )A. 同样的信息不能加载于不同的载体之上B. 设置邮箱,限制邮件大小,过滤垃圾邮件,无助于保护个人信息C. 加密后的文本不是信息D. 教务处为每位同学分配准考证号,属于信息的编码2. ( 2分) 下列有关浏览器的应用,说法正确的是( )A. HTTP协议主要用于浏览器与Web服务器之间的信息传输B. 通过浏览器将电子邮件读取到本地计算机采用的是SMTP协议C. 使用浏览器可对当前正在浏览的网页进行编辑D. 选择“网页,仅HTML(*.htm;*.html)”的方式保存网页可将图片保存到本地磁盘3. ( 2分) 使用Access软件创建的“无人机”数据表,其设计视图的部分界面如图所示,下列说法正确的是( )A. 可以修改“序号”字段的值B. 可以再建一个“自动编号”类型的字段C. 插入新记录时,可以在“优惠”字段输入文字“是”D. 可以在品牌和价格之间插入一个数字类型的新字段4. ( 2分) 下列有关多媒体技术的说法错误的是()。

A. 多媒体技术涉及声音、图像、视频等相关的信息处理B. 多媒体技术中的媒体可以是存储信息的载体,如光盘等C. 多媒体技术是指以计算机为平台,进行多种媒体综合处理的技术D. 多媒体技术有集成性、交互性、实时性三个显著的特征5. ( 2分) 小王用Flash软件制作动画作品,时间轴编辑界面如下图所示,下列说法不正确的是( )A. 声音的同步方式设置为“数据流”和“事件”,效果是一样的B. 清除“按钮”图层第1帧,不会影响动画播放效果C. 在“男孩”图层第26帧插入空白关键帧,不会影响动画效果D. 交换男孩和配乐图层的位置,不会影响动画效果6. ( 2分) 将一个动画导出为AVI格式视频,导出设置如图所示。

浙江省信息技术选考VB程序设计基础部分专题 课件 vb程序设计--基础部分2

浙江省信息技术选考VB程序设计基础部分专题 课件 vb程序设计--基础部分2
例如:Dim a As Single, b As Boolean Dim s As Double
Dim i, j as integer i 变体型数据( Variant ) 变体型数据是一种可变的数据类型,可以存 放任何类型的数据。 16字节。
数组
1、用数组变量来存储一批类型、作用相同的数据。即要么都 是实型变量,要么都是整型变量等。
A.Dim a(1 to 5) As Integer
( C)
B.a(3) = 123
C.a(6) = 456
D.Text1.Text = a(1)
9.在VB中,某个命令按钮的Click事件过程代码如下图所示:
执行该段程序后,文本框Text1中显示的是
(C )
A.6
B.9
C.True D.False
Double
双精度实数 型
绝对值在10E-324~1.79E308内的任何实数,有效 数字约14~15位
String Boolean
字符串型 逻辑型
一段文字与符号 值为True与False
常量
常量是指在程序执行过程中其值自始至终都不能改变的存储单元或数据 ①数值常量:包括整数常量和实数常量,如3、3.14159、-1.06等; ②字符串常量:用双引号括起来的字符串组成的。如"VB" 、 "15" ; ③逻辑常量:逻辑值True、False;
VB的基本数据类型
数据类型 名
Integer
数据说明 整数型
Long 长整数型
性质 -38~2147483648范围内的任何整数
Single
单精度实数 绝对值在1.401298E-45~3.402823E38内的任何实数,

浙江省五年(2015-2019)高中学考、高考选考信息技术真题分类汇编16 VB(学考)非选择题(解析版)

浙江省五年(2015-2019)高中学考、高考选考信息技术真题分类汇编16 VB(学考)非选择题(解析版)

浙江省五年(2015-2019)高中学考、高考选考信息技术真题分类汇编专题16 VB(学考)非选择题(解析版)1.(2019年6月)小宇为选定班级参赛作品编写了一个VB程序,设计如下:在文本框Text1内输入5位评委对3个作品的评分数据(评委对作品的评分数据由3位十进制数组成,第1位对应作品编号,第2、3位对应作品得分,分值范围为[60,99]。

如“275”表示2号作品得分75)。

单击“计分”按钮后,在标签Label1中输出3个作品的平均分,在标签Label2中输出参赛的作品(选择最高平均分作品参赛,若最高平均分存在并列,则从并列作品中随机柚取)。

程序运行界面如图所示。

(1)“计分”按钮的对象名为。

(2)程序部分代码如下,请在划线处填入合适代码。

Private Suh jf_Click( )Dim s As String,d As String,i As IntegerDim f1As Single,f2As Single,f3As Singles = Text1. Texti = 1Do Whiled = Mid(s,i,3)If Mid(d,1,1) = "1”Thenf1 = f1 + Val(Mid(d,2, 2))ElseIf Mid(d, 1, 1) = “2”Thenf2 = f2 + Val(Mid(d,2, 2))Elsef3 = f3 + Val(Mid(d,2, 2))End IfLoopLabel1.Caption="作品1平均分为:" + Str(f1 / 5)+ “作品2平均分为:” + Str(f2 / 5)+ “作品3平均分为:” + Str(f3 / 5)'以下省略“处理并列最高平均分,并在Labd2中输出选取的参赛作品”的代码End Sub(3)运行该程序时,在文本框Text1中以不同的顺序输入原评分数据:380/295/283/170/180/385/372/285/190/180/390/384/272/170/276,单击“计分”按钮,则Label1中显示的结果(选填:会/不会)发生改变。

浙江省高中信息技术选考加试题VB专项练习题三及答案

浙江省高中信息技术选考加试题VB专项练习题三及答案

浙江省高中信息技术选考加试题VB专项练习题三一、选择题:本大题13小题,第小题2分,共26分。

在每小题给出的四个选项中,只有一个是符合题目要求的。

1.下列问题能用算法解决的是:(A)求出所有偶数的和(B)利用计算机证明任何一个偶数都可以用二个素数的和来表示(C)要求计算机在1年内统计出宇宙中所有星星的数量(D)为了鉴定一篇文章是否抄袭了另外一篇文章,用计算机比较两篇文章的相似度2.下列可作为VB变量名的是:(A)len (B)sqrter (C)93edu (D)dim3.下面语句中的等号“=”作用与其它选项不同的是:(A)if a=b then (B)do while x=y+5(C)if not(F) then x=5 (D)if Mpos+w10=9 then4.将数学表达式ln5+2ab写成VB表达式,正确的是:(A)Log(5)+2ab(B)Ln(5)+2*a*b(C)log(5)+2*a*b (D)Log(5)/log(10)+2ab5.有如下VB程序段x="45"y="25"c=val(x+y)该段程序执行后,变量c的值是:(A)4525 (B)70 (C)25 (D)456.某VB程序代码如下:Private Sub Command1_Click()a = "330903"For i = 1 To Len(a)x = Mid(a, i, 1) + xNext iPrint xEnd Sub则程序运行后的输出结果是:(A)330903 (B)030933 (C)309033 (D)3303097.已知x是一个字符,下面有关VB语句“y=chr(asc(x)+1)”的作用说法正确的是:(A)y代表x后面一个字符(B)y代表x后面一个字符的ASCII码值(C)x代表y后面一个字符(D)x代表y后面一个字符的ASCII码值8.有如下VB程序段用于计算并联电阻的值,假设输入的电阻值都大于10。

浙江省高中信息技术选考加试题VB专项练习题五及答案

浙江省高中信息技术选考加试题VB专项练习题五及答案

浙江省高中信息技术选考加试题VB专项练习题五及答案1.下列有关算法的说法正确的是:A) ①②正确改写:在实际查找中,顺序查找比二分查找更慢且不稳定;选择排序是冒泡排序的改进。

2.下列可作为VB变量名的是:A) www正确改写:www可以作为VB变量名。

3.将数学表达式 y3+3+y/a 写成VB表达式,正确的是:C) Sqr(y^3)+(3+y)/a正确改写:y的三次方根加上(3+y)除以a的结果。

4.VB表达式 Int(-3.5) + Len(Str(3.5)) + Int(Rnd(0)) * 2 的值是:C) 2正确改写:取-3.5的整数部分为-4,将3.5转换为字符串后长度为3,随机数取整为0,乘以2为0,相加为2.5.下列VB函数中,返回值类型一定为整数的是:B) len和fix正确改写:len和fix函数的返回值类型一定为整数。

6.某VB程序代码如下:Private Sub Command1_Click()p = 10s = 1Do While p。

= sp = p + 1s = s + pLoopPrint p,sEnd Sub则程序运行后的输出结果是:C) 1211正确改写:将p初始化为10,s初始化为1,当p大于等于s时,p加1,s加p,直到p小于s为止,输出p和s的值。

7.某VB程序代码如下:Private Sub Command1_Click()Dim x As Integer。

y As Integer。

z As Integery = 10z = 4x = y / zk = Int(y / z)Print x。

kEnd Sub则程序运行后的输出结果是:B) 2 2正确改写:将y初始化为10,z初始化为4,x等于y除以z的结果,k等于y除以z取整的结果,输出x和k的值。

8.某VB程序段代码如下:Private Sub Command1_Click()Dim i As Long。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

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中(生成内容)。

相关文档
最新文档