注册

题型：综合题题类：常考题难易度：普通

浙江省台州市2017-2018学年高二上学期信息技术第一次月考试题

小丁想买几张6+1彩票，选号时，他希望前4位用自己的生日：11月8日，即1108，特别号码他选了买彩票日子的个位数5，并且他希望前六个数字组成的数能被他的幸运数字9整除。他的好朋友小杰帮他设计了一个VB程序，可以提供一份符合这些要求的号码清单供他挑选。相应的界面如图1所示。阅读程序并完成后面的问题。

（1）、设计应用程序界面时，为添加a所指向的对象，应使用图2所示的“控件工具箱”中的（填写相应编号）。

（2）、请根据题意将下列程序补充完整。

Private Sub Command1_Click()

Dim i As Integer, j As Integer, c As Integer,n As Long

c = 0

n = 110800 + i

If Then

List1.AddItem Str(n) + " " + "5"

End If

Next i

Label2.Caption = "满足条件的数有：" + Str(c) + "组"

End Sub

举一反三

“如果x，y中任意一个为0，那么x=x+1”，能实现该功能的VB语句是（）

下列VB表达式中，计算结果为3的是（）

随机产生一个范围为[8,89]的正整数的VB表达式是 ( )

运动会田径比赛，记分裁判把各赛道运动员的成绩表交给录入员录入到计算机中，录入人员编制了如下程序｡运行程序，按道次顺序依次输入8个成绩，道次号存放在数组a中，相应道次的运动员比赛成绩存放于数组b中，并将原始成绩显示在列表框List1 中｡单击“成绩排序”按钮(Command1)，将原始成绩从好到差排序，排序结果显示在列表框List2 中｡运行效果如图所示｡

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

数组a中有n个正整数，对该数组进行排序，生成左右交替上升数据序列。实现该功能的VB程序段如下：

For i=1To n＼2

k=i

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

If Then

t=a(j)：a(j)=a(j+1)：a(j+1)=t

End If

Next j

Next i

上述程序中方框处可选语句或表达式有：

①For j=i+1 To n-i+ 1 ②For j=i+1 To n-i

③a(j)<a(j+1) ④a(j)>a(j+1)

则(1)、(2)、(3)处语句依次是（）

在Python中，下列不能表示“x既能被3整除，又能被5整除”的表达式是（）

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

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

在线咨询客服