相关试卷

1、某VB程序代码如下:
n = Val(Text1. Text)

sum=n

k=4

Do While n \ k>0

Sum = sum + n \ k

n=n \ k+n Mod k

Loop

Text2. Text = Str(sum)

在文本框Text1中输入10，执行该程序段后，文本框Text2中显示的值是（）

A、12 B、14 C、16 D、13

查看解析
2、某算法的自然语言与流程图表示分别如下，则流程图空白处理框①与②处应填入（）

第1步：输入一个实数x

第2步：判断x与0的大小关系

若x≥0，则y=x²-1，否则y=2x-1

第3步：输出y

第4步：结束

A、①y←x²-1 ②x-2x-1 B、①y←x²-1 ②y←2x-1 C、①y←2x-1 ②y←x²-1 D、①x←x²-1 ②y←2x-1

查看解析
3、VB表达式Len(mid(“VBis Very Good”,5,4)的计算结果是（）

A、“Very” B、”sVery” C、4 D、5

查看解析
4、使用GoldWave软件对某一音频进行编辑，部分界面如图所示。

在当前状态下，单击“剪裁”按钮，然后直接保存，保存后该音频文件的存储容量约为（）

A、0.67MB B、1.0MB C、1.68MB D、13.5MB

查看解析
5、下列关于数据压缩的叙述，正确的是（）

A、如果一幅图像的部分像素色彩值的排列为“红红红红红蓝蓝蓝绿绿绿绿”，经某种方法压缩后变为“红5蓝3绿4”，这种压缩称为有损压缩 B、压缩包中的文件无需解压就能使用 C、常见的有损压缩软件有 WinRAR和WinZip D、运用有损压缩方式对视频进行压缩时会损失一些画面质量

查看解析
6、使用Word软件编辑某文档，部分界面如图所示。下列说法正确的是（）

A、文档中的批注内容为“中国风” B、文档中的图文环绕方式是“四周型” C、接受所有修订后，文档中的“批注”不会消失 D、当前光标位于第一行“演”字前，按“End”键一次，光标移到文档最后

查看解析
7、在URL路径“fp://pada.tsing.edu.cn/flove.rar”中，ftp表示（）

A、服务器名 B、超文本传输协议 C、域名 D、文件传输协议

查看解析
8、以下关于信息的说法，正确的是（）

A、从书籍上获取的信息都是可信的 B、常用的信息表达技术有文字、图像、声音等 C、在计算机中，汉字是用十六进制进行处理的 D、对微信朋友圈信息的点赞属于信息评价中的个人推荐

查看解析
9、将一串二进制数据进行加密，其具体步骤描述如下：
1）从前往后以8个二进制数据为一段，将n个待加密二进制数据依次分割成若干个数据段。剩余数据（个数小于8）为一个独立数据段。

2）对于数据个数等于8的每个数据段，分别作以下的位置调整，从第1个位置开始，从1开始数数，数到m时取出该位数字（取出位置的数字不参与下次计数），从下一个位置开始，继续从1开始数数，数到m时取出该位数字（当数到这8位二进制数的第8个位置后回到第1个位置继续计数），重复上述操作，直至这8位二进制数的各个数字被取完。然后，依次把取出的8位数字拼接成新的二进制数。得到加密数据段。对于数据个数小于8的数据段逆序重排，得到加密数据段。

3）依次合并加密数据段，即为最后的加密数据。

编写一个VB程序，实现功能如下：程序运行时从文本框Text1中读入一个二进制数，从文本框Text2中读入整数m，单击“加密”按钮1，对输入的二进制数按上述方法转换后在文本框Text3中显示。程序运行界面如图所示。

(1)、运行下述程序，若在文本框Text1中输入“11001100”，Text2中输入“5”，单击“加密”按钮，则文本框Text3中显示的内容是。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command_ Click ( )

Dim a (1 To 100)As String, f (1 To 8) As Integer

Dim m As Integer, s As String, k As Integer

Dim i As Integer, As Integer, p As Integer

s = Text1 Text: m = Val (Text2 Text)

n = Len (s)

For i=1 To 8

    f(i) =        ①

Next i

p = 0

For i =1 To 8

  j = 1

    Do While < = m

                  ②

        If f(p) = 1 Then j = j+1

    Loop

    f(p) = 0

    For k= 1 To n \8

            ③

Next k

Next i

For i = (n \8) * 8 + 1 To n

             ④

Next i

For i= 1 To n

    Text3. Text = Text3. Text + a(i)

Next i

End sub

① ② ③ ④

查看解析
10、质数又称素数，是指除了1和本身之外不再有其他因数的数。如果两个质数的差为2，则这两个质数称为生质数对。编写VB程序实现：单击“显示李生质数对”按钮Command1，在列表框List1中显示100以内的所有孪生质数对（运行效果如图所示）。实现上述功能的VB代码如下，请完成以下问题。

(1)、要在程序运行时窗体Form1标题显示“李生质数对”，则可在Form_Load ( )事件过程中添加的代码是（单选，填字母：A .Form1. Caption = “孪生质数对” /B .Text.text “李生质数对”/C .Label. Caption = “李生质数对”）。

(2)、程序代码中的加框处语句有错，请改正。

(3)、在划线处补充完成程序代码。
Dim a(1 To 50) As Integer

Private Sub Command1_Click ( )

Dim i As Integer

k=0: i=3

Do While i <= 100

    If           Then ‘改错

        k = k+1

        a(k) = i

             ①

    i = i+2

Loop

For i=2 To k

    If       ②       Then

        List1. AddItem str(a(1-1))+“和”+str(a(i))

    End If

Next i

End sub

Function prime( x As Integer) As Boolean    ‘判断是不是质数

prime = True

For i=2 To Int (Sqr(x))

    If x Mod i = 0 Then prime= False : Exit For

Next i

End Function

① ②

查看解析
11、小李制作主题为“端午节”的多媒体作品。他使用Photoshop软件制作一张背景图片，然后使用Flash软件制作动画。请回答下列问题：

(1)、如图a所示，当前状态下，下列说法正确的是（多选，填字母：A .“端午情”图层不能直接添加滤镜/B .“菖蒲”图层的图层样式的效果均可见/C .“粽子”图层不能直接添加图层样式/D .“背景”图层可以直接删除）。

(2)、如图b所示，“爱心”图层的补间动画持续时间约为秒（保留整数），该动画类型是（填：形状补间/动画补间）

(3)、测试影片时，发现动画播放过程中背景图突然消失，现在要求背景图一直出现在舞台上，请写出一种正确的操作方法：。

(4)、测试影片时，单击“按钮”图层最后一帧的“退出”按钮，实现跳转到“片尾”场景的第1帧并停止播放动画，则该按钮上添加的动作脚本是。

查看解析
12、小李收集了2018年1月部分地市网络零售统计数据，并使用Excel软件进行数据处理，如图a所示。

根据图a，请回答下列问题：

(1)、当前状态下小李进行了如下操作：先按键Ctrl+C（复制），然后选择单元格E5，再按键Ctrl+V（粘贴），则单元格E5是（单选，填字母：A .数字36.59/B .公式=B5/$BS13 * 100/C .公式=D5/$B$13 * 100/D .公式=D5/D$13 * 100）。

(2)、根据图a中数据，制作了一张反映所有地市居民网络消费额情况的图表。如图b所示，但该图表横轴中显示的是数字序号并不是预期的地市名称，改正的方法是。

(3)、将图a中区域A1: 12的数据值复制到新工作表后，为了筛选出顺差超过90的地市信息，小李进行了设置筛选标记的操作，得到图c。

则小李的操作可能是________（多选，填字母）。

A、选中单元格F3，单击 B、选中单元格F3:F12，单击 C、选中单元格F3:F5，单击 D、选中单元格F5:F12，单击

查看解析
13、某种加密算法如下:将每个字符的ASCⅡ码值转换为8位二进制数（不足8位的左端补0），分成两段4位二进制数；在这两段中间插入011001108位二进制数，组成16位二进制数，再按序每8位以ASCⅡ码值转化为两个字符作为密码，最后将每组密码按序连接构成密文。例如字符A的ASCⅡ码值是65，转换为8位二进制数是01000001，中间插入01100110后变成01000101000，密码即为Fa。程序运行界面如图所示。

实现上述功能的VB代码如下：

Private Sub Command1_ Click ( )

Dim s As String, i As Integer

Dim a As Integer, b1 As Integer, b2 As Integer

s = Text1, Text

For i = 1 To Len(s)

    a = ASC(Mid(s, i, 1))

       ①

       ②

    Label2 Caption = Label2. Caption + Chr(b1 * 16+6)+ Chr(6 * 16+b2)

Next i

End Sub

①和②处代码填写正确的是（）

A、①b1 = a Mod 16 ②b2 = a \16 B、①b1 = a \16 ②b2 = a Mod 16 C、①b1 = a Mod 2 ②b2 = a \2 D、①b1 = a\ 2   ②b2 = a Mod 2

查看解析
14、某对分查找算法的VB程序段如下：
i = 1: j = 7

key = Int(Rnd( ) * 100)

Do While i < = j

    m = (1+j) \2

    If a(m) = Key Then

      Exit Do

    Else If a(m) > Key Then

    j = m-1

    Else

      i = m+1

    End If

Loop

数组元素a(1)到a(7)的值依次为“25，42，53，6，77，83，98”，运行上述程序段后，下列条件表达式肯定不成立的是（）

A、j-i = 0 B、i-j = 2 C、i = 8 D、m < = 7

查看解析
15、有如下VB程序：
Private Sub Command1_click ( )

Dim s As String, c As String, n As Integer

s = “Google Chrome”; n = 0

For i = 1 To Len(s)

    c= Mid(s, i, 1)

    If c = “e” Then n = n+1

    n = n-1

Next i

Text1 Text = Str(Abs(n))

End Sub

运行该程序，单击命令按钮Command1后，文本框Text1中显示的内容是（）

A、-11 B、11 C、-9 D、9

查看解析
16、以下程序段运行后，文本框Text1中显示的内容是（）
Private Sub Command1_ Click ( )

Dim a(10) As Integer

For 1 = 1 To 10

a(1) = 0

Next i

For i = 1 To 10

a(i Mod 3) = a(i Mod 3)+i

Next i

Text1. Text = Str(a(1))

End sub

A、15 B、18 C、22 D、12

查看解析
17、已知“A”的ASCⅡ码值为65D，则随机产生一个大写英文字母的VB表达式是（）

A、Chr( Int (Rnd( ) * 25+41)) B、Chr( Int(Rnd( ) * 26+41)) C、Chr ( int( Rnd( ) 25+65)) D、Chr( Int (Rnd( ) *26+65))

查看解析
18、如图为Photoshop新建文件界面，若作品完成后，不改变参数保存成BMP图像，则其存储容量约为（）

A、11MB B、0.46MB C、3.66MB D、1.37MB

查看解析
19、用Photoshop软件制作“放飞梦想psd”，如图所示，以下说法正确的是（）

A、能够直接对“向日葵”图层设置图层样式 B、交换“向日葵”和“鸽子”图层的顺序，将影响作品的呈现效果 C、“放飞梦想”图层没有设置滤镜效果 D、对“泡泡”图层设置的“投影”和“外发光”效果是可视的

查看解析
20、使用UltraEdit软件观察字符“9！就是9加乘”的内码，部分界面如图所示。

下列说法正确的是（）

A、字符“！”的内码占两个字节 B、字符“就”的十六进制码是“AIBE” C、因为字符“9”的内码是“39”，所以字符“10”的内码是“3A” D、“9！就是9加乘”共占用11个字节

查看解析

上一页 1390 1391 1392 1393 1394 下一页跳转