浙江省杭州市2015年高考信息技术模拟卷7

在某购物网站查看某商品时有如图所示信息：

这种对商品的评价属于（   ）

在Word中使用键盘输入文本时，部分字词的下方出现了红色的波浪线，这表明这部分字词处（   ）

某Access数据表如图所示：

以下说法中正确的是（   ）

Visual Basic程序设计环境中的部分控制如图所示，要将某图片加载到窗体中，则必须使用的控件是（   ）

在Visual Basic中，下列循环程序段输出“*”的个数最小的是（   ）

小陈用示波器测得的某二次电压曲线图如下所示：对其进行二进制编码，若图A的编码为“0110100110101”，则图B的编码为（   ）

小叶要制作一段"太阳神绿色太阳炙"的影片，用会声会影编辑采集到的视频，在两段视频中间插入一个"百叶窗"的过渡效果，制作时包括以下操作步骤：

①将素材库中的两个视频文件拖进故事板

②启动会声会影软件并新建一个项目

③创建视频文件，保存为MPEG格式

④选择效果"百叶窗"，将效果拖入到两个视频中间

⑤切换到"效果步骤"

正确的操作顺序是（   ）

小梅用Goldwave对音频文件"我的祖国.wav"进行处理，仅将两个声道的音量+2db后以原格式另存，则处理前后两个音频文件存储之比约为（   ）

用Flash合成某作品，有下列动作脚本：

On (Press) {

Stopallsounds();

Gotoandstop(1);

}

设置该动作脚本的对象一般是（   ）

今年是王霞大学毕业的第五年，作为当年的班长，她准备在母校举办一次同学会。她需要给班级里的每位同学发出一封同学会邀请函。如图所示是在Outlook Express中的电子邮件的界面。

小涛同学暑假想从北京到杭州看望爷爷奶奶，他通过网路查询到了北京到杭州的列车时刻表，如下图（图1）所示，请回答下列问题。

图1

三个正整数a、b、c满足等式a²+b²=c² ， a、b、c称为“勾股数”，求出100以内所有“勾股数”可采用的算法是        （   ）

以下语句运行后变量c的值是   （   ）

       a=”2009”

       b=”2008”

       c=Val(a)+Val(b)

表达式Len(“doodluck”)+2 Mod 3+Int(3.9999)的值为  （   ）

某校5名学生会推荐成员网络人气得票数依次为1201，2120，1009，1987，2009，若采用选择排序算法对其进行从大到小排序，则第二趟的排序结果是 （    ）

原始数据	1201	2120	1009	1987	2009
第一趟	2120	1201	1009	1987	2009
第二趟
第三趟	2120	2009	1987	1009	1201
第四趟	2120	2009	1987	1201	1009

下列程序的功能是从键盘上任意输入一个数，判断这个数是正数，负数，还是零，并输出判断结果。程序中横线处有错误，请改正。【根据2011年高考总复习填空题改编】

    Private sub Command1_Click()

        Dim a As Single

        Dim py As String

            a= Val (Text1)  （1）

           If a>0 Then py =”正数”

           If a=0 Then py=”零”

           If a<0 Then py=”负数”

             Label3.Caption=a（2）

     End Sub

在我国古代《孙子算经》中曾经提出这样一个问题，原文是这样的：“今有物，不知其数，三三数之，剩二；五五数之，剩三；七七数之，剩二；问物几何？”试用枚举算法来解决这一个问题。现分析如下，所寻找之数为满足如下条件的自然数：以3除余2，以5除余3，以7除余2。程序将从自然数1开始依次寻找，逐一判断某一自然数是否满足全部条件，直至在指定范围内找到满足条件的所有自然数。程序代码如下，请补充完整。

Private Sub Command1_Click()

Dim sum As Integer    'sum 用来统计符合条件的自然数个数'

Dim n, max As Integer

List1.Clear

sum = 0

max = '指定查找范围的最大自然数，Text1文本框中输入'

n = 0

Do While n <= max

  n = n + 1            '从自然数1开始不断往上寻找'

  If Then

  List1.AddItem Str(n) '找到后在List1中显示结果'

 

  End If

Loop

List1.AddItem ("共计" + Str(sum) + "个")

End Sub