已知汉字“学”的区位码为“4907”，其中区码为“49”(十进制)，位码为“07”(十进制)，可见上图中所示的汉字内码是在区码和位码的基础上各增加了一个常数，该常数是( )
A．167D C．88H
B．AOH D．111000B
B [本题考查的主要是字符和汉字的编码、UltraEdit软件的使用以及进制的转换。当前显示的内码为十六进制，字符占一个字节(两位十六进制)，汉字占二个字节(四位十六进制)，可知“学”的十六进制编码为D1A7H。其中十六进制D1H转换为十进制为209D，十六进制A7H转换为十进制为167D，增加的常数在十进制下为160D，转换为十六进制为AOH，故答案选B。]
11．【加试题】使用VB程序解决问题：有n个整数存储在a数组，将其中的奇数转存到b数组中，并将b数组从小到大排序。部分程序如下：
t＝0 For i＝1 To n
If a(i) Mod 2＝1 Then t＝t＋1
End If Next i
For i＝1 To t－1
For j＝t To i＋1 Step －1 If b(j) temp＝b(j)：b(j)＝b(j－1)：b(j－1)＝temp End if Next j Next i 方框中应填写的正确语句是( ) A．b(i)＝a(i) B．b(i)＝t C．b(t)＝a(i) D．b(t)＝a(t) C [本题考查的主要是VB数组的使用，特别是数组下标和数组元素的区 6/18 分。题中变量t累计当前奇数的个数，若当前a(i)为奇数，t加1，并将a(i)存到b数组的位置t，即b(t)＝a(i)。] 12．【加试题】有一组升序排列的数：3、6、7、10、12、17、26、31、79，如果用对分法查找数据10，则依次访问的数据为( ) A．12、6、7、10 B．12、7、10 C．12、6、10 D．12、7、6、10 A [本题主要考查了对分查找算法的知识。一共有9个升序排列的数据，从对分法的定义可知，第一次查找，i＝1，j＝9，因此首先查找的是m＝int((i＋j)/2)＝5，也即第五个数12。由于10<12，因此第二次查找，i＝1，j＝m－1＝5－1＝4，m＝int((i＋j)/2＝2，也就是第二个数6。第三次查找，由于6<10，因此i＝m＋1＝3，j＝4，m＝int((i＋j)/2))＝3，也就是第三个数7。第四次查找，由于7<10，所以i＝m＋1＝4，j＝4，m＝4，也即第四个数10，成功查找到数据10，查找结束。因此正确答案是A。] 二、非选择题(本大题共5小题，其中第13小题4分，第14小题4分，第15小题5分，第16小题8分，第17小题5分，共26分) 13．某家电经销商利用Excel软件对其销售数据进行处理和分析，图1是该经销商2015年家电销售情况数据表。请回答下列问题： (1)要计算各产品的毛利润，可以在F3单元格中输入公式________(提示：毛利润＝(售价－进价)×数量)，然后自动填充至F11单元格。 (2)在E12单元格中，利用求和函数计算销售总额，结果显示为“其原因为________。 ”， 图1 7/18 (3)为了更加直观地比较各产品毛利润情况，制作了“2015年家电利润比较”图表，数据源区域是________。 (4)现要对上表(图1)进行筛选，找出毛利润最高的三种产品(如图2所示)，可以选择进行筛选________(填：高于平均值/10个最大的值/自定义筛选)。 图2 【解析】 本题主要考查的是Excel知识的综合应用。 (1)本题要求掌握公式的应用。“售价”“进价”“数量”分别对应D3，C3，B3，根据提示，可得出公式为“＝(D3－C3)*B3”。 (2)本题要求掌握单元格的应用。结果显示为“窄。 (3)本题要求掌握图表制作的数据区域。要求制作“2015年家电利润比较”图表，因此需要“产品”和“毛利润”这两列，故区域为“A2：A11，F2：F11”。 (4)本题要求掌握数据筛选的基本概念及其用法。筛选只是将不符合条件的数据隐藏，不是删除数据。自动筛选“10个最大的值”是一个泛指，可以根据问题需要选择“最大或最小”“少于10个或多于10个”的“项或值”。 【答案】 (1)＝(D3－C3)*B3 (2)列宽太窄 (3)A2：A11，F2：F11 (4)10个最大的值 14．编写VB程序，实现如下功能：扫描条形码，在文本框Text1中产生条形码数字序列，单击“识别”按钮Command1，在标签Label3中输出对应的校验信息。 条形码校验方法步骤： 8/18 ”，其原因为单元格太 (1)条形码共13位，第13位为校验码 (2)分别求出条形码奇数位的数字和，偶数位的数字和 (3)将偶数位数字和乘以3，加上奇数位数字和 (4)取第(3)步得到结果的个位数字，用10减去该数字 (5)若第(4)步的结果为10，则修改为0 (6)若第(5)步的结果和校验码相等则提示正确，否则提示错误界面如图1所示。 图1 (1)应用程序界面设计时，为添加“校验”按钮，应使用图2中“控件工具箱”中的________(填写相应编号)，并修改图3“属性窗口”，将________属性值设置为“校验”。 图2 图3 (2)为实现上述功能，请在划线处填写合适的代码或选项。 Private Sub Command1_Click() Dim s As String，x As String，Js As Integer，Os As Integer，Jy As Integer s＝Text1.Text n＝____①____ 9/18 '(填程序代码) If n<>13 Then Label1.Caption＝“条形码位数错误” Else For i＝1 To 12 x＝Val(Mid(s，i,1)) If____②____Then '(填字母：从下列A、B、C、D选项中选取一项) Js＝Js＋x Else Os＝Os＋x End If Next i Jy＝Os*3＋Js Jy＝10－Jy Mod 10 If Jy＝10 Then Jy＝0 If____③____Then '(填字母：从下列A、B、C、D选项选取一项) Label1.Caption＝“校验码正确” Else Label1.Caption＝“校验码错误” End If End If End Sub 划线②、③处的选项： A．x Mod 2＝1 B．x Mod 2＝0 C．Jy＝Val(Mid(s,13,1)) D．Jy＝Val(Mid(s,1,13)) 【解析】 程序运行过程中，从文本框Text1读出条形码，以字符串的形式存入变量s，计算字符串的长度存入变量n，通过判断n值是否等于13判断条形 10/18