2015-2016学年浙江省衢州市常山县天马中学高三（下）月考信息技术试卷（4月份）
发布：2024/4/20 14:35:0
一、选择题（本大题有10小题，每小题2分，共20分．在每小题给出的四个选项中，只有一个是符合题目要求的．）
-
1．“优先点菜”是一款集点菜、支付、分享于一体的手机应用软件，我们可以通过优先手机客户端查看到当地优质品牌餐饮门店及图文菜单，并预先点菜、支付，避免了餐前点菜、餐后结账时等候的麻烦．小利使用该APP事先点好菜的过程属于（ ）
组卷：85引用：9难度：0.9 -
2．小丽用UltraEdit软件观察“新高考‘7选3’“这几个字，显示的十六进制内码如图所示．则“7选4“这几个字对应得内码用十六进制表示是（ ）
组卷：3引用：3难度：0.9 -
3．在Access软件中，删除“三项考试成绩”数据表中的“学号”值为“30120”记录时的界面如图所示：
单击“是（Y）”按钮删除指定记录后，下列操作能恢复被删除记录数据的是（ ）
①立即执行“撤销”命令
②重新输入被删除的记录的内容
③关闭当前数据库，重新打开
④关闭该数据表，重新打开．组卷：4引用：1难度：0.9 -
4．小李在网上购物时，看到某商品评价（评价A）如图1所示，他购买了该商品，交易成功后对该商品进行评价（评价B）如图2所示．下列有关这两种评价的说法正确的是（ ）
组卷：5引用：3难度：0.7 -
5．小李使用Word修订功能对某文档做了几处修订，部分截图如图1所示，修订选项对话框如图2所示．若全部拒绝图中所示的修订内容，则第一句话的文字将变为（ ）
组卷：3引用：1难度：0.9 -
6．输入一正整数并判断是奇数还是偶数的算法描述如图所示：
该流程图中，语句“x mod 2=0？”，应加的框图为（ ）组卷：4引用：2难度：0.9 -
7．下表是一份多媒体作品系统结构的设计报告：
日期：2015年3月12日 报告人：小夏
下列Flash动画合成的时间轴结构中，与设计要求最相符合的是（ ）规划 情景描述 背景 使用蓝天白云作为背景 风筝 开始时风筝慢慢淡入直至完全出现 小鸟 风筝出现的同时，小鸟飞入，小鸟在树上停留一段时间后飞走 组卷：5引用：5难度：0.7
二、填空题（本大题共3小题，第5、6题每个空1分，第7题每空2分，共7分．）
-
20．【加试题】设计VB程序，该程序将输入的字符串中小写字母转换成大写字母后输出．在文本框Text1中输入一串字符（数字、字母均可），单击“转换”按钮Command1，在标签Label2中输出结果．（提示：Asc（x）：将字符x转换为ASCⅡ码值；Chr（x）：将ASCⅡ代码x转换为所对应的字符）该程序的设计界面如图所示，请根据算法将下列程序补充完整．
Private Sub Command1_Click（ ）
Dim ch As String,s As String
Dim i AS Integer,j As Integer
ch=Text1．Text
For i=1To
j=Asc（Mid（ch,i,1））
if j＞96And j＜123 Then
s=s+Chr（j-32）
Else
s=s+Chr（j）
End If
Next
End Sub
完善程序：①横线处代码为．
②横线处代码为．组卷：12引用：2难度：0.1 -
21．杭州市民卡是由杭州市人民政府授权发放给市民用于办理个人相关事务和享受公共服务的集成电路卡（IC卡），具有信息储存、身份识别、电子支付等功能。每位市民卡的卡号是唯一的，卡内会记录每位市民的姓名、住址、金额等信息。
假设共有1000个市民，市民的相关信息都存储在“information.jye.ai”的data表中，查询程序界面如图所示。工作人员在文本框Text1中输入卡号，单击“开始查询”按钮，如果找到，就在Label1中显示卡内市民姓名和卡内余额；否则显示“查无此人”。请按要求将下列程序补充完整。
Private Sub command1_click （ ）
Dim conn As New ADODB．Connection,rs As New ADODB．Recordset
Dim strSQL As String
Dim a,b as string‘分别定义姓名、余额
Dim n as integer
conn.ConnectionString=“Provider=Microsoft.ACE．OLEDB.12.0；Data Source=“+App.Path+“\information.jye.ai“'打开到数据库的链接
conn.Open
strSQL=“select xh,xm from data where'卡号=&（Text1．Text） &'“'设置查询的SQL语句
Set rs.ActiveConnection=conn'设置rs的ActiveConnection属性，指定与其关联的数据库链接
rs.Open strSQL'打开记录集，将从表information中读取的结果保存到记录集rs中
Label1．Caption=““
n=0
Do while not rs.EOF①
a=rs.Fields（“姓名“）
b=rs.Fields（“余额“）
rs.movenext
loop
rs.Close
conn.close
set rs=nothing
set conn=nothing②
if n=0then Label1．caption=“查无此人“
End Sub
（1）程序中①横线处应填入。
（2）程序中②横线处应填入。组卷：1引用：1难度：0.1
