高中信息技术:

高中 信息技术

小李在探究将两段已按从小到大排序的数据连接后用冒泡排序思想再进行从小到大排序的情况,编写了一个VB程序,功能如下:在列表框List1中显示排序前数据(存储在数组c中),单击“排序”按钮Command1后,在列表框List2中显示排序后的数据。

  1. (1) 在设计如图a所示的程序界面时,应使用图b所示“控件工具箱”中的(填写相应编号)添加列表框List1。
  2. (2) 语句“Flag=True”放置在(单选,填字母:A/B/C)位置。
  3. (3) 程序代码中,加框处语句有错,请改正。
  4. (4) 在划线处补充完成程序代码。

    Const n1 = 6     ‘ 第1段已排序数据长度为n1

    Const r2 = 5     ‘ 第2段已排序数据长度为n2

    Dim c (1 To n1 + n2) As Integer     ‘ 数组c长度为n1+n2,依次存储第1、2段数据

    Private sub Command1_Click ( )

    ‘ 数组c依次存储两段已按从小到大排序的数据,并在列表框List1中显示’

    ‘ 代码略

    List2. Clear

    ‘ A位置

    For i = n1+1 To n1 + n2

       

    ‘B位置

        Do While j > 1 and Flag

        If         ①          Then

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

    ‘ C位置

        Else

            Flag = False

        End If

                ②         

        Loop

    Next i

    For i = 1 To n1 + n2

        List2. AddItem c(i)

    Next i

    End sub

     ② 

显示器的性能指标有(    )。
A . 封装形式 B . 分辨率 C . 数据缓存 D . 点间距
使用Access软件创建的数据表,其设计视图的界面如图所示,下列说法正确的是(  )

A . 该数据表中,不会有两条记录的“name”字段值相同 B . 该数据表中,能在“id”字段输入内容 C . 在打开该表设计视图界面时,能对该表重命名 D . 该数据表中,“是”或“否”可以是“sex”字段的有效输入值
函数 range(1,6)产生一个列表是:
关于Access数据表的操作,下列说法正确的是(    )
A . 重命名数据表,数据表名不能与表中的字段名相同 B . 删除字段,数据表中该字段的值随之被删除 C . 删除记录,剩余记录中数据类型为自动编号的字段值会自动更新 D . Access数据表不能导出到Excel电子表格
小明要着手制作一份反应市容市貌的电子报刊,在进行版面设计时,同学给了他如下建议,你认为小明不应采纳的是(  )。
A . 先绘出版面布局草图,再进行制作 B . 电子报刊的页边距设置与日常文本加工没有区别 C . 把较为重要、能烘托主题的内容排放在第一版即主版 D . 版式编排要新颖、活泼、有朝气
下列关于域名的叙述,正确的是(       )
A . 域名专指一个服务器的名字 B . 域名的长度是有限制的 C . 域名与IP地址是相同的 D . 域名就是统一资源定位器
央视的《中国诗词大会》节目播出时,观众可以通过扫描电视屏幕上的二维码参与节目互动。扫描二维码的过程属于(     )
A . 信息发布 B . 信息采集 C . 信息制作 D . 信息加工
关于无人驾驶汽车下列说法错误的是(      )

A . 无人驾驶汽车通过车载传感器感知车辆周围环境 B . 无人驾驶汽车非常安全,不管道路在什么自然环境下都不会出现交通事故 C . 无人驾驶汽车根据感知所获得的道路、车辆位置和障碍物信息来控制车辆的转向和速度 D . 无人驾驶汽车根据已有的交通和地图等信息,自动规划行车路线并控制车辆到达预定目标,不需要司机做出驾驶决定
为了减少计算机病毒带来的危害,我们可以采取的措施的选项正确的是(    )
A . 使用来历不明的软件 B . 随意打开陌生人发来的链接 C . 定期进行病毒查杀 D . 尽量少用计算机
调试程序时,如果程序语法有错误,计算机不会给出提示信息。
以下说法不正确的是(   )
A . 同一种信息内容可以采用不同的表达方式 B . 信息可以脱离它所反映的事物被存储、保存和传播 C . POP3协议的功能是把电子邮件发送到收件人的电子邮箱中 D . 浏览器与WEB服务器之间的信息传输一般采用HTTP协议
要将一篇论文中多处“信息技术”改为“Information Technology” ,最快捷的操作方法是(    )。
A . 使用复制+粘贴的方法 B . 手工逐个修改 C . 使用工具栏上的格式刷按钮 D . 使用编辑菜单中的“替换”功能
收到一封邮件,再把它转寄给别人,一般可以采用(  )
A . 回复 B . 转发 C . 编辑 D . 发送 
对已感染病毒的磁盘应当采用的处理方法是(  )
A . 不能使用只能丢掉 B . 用杀毒软件杀毒后继续使用 C . 用酒精消毒后继续使用 D . 直接使用,对系统无任何影响
火柴游戏:有n根火柴,第1次取1根,第2次取2根,第i次取i根,当剩余火柴数为0时,不用添加火柴(即k=0),游戏结束。如果剩余火柴数不为0,但不够下一次取,此时添加k(k≥1)根火柴,在剩余火柴中再从1根开始取,直到能取完为止,求k的最小值。

