注册

题型：单选题题类：常考题难易度：容易

内蒙古巴彦淖尔市临河三中计算机班2018-2019学年高二上学期信息技术期中考试试卷VB

长整型数据占（）个字节

A、2 B、4 C、6 D、8

举一反三

【加试题】小明为班会设计了一个抽奖程序，将所有同学的编号和对应的姓名分别保存在数组a（全班共50个同学，编号为1到50）和数组b中，点击抽奖按钮后，程序会随机产生一个1到50的正整数（同时包括1和50），作为中奖编号。

效果如图所示，左边列表框List1中显示同学的编号和姓名，单击"抽奖"按钮（Command1），在标签Label3中显示抽中的编号，同时在标签Label4中显示"恭喜***同学"，其中具体同学的姓名从数组b中获取。
解决此问题的程序段如下：
Dim a(1 To 50) As Integer，b(1 To 50) As String
Private Sub Command1_Click()
Dim c As String, t as Integer    ①
Randomize
c=Int(Rnd()*50+1)
Label3.Caption = Str(c)
t = search(c)
    If t < 0 Then    ②
       Label4.Caption = "恭喜" + b(c) + "同学"
    End If
End Sub
Function search(m As Integer) As Integer
search = 0
For i = 1 To 50
    If m = a(i) Then
       search = a(i)
    End If
Next i
End Function
Private Sub Form_Load()    ' 此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
上面代码中有错误请改正。
①{#blank#}1{#/blank#}②{#blank#}2{#/blank#}

下列属于字符串String类型常量的是（）

以下可作为Visual Basic变量名的是( )。（多选）

在Visual Basic中，下列能作为变量名的是（）

已知变量s="password"，下列表达式的值为"pass"的是（）

①s[:4] ②s[-5：-1] ③s[:2]+s[3]*2 ④s[0:2]+s[3:5]

数组元素a[0]至a[n-1]依次存放着n个数据，现需要将元素a[n-1]插入在下标为x（0≤x<n-1）的位置，例如：n为5，数组a为[0,3,4,6,7]，x为2，插入操作后a为[0,3,7,4,6]。实现该功能的程序段如下，方框中应填入的正确代码为（）

temp=a[n-1]

for i in range(n-2,x-1,-1):

a[x]=temp

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

周一至周五 8:30-17:30

在线咨询客服