• 1、有如下VB程序:

    Dim i As Integer,j As Integer,k As String,n As Integer

    n=3

    List1.Clear

    For i=1 To n

        k=“”

        For j=1 To i

            k=k+“*”

        Next j

        List1.AddItem k

    Next i

    该程序运行中,在列表框List1中显示的是(  )

    A、

    *  *

    *  *  *

    B、        *

        *  *  *

    *  *  *  *  *

    C、*  *  *

    *  *  *

    *  *  *

    D、*  *  *

    *  *

  • 2、对输入的两个整数a和b,找出其中的较大者赋给c并输出。解决该问题的算法流程图如图所示:

    上述流程图中虚线框部分的内容可为(  )

    A、 B、 C、 D、
  • 3、某同学的电脑系统收到了微软公司免费升级Windows 10系统的通知,其中一个界面如图所示:

    分析图中信息可知,对于“Microsoft Edge”软件的功能,下列软件中与其相似的是(    )

    A、Internet Explorer B、ACDSee C、Microsoft PowerPoint D、Windows Media  Player
  • 4、小明收集了自己学校高一段跟高二段的部分同学技术成绩,并使用Excel软件进行数据处理,如下图表格所示。

                    

    请回答下列问题:

    (1)、单元格G16是小明收集的所有学生的平均分,他是通过AVERAGE函数的方式计算得到的。则G16单元格的公式应该是。从图中可以发现G16单元格的内容为“#####”,造成这种情况的原因是
    (2)、已知G3单元格正确计算了夏某同学的技术总成绩。小李通过G3单元格中的公式对区域G4:G15进行自动填充。则G9单元格中的公式为
    (3)、小明在编辑过程中发现高一段的成绩没有按照降序排列,小明希望以高一段成绩列数据为主要关键字,进行降序排序,则需要选择的排序数据区域为
    (4)、根据上图表格中的数据制作的图表如下图所示,创建该图表的数据

  • 5、图1是时代电器广场用Excel制作的9月份主要商品销售统计表。

    图1

    请根据表中数据回答下列问题:

    (1)、李明在单元格G3使用公式“=F3/$F$10”计算手机占总利润百分比,并对区域G4:G9进行了自动填充,则G9单元格的公式是
    (2)、李明想将编号这一列数据设计成“001,002,……,007”样式,可每次输入“001,002,……,007”样式后都自动变成了“1,2,……,7”,请给出一种解决方法
    (3)、根据图2所示,9月份占总利润百分比最大的商品名称是

    图2

    (4)、将图2所示的图表以图片形式复制到Word文档中并设置了文字环绕方式,部分界面如图3所示,该图表环绕方式是(单选,填字母:A .嵌入型/B .四周型/C .浮于文字上方/D .紧密型)。

    图3

  • 6、以下是万达电影院对2017年03月25日的票房统计,并使用Excel软件进行数据处理,如下图表格所示。

     

    请回答下列问题:

    (1)、上座率的计算公式是:上座率(%)=人次/总座位*100,可在F3单元格输入公式 , 再利用功能一次完成区域F4:F11的计算。
    (2)、下图是根据上述表格数据制作的Excel图表,仔细观察,创建该图表的数据区域是

     

    (3)、如果要以“总票房(元)”为关键字对数据进行降序排序,则应选择(填单元格区域)的数据进行排序操作。
  • 7、某算法流程图如图所示。按照流程图,最终的S的(    )

    A、5 B、6 C、10 D、15
  • 8、计算机可以将语音自动转换成文字,这种类似“听写机”的系统被电视台、广播电台等单位广泛应用。这项技术主要应用了人工智能中的(    )
    A、手写文字识别技术 B、光学字符识别技术 C、语音识别技术 D、机器翻译技术
  • 9、小明的支付宝帐号密码忘记了,但他还零星记得有关于密码的一些信息:

    ①密码是八位数字,前两位为19

    ②最后两位数字是91

    ③能被77和133整除

    程序界面如图所示,单击“找回密码”按钮(Command1)后,可能的密码显示在列表框List1中。

    解决此问题的相应的程序如下:

    Private Sub Command1_Click()

        Dim i As Long, s As Long

        For i = 0 To 9999

            s =  ①                  's表示该八位数密码

            If    ②   Then            '符合密码的条件,s能被77和133整除

                List1.AddItem Str(s)

            End If

        Next i

    End Sub

    (1)、在应用程序界面设计时,添加“List1”对象用于显示可能的密码,应使用如图所示的“控件工具箱”中的(填写相应的编号)。
    (2)、将窗体Form1上显示的文本“Form1”改为“寻找密码”,可在其属性窗口中将属性的属性值修改为“寻找密码”。
    (3)、解决此问题的算法是。(填:枚举算法/解析算法/查找算法)
    (4)、在程序下划线处,填入适当的语句或表达式,把程序补充完整:

     ② 

  • 10、阶乘是一种累乘积的计算方法,用“!”来表示阶乘,n!=1×2×3×……×n。如:8!=1×2×3×…×8=40320。小王为了求10! 的值,编写了如下Visual Basic代码:

    Private Sub Command1_Click()

        Dim i As Integer, s As Integer    ①

        s = 0                        ②

        i = 1

        Do While i < 10               ③

            i = i + 1

            s = s * i                  ④

        Loop

        Print s

    End Sub

    运行该程序,小王单击命令按钮Command1后,出现如第38题图对话框,已知序号①划线处的代码有错误,正确的代码应该是。经过代码修改后,小王重新运行该程序,单击命令按钮Command1,出现的结果是“0”, 那么序号(填①/②/③/④)划线处的代码有错误,正确的代码应该是

  • 11、现有如下Visual Basic程序:

    Private Sub Command1_Click()

        Dim i As Integer, c As String, s As String, t As String

        s = Text1.text

        t = ""

        For i = 1 To Len(s)

            c = Mid(s, i, 1)

            If c >= "0" And c <= "9"  Then t = t + c

        Next i

        Text2.text = t

    End Sub

    运行该程序,在文本框Text1中输入“2016_Student”(不包含引号),单击命令按钮Command1后,文本框Text2中显示的内容是

  • 12、现有如下Visual Basic程序段:

    Private Sub Command1_Click()

        Dim a , b , c  as Integer

        a = 27: b = 9: c = -6

        If a > b And b > 0 Then

            If c < 0 Then a = a - c Else a = a - b

        Else

            a = b + c

        End If

        Print a

    End Sub

    该程序段运行之后,变量a的值为

  • 13、现有如下Visual Basic程序段:

    Private Sub Command1_Click()

        Dim a(-1 To 8) As Integer

        Dim i As Integer

        For i = -1 To 8

            a(i) = i * i

        Next i

        Print a(i)

    End Sub

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

    A、子程序或函数未定义 B、下标越界 C、溢出 D、类型不匹配
  • 14、将文本框Text1中的数据赋值到数值型变量n中,正确的语句是(   )
    A、n = text1 B、n = Text1.text C、n = Str(Text1.text) D、n = Val(Text1.text)
  • 15、现有如下Visual Basic程序段:

    Dim a(1 To 10) As Integer

    a(10) = 1

    a(9) = 2

    For x = 8 To 1 Step -1

        a(x) = a(x + 1) + a(x + 2)

    Next x

    该程序段运行后,a(6)的值是(   )

    A、5 B、8 C、11 D、13
  • 16、现有如下Visual Basic程序段:

    s = 0 :x = 2:y = 49

    Do While x <= Sqr(y)

        s = s + x

        x = x + 2

    Loop

    该程序段运行后,x的值是(   )

    A、2 B、6 C、8 D、12
  • 17、现有如下Visual Basic程序段:

    S = 0

    For i = _____ to 3 step -1

        S = S + i

    Next i

    该程序段运行后,语句S = S + i共执行了4次,则下划线处应是(   )

    A、0 B、1 C、5 D、6
  • 18、现有如下Visual Basic程序段:

    y = -100 :x = 100

    If x > 10 Then

        y = -1

    Elseif  x > 50 Then

        y = 1

    Else

        y = 0

    End if

    该程序段执行后,变量y的值是(   )

    A、-100 B、-1 C、1 D、0
  • 19、某Visual Basic程序在调试过程中弹出如图所示对话框,产生该错误的可能原因是(   )

    A、该程序代码中,某个过程名书写错误 B、该程序窗体界面中,缺少一个文本框 C、该程序代码中,某个变量或常量没有声明 D、Visual Basic软件没有正确安装
  • 20、求[1,100]之间所有奇数之和s的部分算法流程图如图所示。为了实现此算法,图中判断框①和处理框②处可填入的是(    )

    A、① s = s + i   ② i = i + 1 B、① s = s + i  ② i = i + 2 C、① i = i + 1      ② s = s + i D、① i = i + 2  ② s = s + i
上一页 664 665 666 667 668 下一页 跳转