相关试卷

  • 1、编写一个VB程序,实现如下功能:输入s位数字构成的数字字符串(第1位数字不为0),移除k(0<k<s)个数字后,在保证原数字相对位置不变的情况下,使剩余数字组成的新数为最小(注:新数第1位不能为0)。例如8个数字构成的数字字符串“71803296”,移除3个数字,得到5位数字构成的最小数是“10296”,具体算法如图a所示。

    算法分析:要使得到的5位数字最小,首先需保证能取到5个数字,且首位应尽量小,那么取首位数的范围应保证余下有4个数字,即在前4位中选最小非0的数字。

    程序运行时,在文本框Text1中输入一个数字字符串,在文本框Text2中输入要移除的数字个数,单击“运行”按钮CmdRun后,在标签Label1显示得到的最小新数,程序运行界面如图b所示。

    (1)、程序运行时,若要在名为Form1的窗体标题上显示“删数”,可以在Form_Load事件处理过程中添加语句为(单选,填字母:A.Form1. Text =“删数”\B.Form1. Caption =“删数”\C.Form1. AddItem“删数”)
    (2)、实现上述功能的VB程序代码如下,请在划线处填入合适的代码。

    Private Sub CmdRun_Click( )

        Dim Num As String,New_num As String     ' Num为输入的数字字符串

        Dim i As Integer, j As Integer, m As Integer,

        Dim As Integer, s As Integer, k As Integer

        Dim a(30) As String, b(30) As Integer

        Num = Text1. Text: s = Len(Num)

        k = Val (Text2. Text)      'k为删除数字个数

        For i=1 To s

            a(i) = Mid(Num,i,1)

        Next

        j =1

        m=1

        n=

        For i=m+1 To n      '取第一个非零最小数字

            If  Then m=I     '加框处程序代码有误,请改正

        Next i

        b(j)= m

        Do While       '取其他最小数字

            m=m+1

            n=n+1

            For i=m+1 To n

                If a(i) < a(m) Then m= i

            Next i

                j =j+1:b(j)=m

        Loop

        For i= m+1 To s     '最后直接取的数字

            j =j+1:b(j)=i

        Next i

        For j=1 To s- k       '输出最小数

            New_num =

        Next j

        Label1.Caption = New_num

    End Sub

    (3)、加框处程序代码有误,请改正。
  • 2、小李制作一个主题为“抗击新冠病毒”的多媒体作品。请回答下列问题:
    (1)、创作多媒体作品需要进行脚本编写。下列属于脚本编写的是          。(多选,填字母)
    A、确定作品的主要界面 B、确定作品创作及运行时所需的硬件设施 C、根据作品的主题思想与内容,制作作品的脚本大纲 D、用表格形式来展示作品的屏幕画面、链接关系和呈现说明等 E、将作品中各模块所需媒体元素的获取及处理方法列表进行表示
    (2)、如图a所示,“人物”图层第40帧的图形对象由“人物”实例形成,其中第30帧到第40帧的补间类型是动画补间,则该图层第40帧到第50帧的补间类型是

    (3)、如图a所示,“按钮”图层最后1帧已经添加动作脚本命令“Stop( );”,测试影片时,播放到最后动画停止,“播放”按钮不再显示,造成按钮消失的原因是
    (4)、“音乐”图层的声音同步方式如图b所示,若不想改变其动画播放效果,并让音乐在播放2秒后停止播放,以下操作可行是            。(多选,填字母)

    A、在“音乐”图层的第25帧执行“清除帧”操作 B、在“音乐”图层的第25帧执行“插入帧”操作 C、在“音乐”图层的第25帧执行“插入关键帧”操作。 D、在“音乐”图层的第25帧执行“转换为空白关键帧”操作 E、将“音乐”图层第1帧的声音同步方式由“数据流”改为“事件”
    (5)、测试影片时,单击“Load”场景中“播放”按钮,影片跳转到“main”场景的第1帧并开始播放,同时实现在浏览器中显示位于同名文件夹下“病毒介绍。 html”文件的内容,则“播放”按钮上添加的动作脚本为:on(release) {}。
  • 3、小周同学收集2018- 2019年某地区粮食作物播种面积与产量数据,使用Excel软件进行数据处理,其中粮食类别分为春粮、夏粮和秋粮3类,亩产由产量、面积通过公式计算得到,如图a所示。

    请回答下列问题:

    (1)、如图a所示,为了计算2019年三季粮食面积与产量占比(%), 先在K4:K6单元格中分别输入相应公式,得到三季粮食面积占比,然后复制区域K4:K6到区域L4:L6,得到2019年三季粮食产量占比。则L4单元格中的公式是(其中三季粮食产量占比为:各季粮食产量合计:三季粮食产量总和× 100)。
    (2)、若要对秋粮类作物按照2018年“面积”从高到低进行排序,则排序的数据区域是
    (3)、根据图a中的数据制作了“2019年各类粮食亩产”的图表,如图b所示。

    以下有关图表的描述正确的是           (多选,填字母)。

    A、该图表的数据区域为F4:F9,F12:F16 B、若以图c所示对图a中的数据进行筛选操作,该图表不会发生变化 C、若将H5:H17单元格的数值小数位数设置为1,该图表不会发生变化 D、若隐藏图a中的第10、11行,该图表会发生变化 E、将H6单元格中数据修改为0.26,该图表会发生变化
  • 4、利用对分查找实现在数组a中查找成绩值为Key的学生姓名与成绩(注:学生成绩由高到低排序,并按姓名在前、成绩在后的顺序依次存储在数组aa中,例如: “张三”,“97”,“李四”,。“92”,“王五”,“87”……),编写的VB程序段如下:

    Const n = 100

    Dim a(1 To n) As String

    Private Sub Command1_ Click( )

        i=1:j =  ⑴ 

        flag = False

        Key = Val (Text1. Text)

        Do While i <= j And Not flag

            m=  ⑵ 

            If  Val(a(2 * m)) = Key Then

                List1. AddItem a(2* m-1)+””+ a(2* m): flag =True

            Else

                If   ⑶   Then j= m-1 Else i=m+1

            End If

        Loop

        If Not flag Then List1. AddItem”没有找到!”

    End Sub

    上述程序段(1)、(2)、(3)三个方框处的语句依次为(    )

    ①j=n  ②j=n/2

    ③m=(i+j)\2

    ④m=((i+j)\2)*2

    ⑤Val(a(2 * m)) < Key

    ⑥Val(a(m)) < Key

    ⑦Val(a(2 * m)) > Key

    A、①④⑦ B、②③⑥ C、②③⑤ D、②④⑦
  • 5、有如下Visual Basic程序段:

    Private Sub Command1_ Click( )

        Dim a(1 To 10) As Integer, i As Integer, k As Integer

        a(1)=1:a(2)=17:a(3)=8:a(4)=9:a(5)=18

        a(6)=15:a(7)=20:a(8)=13:a(9)=7:a(10)=11

        k=0

        For i= 2 To 9

            If(a(i)-a(i-1))*(a(i+1)-a(i))< 0 Then k=k+1

        Next

        Text1. Text = Str (k)

    End Sub

    该程序段运行后后,文本框Text1中显示的内容是(    )

    A、6 B、7 C、8 D、9
  • 6、有如下Visual Basic程序段:

    Private Sub Command1_Click ()

        Dim x As Integer,r As Integer, s As String

        x = Val(Text1. Text): s =""

        Do While x<>0

            r=(x+1) Mod 2

            s=Str(r)+s

            x=x\2

        Loop

        Text2. Text = s

    End Sub

    该程序段运行后,在文本框Text1中输入25,则文本框Text2显示的内容是(    )

    A、0 0 1 0 1 B、1 1 0 1 0 C、0 0 1 1 0 D、1 1 0 0 1
  • 7、已知变量a、b、c、d数据类型为Integer, 变量flag数据类型为Boolean。 下列选项中与其他语句功能不相同的是(    )
    A、If(a>b Or b>c)And flag=False Then d=a\2 B、If(a>b Or Not b<=c)And Not flag Then d=a\2 C、If Not(a<=b And b<=c)And flag=False Then d=a\2 D、If(a>b And b>c)Or Not flag Then d=a\2
  • 8、有关VB表达式:Int(Rnd*10+1)*2,下列说法中正确的是(    )
    A、产生一个在[0,18]区间的随机偶数 B、产生一个在[0,20]区间的随机偶数 C、产生一个在[2,18]区间的随机偶数 D、产生一个在[2,20]区间的随机偶数
  • 9、使用Photoshop软件编辑“环保.psd”文件,当前状态部分界面如图所示:

    下列说法正确的是(    )

    A、直接用“文字工具”调整文字图层的文字大 B、不能直接清除“花”图层的图层样式小 C、直接设置“蝴蝶”图层的滤镜效果 D、直接更改“背景”图层的不透明度
  • 10、有A、B两段音频,参数如下表所示:

    音频

    编码标准

    采样频率

    量化位数

    声道

    时长

    是否压缩

    A

    PCM

    22.05kHz

    16bit

    单声道

    40秒

    不压缩

    B

    PCM

    44.10kHz

    8bit

    双声道

    10秒

    不压缩

    则这两段音频文件的存储容量之比(A :B)约为(    )

    A、1:1 B、1:2 C、2:1 D、4:1
  • 11、设计“小微图书管理系统”时,新建“图书借阅”Access数据表,存放下列表格数据:

    图书编号

    图书名称

    借阅人

    借书日期

    还书日期

    是否损坏

    JS0001

    Python编程从入门到实践

    黄晓琳

    2019-5-14

    2019-6-5

    JS0002

    深入理解Java虚拟机

    李语敏

    2019-11-21

    2019-12-25

    ……

    ……

    ……

    ……

    ……

    ……

    JX0712

    历史的原声

    王甜甜

    2020-1-19

    2020-6-1

    以下有关“小微图书管理系统”和Access数据表结构设计描述正确的是(    )

    A、“图书编号”字段的数据类型设置为“自动编号” B、是否损坏”字段的数据类型设置为“是/否”或“文本” C、“小微图 书管理系统”属于数据库管理系统,可以为多个用户共享使用 D、“小微图书管理系统”设计完成后,用户必须直接打开该数据表添加记录
  • 12、下列关于浏览器及信息获取的说法中正确的是(    )
    A、浏览器通过HTML协议获取Web服务器的网页内容信息 B、利用浏览器保存网页中的文字和超链接就是保存网页的URL C、利用浏览器获得的信息肯定可以通过统计评价来评判其真伪性 D、IE测览器可以在收藏夹中创建不同文件夹用于不同种类网址的分类保存
  • 13、如图所示,利用 Windows 资源管理器对计算机中多媒体信息资源进行分类管理。其中“多媒体信息”文件夹下子文件夹个数是个。

  • 14、某学校用数据库来管理学生的选修课程,下图是数据库中的课程信息表:

    (1)、学校用来管理管理数据库的是什么软件?
    (2)、该表中共有个字段,条记录。
    (3)、当前选中记录中“环境保护”对应的字段名是
  • 15、近期QQ安全中心收到大量用户举报:很多坏人利用CNTV、和讯网、凤凰网等知名网站生成“跳转短连接”以逃过安全提示,然后利用美女诱惑、租房交友、博取同情等各种手段引诱用户点击链接跳转到“钓鱼网站”上,再盗取用户的QQ,冒充好友进行诈骗。在聊天的过程中发现可疑网址,我们应该(      )。

    ①通过安全网址查询系统进行查询;②在聊天窗口进行举报;③不要在安全性未知的网站上输入个人信息;④不经审核直接点开链接

    A、①②③ B、①②③④  C、①③④ D、②③④
  • 16、如图所示,如果要将文稿中多次出现的“美国”一词全部换成“英国”,最高效的方法是(   )。

    A、将插入点分别移到该词出现的每一个地方,执行删除原词,输入新词的操作 B、利用查找功能,然后对每一查找结果进行删除原词,输入新词的操作 C、利用替换功能,在查找文本框中输入原词,在替换文本框中输入新词,执行查找功能,待找到一个后,再执行替换 D、利用替换功能,在查找文本框中输入原词,在替换文本框中输入新词,执行全部替换功能
  • 17、如图所示,该文稿中图片的文字环绕方式是(   )。

    A、上下型 B、四周型 C、浮于文字上方 D、衬于文字下方
  • 18、下列事件中,体现了人工智能技术的有(    )。

    ①使用Google在线将英文论文翻译成中文;②南极科考队员控制无人机进行地貌航拍;③围棋软件AlphaGo战胜中国棋手柯洁;④郑州东站“机器警长”上岗,可抓取面部信息识别旅客身份;⑤我国研制运算速度超百亿亿次的超级计算机“天河三号”;⑥习近平主席在乌镇世界互联网大会上的讲话,由口译员进行同声传译

    A、②⑤⑥ B、②④⑤ C、①③⑥ D、①③④
  • 19、小强想用百度查找熊猫相关生活习性的资料,最佳搜索关键词应是(    )。
    A、熊猫  资料 B、熊猫  生活习性 C、熊猫 D、习性
  • 20、某研究性学习小组决定对校园周边商贩所销售的食品进行卫生调查。这处于获取信息的(    )。
    A、定位信息需求阶段 B、选择信息来源阶段     C、确定信息获取方法阶段 D、评价信息阶段
上一页 713 714 715 716 717 下一页 跳转