注册

题型：单选题题类：常考题难易度：普通

浙江省诸暨市2020届高三上学期信息技术诊断性考试试卷

有如下VB程序段：

Dim a(1 To 10) As Integer

a(1)=2: a(2)=18: a(3)=10: a(4)=34: a(5)=16

a(6)=7: a(7)=37: a(8)=6: a(9)=15: a(10)=15

c=0: x=0: t= 1

For i=1 To 10

a(i)=a(i)*t

c=c+a(i)

If c>0 Then x=x+1

t=-t

Next i

Text1.Text=Str(x)

则程序运行后Text1中显示（）

A、1 B、3 C、5 D、10

举一反三

编写VB程序，实现如下功能:在文本框Textl和Text2中分别输入一个整数，单击命令按钮Command1,在列表框List1中显示结果，运行效果如图1所示。结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。

下列VB程序运行时，单击Command1后，标签Label1中显示的内容是{#blank#}1{#/blank#}

Private Sub Command1_Click()

Dim s As Integer, j As Integer

s = 0

For j = 1 To 10

If j Mod 2 <> 0 Then

s = s + j

End If

Next j

Label1.Caption = Str(s)

End Sub

下列属于Visual Basic数值常量的是（）

在VB中，某同学若想使用变量X存储电子邮箱地址，则X的数据类型应定义为（）

下列字符串常量中，最大的是( )。

【加试题】有如下VB程序段：

For i = 5 To 4 Step -1

k = i

For j = 6 - i To 1 Step -1

If a(j) < a(k) Then k = j

Next j

If i <> k Then

t = a(i): a(i) = a(k): a(k) = t

End If

Next i

数组元素a(1)到a(5)的值依次为“41，66，70，83，31”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为（）

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

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

在线咨询客服