相关试卷

  • 1、根据图1,完成以下题

    (1)、如图1,要把选中的文字设置为倾斜,应使用的按钮是(  )
    A、 B、 C、 D、
    (2)、如图1,要从正文第四行“…….有关事宜。”后进行分段,应使用的键是(  )
    A、Alt B、Enter C、Home D、Delete
    (3)、如图1,要把艺术字标题居中显示,应使用的按钮是(  )
    A、 B、 C、 D、
    (4)、如图1,要把艺术字的内容修改为“60周年纪念日”,应使用的按钮是(  )
    A、 B、 C、 D、
    (5)、如图1,图片的文字环绕方式是(  )
    A、嵌入型 B、紧密型 C、四周型 D、衬于文字下方
  • 2、对调查问卷的数据进行筛选、排序和分析。这属于信息加工过程中的(  )
    A、记录信息 B、加工信息 C、发布信息 D、存储信息
  • 3、用搜索引擎搜索广西粽子的制作方法,最合适的关键词是(  )
    A、广西 B、粽子 C、广西特色 D、广西粽子
  • 4、在网址http:/wwwgxnuedu.cn中,“edu”表示(  )
    A、政府机构 B、商业机构 C、教育机构 D、网络机构
  • 5、下列选项中,属于文献型信息源的是(  )
    A、现场授课 B、新华字典 C、博物馆 D、因特网
  • 6、在输入法工具栏 中,用于切换中/英文标点符号的按钮是(  )
    A、 B、 C、 D、
  • 7、小刘新买的U盘上标有“32G”的字样,这描述了U盘的(  )
    A、精确度 B、存储容量 C、读写速度 D、记忆功能
  • 8、人脸识别技术得以广泛应用主要归功于(  )
    A、语言的使用 B、印刷术的发明 C、文字的创造 D、计算机技术和现代通信技术的普及应用
  • 9、优惠券上写着“逾期无效”,这主要体现了信息的(  )
    A、传递性 B、真伪性 C、时效性 D、载体依附性
  • 10、下列选项中,属于信息的是(  )
    A、广播站 B、电视机 C、数学课本 D、新闻报道
  • 11、王老师采用星级制对本班学生的平时表现进行评价,每位同学的评分数据存储在数据库中。学生的得分和星级对照如下表:

    成绩

    1-20

    21-40

    41-60

    61-80

    81-100

    星级

    一星

    二星

    三星

    四星

    五星

    要求依据上表统计出各星级学生人数占总人数的比例。小王编写了一个VB程序实现该功能:程序运行时,每位学生的得分存储到数组a中,并在列表框list1中显示,单击命令按钮后,在列表框list2中显示各星级的人数占总人数的百分比例。

    程序运行界面如图所示:

    (1)、观察代码,实现统计功能的按钮对象名为:
    (2)、当前读取的数据表名为:
    (3)、实现上述功能的VB代码如下,划线①、②处请填空。

    Const n=50

    Dim a(1 To n)As Integer

    Dim b(0 To 4)As Integer

    Private Sub Form  Load()

      Dim adocn As New ADODB.Connection

      Dim adors As New ADODB.Recordset

      Dim str1,str2 As String

      adocn.ConnectionString  =”provider=microsoft.ace.oledb.12.0:data  source=”+  App.Path+”\school.accdb”

      adocn.Open

      str2=”select*from student”

      adors.Open str2,adocn

        ‘以下将每个学生的得分读入数组a中,并在列表框list1中显示,代码略

    End Sub

    Private Sub Com1  Cl ick ()

        Dim dd As String

        Dim cou As Single

        Dim t as integer

        dd=”一星二星三星四星五星”

        For i=1 To n

        t=

        h(t)=b(t)+1

        Next i

        For i=0 To 4

        COU=Int(b(i)/n*100+0.5)

        list2.Addltem +Str(cou)+”%”

        Next i

    End Sub

  • 12、小明基于冒泡排序算法编写了一个VB程序,功能如下:单击“生成”按钮command1,生成n个【10,99】的随机整数赋值给a数组,并在列表框list1中显示。单击“排序”按钮command2,对这组数据进行错位排序(即从前往后依次是最小的,最大的,第二小的,第二大的……依次类推)。在列表框list2中依次输出数据排序的结果,程序运行界面如图所示:

    实现上述功能的VB程序如下:

    Const n=10

    Dim a(1 To 10)As Integer

    Private Sub Command1  Click()

    For i=1 To n

                   ‘①

        List1.Addltem Str(a(i))

        Next i

    End Sub

     Private Sub Command2  Click()

        tmp=1

        For i=1 To n-1

        For j=n To i+1 Step-1

        If  >0 Then    ①

        t=a(j):a(j)=a(j-1):a(j-1)=t

        End If

        Next j

        ②

        Next i

        For i=1 To 10

        List2.Addltem Str(a(i))

        Next i

     End Sub

    (1)、程序测试运行后生成如下文件:(A .paixu.frmB .paixu.vbp C .paixu·vbw D .pai×u.exe),其中属于windows系统可执行文件是:(单选,填字母:)
    (2)、划线①处应填: 
    (3)、加框①、②处代码有错,请改正。

     ② 

  • 13、小李要制作一个主题为“江雪”的古诗词欣赏动画,用Photoshop设计背景,然后使用flash做动画。请回答以下问题:
    (1)、如图A所示,想要去除小船图层的黑色背景,以下操作可行的是: (多选:A .使用魔棒工具点选黑色,删除;B .使用裁剪工具选择黑色区域,删除;C .使用磁性套索工具套住小船,反选后删除;D .使用矩形选框工具选中小船,删除)

    (2)、制作“大雁”动画时,首(左图)尾(右图)关键帧的部分属性界面如图B所示,可推测大雁的移动方向是: (单选,填字母:A .向左上/B .向左下/C .向右上/D .向右下)

    (3)、文字2实现文字从舞台左侧旋转进入舞台,则文字2动画是: (A .形状补间B .动画补间C .逐帧动画)

    (4)、小船一开始就出现在舞台,若要让小船在动画开始1秒后才出现在舞台上,小李应做的操作是: 。
    (5)、单击播放按钮,跳转到“load”场景第1帧并继续播放,则按钮上添加的脚本动作为: 
  • 14、下图是某校文艺演出评分表,小明使用Excel软件进行数据处理,请回答以下问题:

    (1)、各班的最终得分是:去掉一个最高分,去掉一个最低分,剩余分数求平均。小明应该在J3单元格输入公式: , 再利用填充柄自动填充到J17单元格。
    (2)、若要仅对高一年级按最后得分降序排序,则参加排序的区域为:
    (3)、各年级得分最高的班级设为一等奖(假设高二年级最后得分互不相同),下列方法可得到高二年级一等奖的是:(多选)

    A.先按得分降序排序,再筛选出班级包含高二的记录,第1条记录即为高二一等奖

    B.筛选出开头是高二的班级,再按得分升序排序,最后一条记录即为高二一等奖

    C.先筛选出班级包含高二的记录,再筛选得分为最大的一项,筛选结果即为高二一等奖

    D.先筛选出得分最大的一项记录,再筛选出班级包含高二的记录,筛选结果即为高二一等奖

  • 15、若数组元素 d(1)到d(8)的值依次为“86,75,58,46,20,18,12,5”,查找某Key值的VB程序段如下:

        n=0:i=1:j=8

        Key=Val(Text1.Text)

        Do While i<=j

        m=(i+j)\2

        If Key=d(m)Then Exit Do ‘Exit Do退出循环

        If Key>d(m)Then

        j=m-1:n=n-1

        Else

        i=m+1:n=n+1

        End If

        Loop

        Label1.Caption=Str(n)

    当输A不同的Key值,运行该程序段后,在标签Label1中显示的不同结果共有:(  )

    A、5种 B、6种 C、7种 D、8种
  • 16、有如下VB程序段:

        S=Text1.Te×t

        For i=1 To Len(s)

        c=Mid(s,i,1)

        If c>=“0”And c<=“9”Then

        m=m+1

        Elself c>=“a”And c<=“z”Then

        n=n+1

        Else

        t=t+1

        End If

        Next i

        Label1.Caption:Str(t)

    在文本框Text1输入“as674ER29,86Gu”。(不包括双引号),执行程序后,标签Label1显示:(  )

    A、4 B、6 C、7 D、8
  • 17、有如下VB程序段:

    Dim x As String, y As String

     Dim ans As Integer

     x=“5”:y=“20”:ans=0

     If x>y Then ans=Val(x)Else ans=Val(y)

    ans=ans+Val(x+y)

    Text1.Text=Str(ans)

    程序运行完后,文本框Text1中显示的是:(  )

    A、25 B、30 C、540 D、525
  • 18、某Visual Basic程序如下:

        Private Sub Command1  Click()

        Dim a(1 To 10)As Integer

        Dim i As Integer

        For i=1 To 10

        a(i)=i * i

        Next i

        List1.Add Item Str(a(i))

        End Sub

    运行程序,单击命令按钮Command1后,出现的错误提示为:(  )

    A、下标越界 B、子程序或函数未定义 C、溢出 D、类型不匹配
  • 19、某算法的部分流程图如图所示,退出循环后输出的s和a值分别是:(  )

    A、5,15 B、105,7 C、51,5 D、15,7
  • 20、在VB中,下列与表达式Len(“-20”)+20的值相等的是:(  )
    A、Str(20)+"3” B、Sqr(25)+20 C、Val(”-20”)+20 D、Abs(-3)+20
上一页 1542 1543 1544 1545 1546 下一页 跳转