admin 管理员组

文章数量: 1184232


2024年3月11日发(作者:易语言的页面源码)

1.下面所列四组数据中,全部是正确的VB常数的是____。

2768,1.34D2,"ABCDE",

&O1767

2.函数Len(Str(Val("123.4")))的值为______。

6

3.下面表达式中,

_Exp(-3.5)

_____的运算结果与其他三个不同。

eBox、Frame、OptionButton、ListBox、TextBox、Form、ComboBox这7个对

象中,具有Caption属性的有_

3

______个。

5.以下叙述中错误的是__

如果把一个菜单项的Enabled属性设置为False,

则该菜单项不可见___。

6.使用_

AddItem

______方法可将新的列表项添加到一个列表框中。

7.执行下列程序段,输出结果为

_7 0

_________。

Dim a(10) As Integer

Dim i As Integer

For i = 1 To 10

a(i) = 2 * i - 1

Next i

Print a(4);

Erase a

Print a(4)

8.以下关于动态数组的语句中,正确的是_

ReDim a(k+1):ReDim preserve

a(10)___

___。

9.下列程序段的执行结果为_

_11 3

______。

Dim M(10), N(10)

i = 3

For j = 1 To 5

M(j) = j

N(i) = 2 * i + j

Next j

Print N(i); M(i)

10.执行下面的程序,输出结果是___

_18 30____

___。

Option Explicit

Private Sub Form_Click()

Dim M As Integer,N As Integer

M=1:N=2

Print M+N+F(M,N)

M=2:N=1

Print F(M,N)+F(M,N);

End Sub

Private Function F(X As Integer,Y As Integer)

X=X+Y

Y=X+3

F=X+Y

End Function

11.调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时,以下不是按值

传递的是_

_Convert X__

_______。

12.下列说法正确的是

_模块级变量可在模块通用声明段中用Private和

Dim定义__________。

13.以下不属于Visual Basic系统的文件类型是__

.Bat

______。

14.在VB中有一行程序代码:="Visual Basic",其中的Text1、Text和"Visual

Basic"分别代表__

对象、属性、值__

__。

15.以下叙述中错误的是

_在工程资源管理器窗口中只能包含一个工程文

件及属于该工程的其他文件 _______。

中三种文件访问的类型为__

顺序、随机、二进制__

_______。

17.在使用OPEN语句打开文件时,如果省略"for 子句",则打开的文件存取方式为_

机存取方式__________。

18.向已有数据的C:文件添加数据,正确的文件打开命令是

_Open

"C:" For Append As #511__________。

19.下面程序段的运行结果为_

_溢出

______。

Dim s As Integer, i As Integer

i = 1: s = 1

Do

i = i + s

Loop Until s > 10

Print i, s

20.执行以下语句后,a的值为_

_溢出

______。

Dim a As Integer

a = 1

Do

a = a + 2

Loop Until a = 100

21.下面程序段的运行结果为

_1 2 12 288__

_____。

n = 1

For i = 1 To 4

For j = 1 To i

n = n * j

Next j

Print n;

Next i

22.若执行定义语句Dim a As Integer,以下给a赋值的语句中,错误的是

_a = 2 *

32760 3_____。

23.执行语句:A = Inputbox("Today", "Tomorrow", "Yesterday")

将显示一个输入对话框,在对话框的输入区中显示的信息是

_Yesterday

_____。

24.在文本框Text1中输入数字12,Text2中输入数字34,执行以下语句,只有

_=val() +val( )_

______可使文本框

Text3中显示46。

25.下列程序段的执行结果是

_False

______。

X = 2

Y = 1

If X * Y < 1 Then Y = Y - 1 Else Y = -1

Print Y - X > 0

26.关于语句If x=1 Then y=1,下列说法正确的是

_x=1为关系表达式,y=1为

赋值语句 ______。

27.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本

框,然后编写如下事件过程:

Private Sub Command1_Click()

N =

Select Case N

Case 1 To 20

X = 10

Case 2, 4, 6

X = 20

Case Is < 10

X = 30

Case 10

X = 40

End Select

= X

End Sub

程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的

内容是

_10

___。

28.在菜单过程中使用的事件是利用鼠标_

_单击

____菜单条来实现的。

29.如果要在两个菜单命令项之间加一条分隔线,可在标题文本框中键入

_-

______。

30.窗体Form1的名称属性是frm,它的Load事件过程名是

_Form_Load

______。

31.在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一

个名称为File1的文件列表框,两个名称分别为2,标题分别为空白和"共

有文件"的标签。编写程序,使得驱动器列表框与目录列表框.目录列表框与文件列表框

同步变化,并且在标签Label1中显示当前文件夹中文件的数量。能够正确实现上述功能

的程序是: Private Sub Dir1_Change()

=

n = unt

End Sub

Private Sub Drive1_Change()

=

n = unt

End Sub

假定在窗体上建立了通用对话框,其名称为CommonDialog1 ,用下面的语句可以建立一

个对话框:

= 2

与该语句等价的语句

是_ve __________。

32.在代码编辑器中,如果一条语句太长,无法在一行内写下(不包括注释),要折行书写,

可以在行末使用续行字符_

_一个空格加一个下划字符( _)

____,表示下

一行是当前行的继续。

33.以下关于图片框控件的说法中,错误的是

_用Stretch属性可以自动调整图

片框中图形的大小______。

过程与Function 函数最根本的区别是_

_前者无返回值,但后者有

_________。

35.执行以下语句后,a的值为_

_3 _

__。

Dim a As Integer

a = 1

Do

a = a + 2

Loop While a = 100

36.如果单击一个当前没有被选中的复选框,其他已被选中的复选框会处于

_选中

_____

状态。

37.

以下关于窗体的描述中,错误的是_

执行Unload Form1语句后,窗体Form1

消失,但仍在内存中_______。

在程序中分别将变量IntA、Bl、st和D定义为整型、布尔型、字符串型和日期型,下

列赋值语句在执行时会出错的是

Bl=#True#

____。

Visual Basic布尔运算符Xor ,Or,Not,And中,级别最高的运算符是_

Not

_____。

函数Int(Rnd*6+1)的取值范围是_

以下使用方法的代码中,正确的是_

_us

____。

放置控件到窗体中的最迅速的方法是_

双击工具箱中的控件

_______。

下列程序段的执行结果为

_0 2 2 3

_______。

Dim M(2)

For i=1 To 2

M(i)=0

Next i

K=2

For i=1 To k

For j=1 TO k

M(j)=M(i)+1

1到6共6个整数

_____。


本文标签: 文件 语句 执行