VB专题 进制约及瑟夫环 训练-浙江省2022届高三信息技术一轮复习

进制和约瑟夫环 1（2020年12月慈溪模拟15）二进制数据在传输过程中可能发生被篡改或者出错的情况，为了能发现出错的位置和数量，可以在每个字节（总共不超过1000个字节）数据后面增加一位二进制校验位来检测。加入二进制校验位后，若该字节中“1”的个数（含校验位）为偶数，则说明该字节信息出现了错误，若为奇数，则说明是正确的。如下表所示。 编写VB程序，功能如下：在文本框Text1输入待检测二进制数据串，单击“开始校验”按钮，在列表框List1中输出出错的数量及位置（所在字节的编号，字节从1开始编号），程序运行界面如图所示。 请回答下列问题： （1）要使窗体标题文字显示为“信息校验”，则应设置窗体的 （单选：A.Form/B.Caption/C.Text）属性。 （2）实现上述功能的VB程序如下，请在划线处填入合适的代码。 （3）程序中加框处代码有错，请改正。 2、（2019新力量联盟16）Base64编码是常见的一种编码方式，规则是把3个字节（24位）的数据按6位1组分成4组，然后将每组数据分别转换为十进制，根据第16题1图将这些十进制数所对应的字符连接，即为Base64码。 以编码字符“Web”为例，字符“Web”对应的ASCII编码分别是87，101，98，分别转换为8位二进制数，按6位二进制数分组后再转换成十进制，查找他们的对应字符，得到“Web”的Base64编码为“V2Vi”。 （1）若某字符串的Base64编码为“QWEw”，则其原文是 （2）小高根据上述描述，设计了一个如下的将n（n是3的整数倍）个ASCII编码字符转换Base64 编码的VB程序，请在划线处填入合适的代码。 3、（2019年11月绍兴一模16）16.对n位二进制数进行编码（n是8的倍数），以8位二进制数为一段，每段插入4位二进制数，构成12位二进制数，依次处理，完成各段数据编码。每段编码方法如下： 插入二进制位：在第1、2、4、8位置上插入4个二进制位r1、r2、r3、r4，初值为0。 把原8位二进制数dl~d8从左往右依次填入剩余位置中，原数据位和插入的二进制位如图a所示： 计算插入数据位的值：把每个位置号转换成4位二进制数，选出形如“***1”（“*”表示一位0或1）的位置号，则统计这些位置号对应数据位中的“1”的个数，若是奇数，则r1为1，否则为0；再选出形如“**1*”的位置号，则统计这些位置号对应数据位中的“1”的个数，若是奇数，则r2为1，否则为0；以此类推……如8位二进制数“10101101”的编码过程如下： 1.插入4个二进制位，初值为0，剩余位置依次填入原数据位，如图b所示。 2.计算插入数据位的值，选出形如“***1”的位置号，即1、3、5、7、9、11，统计这些位置号对应数据位中“1”的个数为2，故rl=0，同理可得：r2=1，r3=0，r4=1，如图c所示。 3.按位置号从小到大依次拼接各数据位得到最后编码“011001011101”。 （1）若原始二进制数据是“01101110”，则插入的数据位r1、r2、r3、r4的最终值依次为： （填数据，用逗号分隔） （2）编写VB程序实现对文本框Text1中输入的二进制数进行编码，并在文本框Text2中显示编码结果。代码如下，请在划线处填入合适的代码。 4、（2021衢州高二期末16）高一年级开展“7选3”选科调查，现要求每位学生在预选卡上填写个人信息（班级、学号、姓名）并选涂三门选考科目（少于或多于三门的预选卡作废）。如小王预选组合是“物生技”其三门选考科目填涂情况如第16题图a所示。预选卡回收后，通过读卡机将相关信息读入数据库中，其中选科信息存储规则：按照“政治、历史、地理、物理、化学、生物、技术”顺序存储为一个7位二进制字符串。因此小王的选科信息二进制编号存储为“0001011”。 为了了解选科预选情况，统计选科组合种类及每种组合人数。小王设计并制作了VB程序。运行该程序，单击“读取”按钮，从数据库中读取信息并显示在列表框Listl中；单击“统计”按钮，在列表框List2中显示每种选科组合人数（无人选择的组合不显示）及选科组合种类。程序运行界面如第16题图b所示。 （1）若某个学生“7选3”的预选选科组合为“政史生”，则该选科组合对应的十进制编号为 。 （2）实现上述功能的VB程序如下，请在划线处填入合适的代码。 5、（2020年11月温州一模15）小温编写了一个有关环形数据排序的VB程序，实现如下功能：排序前的原始数据在窗体左边环形显示，单击“排序”按钮Command1后，原始数据中最小元素的位置固定不变，从该位置开始数据按逆时针升序，排序后的数据在右边环形显示。例如，排序前a（1）到