3.2 数据与结构 知识点题库

数据插入。用VB设计程序，主要功能如下：随机产生15个200以内的正整数数列，按升序排序后显示在List1列表框中，在文本框Text1中输入1个200以内的正整数，单击“插入”按钮Command1后将其插入到数列中，并保持数列仍然有序，显示在列表List2中，同时在标签Label4中显示插入的位置，程序界面如图所示。

实现上述功能的VB程序代码如下，请在划线处填上合适的代码。

Dim a( 1 To 20) As Integer

Private Sub Command1_Click ( )

Dim key As Integer

key =   ①   

i = 1

Do While key > a ( i ) And ( i <= 1 5 )

i = i + 1

Loop

Label4.Caption = “该数插入的位置是：” + Str ( i )

If  i = 16  Then

a ( i ) = key

Else

For j = 16  To  i + 1 Step -1

    ②  

Next j

a ( i ) = key

End  If

List2. Clear

For i = 1 To 16

List2.AddItem a( i)

Next i

End Sub

Private Sub Form_Load( )

'随机生成15个200以内的正整数

Randomize

For i = 1 To 15

a ( i ) = Int(Rnd * 200) + 1

Next i

'将15个数从小到大排序

For i = 1 To 14

k = i

For j = i + 1 To 15

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

Next j

If  i <>k  Then

t = a(i)； a( i) = a ( k )：a ( k )

End  If

Next i

'将排好序的数输出在列表框Listl中

Listl.Clear

For i = 1 To 15

Listl.AddItem str ( a ( i ) )

Next i

End Sub

程序中①划线处应填入，程序中②划线处应填入

下列可作为Visual Basic常量名的是：（   ）

在Visual Basic中，语句Dima (0To10) AsString所定义的数组元素个数是（   ）

常量 -0.00013579的科学记数法是( )。

设有以下定义语句：    

Dim min As Single ,  d2 As Double , abc As String

则变量min的类型是() ，变量d2的类型是() ，变量abc的类型是()。

A.可变类型   B.单精度型   C.双精度型   D.字符串型

VB中双精度型数据占（  ）个字节。

双精度型数据用浮点形式表示时，底数用表示。

有如下VB程序段

Dim a(1 To 100)As Integer, b(1 To 10) As Intege

Dim i As Integer, s As Integer, c As Integer

For i=1 To 100

    a(i)=0

Next i

For i=1 To 9 Step 2

    a(b(i))=a(b(i))+1: a(b(i+1)+1)=a(b(i+1)+1)-1

Next i

c=0

For i=1 To 100

    c=c+a(i)

    If c=0 Then s=s+ 1

Next i

Text1. Text= Str(s)

若数组b中的值依次为“5，10，7，20，30，40，40，60，55，70”，则程序运行后Text中的内容是（  ）

若要对实数型变量x四舍五入保留两位小数，下列VB表达式中能实现的是（  ）

在Visual Basic中，下列(  )类型属于字符串型。

数组是一组相同类型的变量集合，集合中的每个元素都是一个独立的变量。定义一个数组如下：Dim A(10) as Single，关于该数组描述错误的是（  ）。

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

下列选项中，不能作为VB变量名的是（  ）

列表中可以包含python中能存储的任何类型的数据。

有如下VisualBasic自定义函数:

Function f（x As Integer） As Single

  f=Abs（x）

End Function

该函数返回值的数据类型是（    ）

在文本框Text1中输入n，生成一个n*n的矩阵。矩阵各元素的值均为0或1，第1个元素的值随机生成，垂直和水平方向相邻元素值均不同。程序运行的界面及实现该过程的VB程序段如下所示：

n = Val(Text1.Text)

m =             

s = “ ”

For i = 1 To n * n

  s = s + Str(m)

  m = 1- m

  If i Mod n = 0 Then

    List1.AddItem s

 s = “ ”

 If             Then m = 1- m

  End If

Next i

实现该功能，则上述程序段横横线处的表达式分别为(    )

已知字符串型变量count，将变量count的值在标签Label1上显示，则下列语句正确的是（  ）

以下关于Python自带数据结构的运算结果中正确的是哪一项？（     ）

图结构中的每个顶点        与其他顶点有边相连，数据元素之间是        的关系。（    ）

列表q=[1，2，3，4，5，6]，删除列表数值1，下列代码不能实现此功能的代码是（）