例如:n=3时,第1次取1根,第2次取2根,此时正好取完,无须添加火柴,k=0;

例如:n=8时,第1次取1根,第2次取2根,第3次取3根,第4次要取4根,但剩余2根不够取。则加上1根,剩余3根,再从1根开始取,即第4次取1根,第5次取2根,剩余火柴为0,游戏结束,得k=1。

又如:n=4时,第1次取1根,第2次取2根,第3次不够取,若加上1根,剩余2根,再从1根开始取,第3次取1根,剩余1根不够第4次取,再加1根,又是剩余2根,显然加1根永远不可能取完。所以改用每次加2根,第1次取1根,第2次取2根,第3次不够取,添加2根,第3次取1根,第4次取2根,恰好能取完,得k=2。

编写一个VB程序可实现上述功能:在文本框Text1中输入火柴数量,单击“计算”按钮,在文本框Text2中显示最少添加数量,程序运行界面如下图所示:

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

Private Sub ok_Click()

Dim a(1 To 100) As Boolean, n As Integer, k As Integer, i As Integer

n = Val(Text1.Text)

For i = 1 To 100

    a(i) = False

Next i

a(n) = True

Do While n <> 0

    i = 1

    Do While i <= n

             ①      

        i = i + 1

    Loop

    If n = 0 Then

        Text2.Text = Str(k)

    Else

        If k = 0 Then k = 1

        n = n + k

        If       ②      Then

            k = k + 1

            n = Val(Text1.Text)

        Else

            a(n) = True

        End If

    End If

Loop

End Sub

  1. (1) 由代码可知,“计算”按钮的对象名是
  2. (2) 程序加框处代码有错,请改正。
  3. (3) 请在划线处填入合适的代码。

     ② 

依据国家质量监督检验检疫局《车辆驾驶人员血液、呼气酒精含量阈值与检验》的相关规定,设计出如图所示流程图。执行据此编制的程序,输入20时,结果为(    )。

A . 无输出 B . 输出“不构成饮酒行为” C . 输出“酒后驾驶” D . 输出“醉酒驾驶”
下列不属于高级编程语言的是(   )
A . C 语言 B . VB语言 C . Python语言 D . 机器语言
遵照医生的嘱咐,每天测血压,记录下来,若要描述血压在一段时间内的变化情况,最适合的图表类型是(    )。
A . 折线图 B . 柱形图 C . 条形图 D . 饼图
“字符串合并”程序实现功能:在文本框Text1中输入字符串1,在文本框Text2中输入字符串2,单击“合并”按钮Command1,按如下规则依次从中取出各字符进行合并,合并后的结果显示在标签对象Label3中。

合并规则如下:

⑴当字符串1的长度大于字符串2的长度时,将字符串2中的各个字符从左侧依次插入到字符串1中的各字符后方。例如字符串1为“abcdef”,字符串2为“123”时,合并后的字符串为“a1b2c3def”。

⑵当字符串2的长度大于等于字符串1的长度时,将字符串1中的各个字符从右侧依次插入到字符串2中的各个字符后方。例如字符串1为“abcd”,字符串2为“12345”时,合并后的字符串为“12d3c4b5a”。

程序运行界面如图所示。

  1. (1) 要使程序运行时,窗体Form1标题显示“字符串合并”,可在Form_Load事件过程中添加语句(单选,填字母:A,Form1.Caption=“字符串合并”/B,Label3.Caption=“字符串合并”/C,Text1.Text=”字符串合并”)。

  2. (2) 实现上述功能的VB程序如下,请在画线处填入合适的代码。

    Private Sub Command1_Click()

    Dim s1 As String,s2 As String,arts As String

    Dim n As Integer,m As Integer,i As Integer

         s1=Text1.Text

         s2=Text2.Text

       m=Len(s1)

         n=Len(s2)

         If m>n Then

             For i=1 To n

               ans=ans+Mid(s1,i,1)+Mid(s2,i,1)

             Next i

               ans=ans+Mid(s1,i,m-n)

             Else

               For i=1 To m

                 ans=    ①    +Mid(s1,i,1)+ans

               Next i

               ans=Mid(s2,1,n-m)+aFIS

        ②   

             Label3.Caption=”合并为”+ans

      End Sub

     ② 

  3. (3) 若在文本框Text1中输入“Word”,在文本框2中输入“Mini”,单击“合并”按钮后,标签Label3中显示的内容是

最近更新