【电大作业代做】福建电大 8966visualbasic程序设计 网上在线形考作业

VB程序中通常不会产生错误提示的是(  )。

A.

编译错误

B.

实时错误

C.

运行时错误

D.

逻辑错误

【答案】:D

表达式4 + 19 \ 6 * 7 / 8 Mod 2的值是( )。

A.

4

B.

5

C.

6

D.

7

【答案】:B

设用复制\粘贴的方法建立一个命令按钮数组Commandl,以下对该数组的说法错误的是( )。

A.

命令按钮的所有Caption属性都是Commandl

B.

在代码中访问任意一个命令按钮只需使用名称Commandl

C.

命令按钮的大小都相同

D.

命令按钮共享相同的事件过程

【答案】:B

下列正确的赋值语句是( )。

A.

x+y= 20

B.

y = x+20

C.

3x = y

D.

10=x+y

【答案】:请联系在线客服,或加微信好友

后缀为.vbp的文件表示VB 的(  )。

A.

类模块文件

B.

窗体文件

C.

工程文件

D.

标准类模块文件

【答案】:请联系在线客服,或加微信好友

在设计阶段,当双击窗体时,所打开的窗口是( )。

A.

工程资源管理器窗口

B.

工具箱窗口

C.

代码编辑器窗口

D.

属性窗口

【答案】:请联系在线客服,或加微信好友

为了在运行时把当前路径下的图形文件picturefile.jpg装入图片框Picture1,所使用的语句为( )。

A.

Picture1. Picture = LoadPrcture(”picturefile.jpg”)

B.

Picture1. Picture = LoadPrcture(picturefile.jpg)

C.

Picture. Picture = LoadPrcture(picturefile.jpg)

D.

Picture. Picture = LoadPrcture(”picturefile.jpg”)

【答案】:请联系在线客服,或加微信好友

Visual Basic应用程序处于执行模式时,这时( )。

A.

既不能设计界面,也不能编写代码

B.

可以编辑代码,不能设计界面

C.

可以设计界面,不能编辑代码

D.

既能设计界面,也能编写代码

【答案】:请联系在线客服,或加微信好友

下列关于窗体的说法不正确的是( )。

A.

窗体的标题由Caption属性确定

B.

窗体的Name属性与Caption属性相同

C.

窗体的背景图片由其Picture属性设定

D.

通过设置Icon属性可使窗体获得最小化时的图标

【答案】:请联系在线客服,或加微信好友

赋值语句:a = 123 + MID(“123456”,3,2)执行后,a变量中的值是( )。

A.

123

B.

34

C.

12334

D.

157

【答案】:请联系在线客服,或加微信好友

如果要在程序中显示一个弹出式菜单,那么要调用Visual Basic中提供的方法是( )。

A.

Print

B.

Move

C.

Refresh

D.

PopupMenu

【答案】:请联系在线客服,或加微信好友

下列”CommonDialog1”控件程序代码,CommonDialog1.Action = 1,代表( )。

A.

文件另存为

B.

打开文件

C.

色彩

D.

打印

【答案】:请联系在线客服,或加微信好友

下列程序段的执行结果是( )。
k = 0
For i = 1 To 3
a = i ^ i ^ k
Print a;
Next i

A.

1 1 1

B.

1 4 9

C.

0 0 0

D.

1 2 3

【答案】:请联系在线客服,或加微信好友

若果X的值小于或等于Y的平方,则打印“OK”,表示这个条件的单行格式IF语句是( )。

A.

If x <= y2 Then Print "OK" B. If x <= y2 Print "OK" C. If x <= y^2 Then "OK" D. If x <= y^2 Then Print "OK"【答案】:请联系在线客服,或加微信好友为了使图片框PictureBox的大小自动适应图形的大小,应( )。 A. 将其AutoSize属性值设置为True B. 将其AutoSize属性值设置为False C. 将其Stretch属性值设置为True D. 将其Stretch属性值设置为False【答案】:请联系在线客服,或加微信好友MsgBox函数的返回值的类型是(  )。 A. 整型 B. 字符串 C. 逻辑型 D. 日期型【答案】:请联系在线客服,或加微信好友为了使图像框Image中的图形自动适应图像框Image的大小,应( )。 A. 将其AutoSize属性值设置为True B. 将其AutoSize属性值设置为False C. 将其Stretch属性值设置为True D. 将其Stretch属性值设置为False【答案】:请联系在线客服,或加微信好友属于VB数据库引擎的是( )。 A. ODBC B. BDE C. Jet引擎 D. OLE DB【答案】:请联系在线客服,或加微信好友与键盘操作有关的事件有keyPress、KeyUp和KeyDown事件,这三个事件执行的顺序是( )。 A. KeyDown、keyPress、KeyUp B. KeyDown、KeyUp、keyPress C. keyPress、KeyDown、KeyUp D. 没有规律【答案】:请联系在线客服,或加微信好友过程调用时,下列关于形参与实参之间数据传递的原则说法正确的是( )。 A. 按实参和形参同名的原则 B. 按实参和形参位置对应的原则 C. 按实参和形参个数相同并且类型也对应的原则 D. 按实参和形参不仅位置对应,而且类型也对应的原则【答案】:请联系在线客服,或加微信好友在打开一个VB工程后,当要另存为一个版本时,单击“工程另存为…”即可,因为同时会保存窗体文件。() 对 错 【答案】:请联系在线客服,或加微信好友VB6.0用于开发任何环境下的应用程序。( ) 对 错 【答案】:请联系在线客服,或加微信好友在事件驱动的应用程序中,代码是按照预定的路径执行的。( ) 对 错 【答案】:请联系在线客服,或加微信好友计时器控件在Visual Basic应用程序启动后自动计时,无法暂停或关闭。( ) 对 错 【答案】:请联系在线客服,或加微信好友形式参数的数据类型可以为数值型、字符串型(包括定长和变长等)。( ) 对 错 【答案】:请联系在线客服,或加微信好友Sub main 过程必须在标准模块窗口中建立。 对 错 【答案】:请联系在线客服,或加微信好友要想在代码中给名为txtshow的文本框赋予文本:GOOD WORK!时,应当编写的语句是txtshow.text="GOOD WORK!"。( ) 对 错 【答案】:请联系在线客服,或加微信好友列表框和文本框一样均没有Caption,但都具有Text属性。( ) 对 错 【答案】:请联系在线客服,或加微信好友当列表框中的表项太多、超出了设计的长度时,VB会自动给列表框加上垂直滚动条。( ) 对 错 【答案】:请联系在线客服,或加微信好友利用图像框控件的Move方法和计时器能制作简单的动画。( ) 对 错 【答案】:请联系在线客服,或加微信好友数学关系3≤x<10表示成正确的Visual Basic表达式为3 <= x And x < 10。( ) 对 错 【答案】:请联系在线客服,或加微信好友MsgBox函数建立的信息框既能显示信息又能输入用户信息。( ) 对 错 【答案】:请联系在线客服,或加微信好友为组合框Combo1增加一个数据项“计算机”,使用的语句是:Combo1.AddItem = "计算机"。( ) 对 错 【答案】:请联系在线客服,或加微信好友CommonDialog控件就像Timer一样在运行时是看不见的。( ) 对 错 【答案】:请联系在线客服,或加微信好友在Visual Basic语言中有三种形式的循环结构。其中,若循环的次数可以适先确定,可使用For 循环;若要求先判断循环进行的条件,可使用While循环或Do 循环。 对 错 【答案】:请联系在线客服,或加微信好友For…Next循环正常(未执行Exit For)结束后,控制变量的当前值等于终值。( ) 对 错 【答案】:请联系在线客服,或加微信好友在标准模块的“通用部分”用Dim或Private语句声明的变量称为模块变量。( ) 对 错 【答案】:请联系在线客服,或加微信好友为了把一个窗体装入内存,所使用的语句为Load,而为了清除内存中指定的窗体,所使用的语句为Unload。 对 错 【答案】:请联系在线客服,或加微信好友Sub过程是通过形参与实参的传递得到结果不返回值,且Sub过程是一个独立的语句。( ) 对 错 【答案】:请联系在线客服,或加微信好友用InputBox函数设计的对话框,其功能是能接收用户输入的数据,并能返回用户输入的信息。( ) 对 错 【答案】:请联系在线客服,或加微信好友目录列表框用来显示当前驱动器下目录结构。刚建立时显示当前驱动器的顶层目录和当前目录,如果要显示其他驱动器上的目录信息,必须改变路径,即重新设置目录列表框的( )属性。 A. ListCount B. Path C. ListIndex D. List (index)【答案】:请联系在线客服,或加微信好友以下的属性和方法中,可重定义坐标系的是( )。 A. Drawstyle属性 B. DrawWidth属性 C. Scale方法 D. ScaleMode属性【答案】:请联系在线客服,或加微信好友执行语句Label1.Captin=”Visual Basic”之后,标签控件的Name属性和Caption属性值是( )。 A. Label1 Label1 B. Label1 Visual Basic C. Label1 Caption D. Caption Label1【答案】:请联系在线客服,或加微信好友VB程序的编译错误一般可通过VB集成环境的( )设置。 A. 要求变量声明 B. 自动语法检测 C. 自动显示快速信息 D. 根本无法自动检测【答案】:请联系在线客服,或加微信好友在设计动画时,用时钟控件来控制动画速度的属性是( )。 A. Enabled B. Interval C. Timer D. Move【答案】:请联系在线客服,或加微信好友为了给x,y,z三个变量赋初值1,以下正确的语句是( )。 A. x=1,y=1,z=1 B. x=1:y=1:z=1 C. x=y=z=1 D. xyz=1【答案】:请联系在线客服,或加微信好友事件的名称( )。 A. 都是由用户来定义的 B. 由用户或系统定义 C. 都是由系统预先定义的 D. 是不固定的【答案】:请联系在线客服,或加微信好友当单击工具栏上的按扭时,会触发的事件是( )。 A. ButtonClick B. Change C. Load D. KeyPress【答案】:请联系在线客服,或加微信好友下列用来设置窗体Form1属性的语句中,在运行时不能正确操作的是( )。 A. Form1.Caption="FormTest" B. Form1.Name="FormTest" C. Form1.Visible=True D. Form1.Width=4000【答案】:请联系在线客服,或加微信好友Cls可清除窗体或图形框中的内容是( )。 A. Picture属性设置的背景图案 B. 在设计时放置的控件 C. 程序运行时产生的图形和文字 D. 在设计时添加的文字【答案】:请联系在线客服,或加微信好友如果想让文本框中的内容在运行时不能编辑,需将文本框的( )属性设置为True。 A. Locked B. MultiLine C. TabStop D. Visible【答案】:请联系在线客服,或加微信好友可用来改变坐标度量单位的是( )。 A. Drawstyle属性 B. DrawWidth属性 C. Scale方法 D. ScaleMode属性【答案】:请联系在线客服,或加微信好友要在窗体的标题栏内显示“myfrm”,使用的语句是( )。 A. Form.caption="myfrm" B. Form1.caption="myfrm" C. Form1.print "myfrm" D. Form. print "myfrm"【答案】:请联系在线客服,或加微信好友语句Print"5*5"的执行结果是( )。 A. 25 B. "5*5" C. 出现错误提示 D. 5*5【答案】:请联系在线客服,或加微信好友如果仅需要得到当前系统时间,则可以使用的函数是(  )。 A. Time B. Year C. Now D. Date【答案】:请联系在线客服,或加微信好友将数据项“China”添加到列表框(List1)中成为第1项应使用的语句是( )。 A. List1.AddItem “China” ,0 B. List1.AddItem “China” ,1 C. List1.AddItem 0“China” D. List1.AddItem1“China”【答案】:请联系在线客服,或加微信好友控件数组共用一个控件名,但具有不同的属性,它们的事件过程也不相同。( ) 对 错 【答案】:请联系在线客服,或加微信好友标签没有Change事件和SetFocus方法。( ) 对 错 【答案】:请联系在线客服,或加微信好友Print方法的缺省对象是当前窗体。( ) 对 错 【答案】:请联系在线客服,或加微信好友设置Shape控件的Style属性可以绘制多种形状的图形。( ) 对 错 【答案】:请联系在线客服,或加微信好友设置好窗体字体后,在窗体上建立控件,各控件的默认字体为窗体字体。( ) 对 错 【答案】:请联系在线客服,或加微信好友在Visual Basic中,用Dim定义数组时数组元素也自动赋初值为0。( ) 对 错 【答案】:请联系在线客服,或加微信好友如果工程中含有Sub Main过程,则程序一定首先执行该过程。( ) 对 错 【答案】:请联系在线客服,或加微信好友Do…Loop While结构中的循环体至少被执行一次。( ) 对 错 【答案】:请联系在线客服,或加微信好友要读取一个磁盘文件,需要使用EOF函数来判断文件是否到达文件尾。( ) 对 错 【答案】:请联系在线客服,或加微信好友用Public定义过程,能被定义它的窗体模块及标准模块中的语句、过程调用,也能被未定义Sub或Function过程的其他窗体模块和标准模块中的语句、过程调用。( ) 对 错 【答案】:请联系在线客服,或加微信好友在VB6.0集成开发环境中有三种工作模式,下列不属于三种工作模式之一的是( )。 A. 设计模式 B. 中断模式 C. 执行模式 D. 编写代码模式【答案】:请联系在线客服,或加微信好友数据对象模型中采用OLE DB访问数据库的是(  )。 A. DAO B. RDO C. ADO D. RDO和ADO【答案】:请联系在线客服,或加微信好友在下列选项中,不能将图像装入图片框和图像框的是( )。 A. 在界面设计时,通过Picture属性装入 B. 在界面设计时,手工在图像框和图片框中绘制图形 C. 在界面设计时,利用剪贴板把图像粘贴上 D. 在程序运行期间,用LoadPicture函数把图形文件装入【答案】:请联系在线客服,或加微信好友在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与其同步改变。设置两个控件同步的命令放在一个时间过程中,这个事件过程是( )。 A. Drive1 Click B. Drive1 Change C. Dri1 Click D. Dri1 Change【答案】:请联系在线客服,或加微信好友ADO对象模型时,使Recordset和Connection对象建立连接的属性是( )。 A. Open B. Execute C. ActiveConnection D. CommandType【答案】:请联系在线客服,或加微信好友由“For I = 1 To 16 Step 3”决定的循环结构被执行( )次。 A. 4 B. 5 C. 6 D. 7【答案】:请联系在线客服,或加微信好友KILL语句在VB语言中的功能是( )。 A. 清内存 B. 清病毒 C. 删除磁盘上的文件 D. 清屏幕【答案】:请联系在线客服,或加微信好友为了清除图片框Picture1中的图形,应采取的正确方法是( )。 A. 选择图片框,然后按Del键 B. 执行语句Picture1.Picture = LoadPicture("") C. 执行语句Picture1.Picture = "" D. 选择图片框,在属性窗口中选择Picture属性条,然后按回车键【答案】:请联系在线客服,或加微信好友如下数组声明语句,正确的是(  )。 A. Dim a[3,4] As Integer B. Dim a(3,4) As Integer C. Dim a(n,n) As Integer D. Dim a(3 4) As Integer【答案】:请联系在线客服,或加微信好友通常用户自己编写的对话框,窗体最好是大小不变的,应该设置窗体的( )属性。 A. ScaleWidth和ScaleHeight B. BorderStyle C. AutoSize D. ScaleMode【答案】:请联系在线客服,或加微信好友一旦数据到达,将首先触发Winsock控件的(  )。 A. DataArrival事件 B. ConnectionRequest事件 C. DataSend事件 D. DataGet事件【答案】:请联系在线客服,或加微信好友为了使目录路径列表框Dir1的内容符合驱动器列表框Drive1的选择,应当( )。 A. 在Dir1_Change事件中加入Dir1.Path = Drive1.Drive B. 在Drive1_Change事件中加入Dir1.Path = Drive1.Drive C. 在Dir1_Change事件中加入Drive1.Path = Dir1.Path D. 在Drive1_Change事件中加入Drive1.Path = Dir1.Path【答案】:请联系在线客服,或加微信好友Timer控件可用于后台进程中,可在Timer事件内编程,要停止触发Timer事件,需要设置的属性是( )。 A. Interval=0或Enabled=False B. Interval=0或Visible=False C. Visibl=False 或Enabled=False D. Interval=0且Enabled=False【答案】:请联系在线客服,或加微信好友VB程序中设置断点的按键是(  )。 A. F5键 B. F6键 C. F9键 D. F10键【答案】:请联系在线客服,或加微信好友以下描述正确的是( )。 A. 标准模块中的任何过程都可以在整个工程范围内被调用 B. 在一个窗体模块中可以调用在其它窗体中被定义为Public的通用过程 C. 如果工程中包含Sub Main过程,则程序将首先执行该过程 D. 如果工程中不包括含Sub Main 过程,则程序一定首先执行第一个建立的窗体【答案】:请联系在线客服,或加微信好友Sub过程与 Function过程最根本的区别是Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值。( ) 对 错 【答案】:请联系在线客服,或加微信好友使用Circle方法在窗体Form1上以(15,15)为圆心,10 为半径画园,具体形式为 Form1. Circle(15,15),10。( ) 对 错 【答案】:请联系在线客服,或加微信好友由Visual Basic语言编写的应用程序有解释和编译两种执行方式。( ) 对 错 【答案】:请联系在线客服,或加微信好友窗体的标题必须在程序启动前确定,在程序运行过程中窗体的标题是不能改变的。( ) 对 错 【答案】:请联系在线客服,或加微信好友打开一个工程时,系统不会自动载入与该工程有关的窗体、标准模块等文件类型。( ) 对 错 【答案】:请联系在线客服,或加微信好友在Do…Loop循环语句中,若要强制退出循环,使用的退出语句是Exit Do( ) 对 错 【答案】:请联系在线客服,或加微信好友缺省的坐标系统都是从容器的左上角(0,0)坐标开始的,起始坐标不能改变,但刻度可以改变。( ) 对 错 【答案】:请联系在线客服,或加微信好友全局变量在整个应用程序中有效,一般在标准模块中使用Public语句声明。( ) 对 错 【答案】:请联系在线客服,或加微信好友在VB6.0中,当改变目录列表框的Path属性时,改变了当前驱动器的当前路径。( ) 对 错 【答案】:请联系在线客服,或加微信好友在循环体内,循环变量的值不能被改变。( ) 对 错 【答案】:请联系在线客服,或加微信好友图片框的AutoSize属性和图像框的Stretch属性都能完整地显示图片,因此他们功能完全一样。( ) 对 错 【答案】:请联系在线客服,或加微信好友在列表框的诸多属性中,用来列出列表框项目的内容是( )。 A. List属性 B. Listcount属性 C. Listdex属性 D. Text属性【答案】:请联系在线客服,或加微信好友对于文件列表框,重新设置的( )属性,将引发Change事件。 A. Pattern B. ListCount C. Path D. ListName【答案】:请联系在线客服,或加微信好友下列叙述中正确的是( )。 A. 在窗体的Form_Load事件过程中定义的变量是全局变量 B. 局部变量的作用域可以超出所定义的过程 C. 在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名,但其作用域只限于该过程 D. 在调用过程时,所有局部变量被初始化为0或空字符串【答案】:请联系在线客服,或加微信好友假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是( )。 A. 单击窗体上没有控件的地方 B. 单击任一个控件 C. 不执行任何操作 D. 双击窗体的标题栏【答案】:请联系在线客服,或加微信好友数组可以分为静态数组和动态数组两类,主要区别在于:静态数组在编译时要开辟内存区,而动态数组在( )时才开辟内存区。 A. 窗体制作 B. 运行 C. 控件属性设置 D. 编写代码【答案】:请联系在线客服,或加微信好友用于获得字符串长度的函数是( )。 A. Len() B. Length() C. StrLen() D. StrLength()【答案】:请联系在线客服,或加微信好友关于对象的属性不正确的是( )。 A. 对象的属相一般有属性名和属性值 B. 可以通过属性窗口设置属性的值 C. 可通过程序代码设置属性的值 D. 对象的所有属性值均可在设计时设置【答案】:请联系在线客服,或加微信好友下列不是Visual Basic数据文件的是( )。 A. 顺序文件 B. 随机文件 C. 二进制文件 D. 数据库文件【答案】:请联系在线客服,或加微信好友要在命令按纽上显示图形,应首先设置的属性是( )。 A. Enabled B. Style C. Caption D. Icon【答案】:请联系在线客服,或加微信好友Image控件和Picture控件都可以用LoadPicture函数把图形文件装入控件中。( ) 对 错 【答案】:请联系在线客服,或加微信好友设计菜单中的每一个菜单项分别是一个控件,每个控件都有自己的名字和事件。( ) 对 错 【答案】:请联系在线客服,或加微信好友用Dim A(3,-2 To 3)语句声明二维数组后,数组A的元素共有24 个。( ) 对 错 【答案】:请联系在线客服,或加微信好友Cls方法可以清除窗体或图片框中在运行阶段产生的图形和文字。( ) 对 错 【答案】:请联系在线客服,或加微信好友VB中默认的传递参数的机制是传址方式。( ) 对 错 【答案】:请联系在线客服,或加微信好友当图片框PictureBox控件的AutoSize属性为Ture时,超过图片框尺寸的图片其超过部分会被图片框截去。( ) 对 错 【答案】:请联系在线客服,或加微信好友窗体Form1的Name属性为Myfrm,则它的Load事件过程名为( )。 A. Form_Load B. Me_Load C. Myfrm_Load D. Form1_Load【答案】:请联系在线客服,或加微信好友将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后,将该可执行文件拿到其它机器上不能运行的主要原因是( )。 A. 运行的机器上无VB系统所需的动态链接库 B. 缺少.frm窗体文件 C. 该可执行文件有病毒 D. 操作错误【答案】:请联系在线客服,或加微信好友下面关于工程的概念中错误的是( )。 A. Visual Basic 的工程是相关应用程序文件的集合 B. Visual Basic 的工程实际上为了管理构成应用程序的所有文件 C. 一个大的Visual Basic应用程序才能构成一个工程 D. 建立只有一个窗口的应用程序,会生成多个程序文件,也称为一个工程【答案】:请联系在线客服,或加微信好友确定一个控件在窗体上的位置的属性是( )。 A. Width或Height B. Width和Height C. Top或Left D. Top和Left【答案】:请联系在线客服,或加微信好友在下列关于菜单的说法中,错误的是( )。 A. 每个菜单项都是一个控件,与其他控件一样也有自己的属性和事件 B. 除了 Click事件之外,菜单项还能响应其他如 DbClick等事件 C. 菜单项的快捷键不能任意设置 D. 在程序执行时,如果菜单项的Enable属性为False,则该菜单项变成灰色,不能被用户选用【答案】:请联系在线客服,或加微信好友图像框(Image)和图片框(Picture)在使用时有所不同,以下叙述中正确的是( )。 A. 图片框比图像框占内存少 B. 图像框内还可包括其它控件 C. 图片框有Stretch属性而图像框没有 D. 图像框有Stretch属性而图片框没有【答案】:请联系在线客服,或加微信好友使用Shape控件无法得到的图形是( )。 A. 矩形 B. 圆形 C. 椭圆 D. 扇形【答案】:请联系在线客服,或加微信好友若要将窗体从内存中卸载,应使用的方法是( )。 A. Show B. Unload C. Load D. Hide【答案】:请联系在线客服,或加微信好友Line(200,200)-Step(500,500)将在窗体( )画一直线。 A. (200,200)到(500,500) B. (200,200)到(300,300) C. (200,200)到(700,700) D. (300,300)到(500,500)【答案】:请联系在线客服,或加微信好友对象模型含有七种对象,其中用于建立一个和数据源的连接的对象是( )。 A. Command B. Connection C. Recordset D. Field【答案】:请联系在线客服,或加微信好友假定建立了一个Command1的命令按钮数组,则数组中每个命令按钮的 Caption属性都相同。( ) 对 错 【答案】:请联系在线客服,或加微信好友执行List1.List(List1.ListCount)=”80”语句后,List1列表框会增加一个“80” 表项。( ) 对 错 【答案】:请联系在线客服,或加微信好友文件列表框与驱动器列表框、目录列表框一样,都能响应Change事件。文件列表框与驱动器列表框、目录列表框一样,都能响应Change事件。( ) 对 错 【答案】:请联系在线客服,或加微信好友ADO是建在OLEDB之上的对象模型,是对OLEDB的封装。( ) 对 错 【答案】:请联系在线客服,或加微信好友在VB6.0中,变量“Hello”和变量“HELLO”指的是不同的两个变量名。( ) 对 错 【答案】:请联系在线客服,或加微信好友通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上。( ) 对 错 【答案】:请联系在线客服,或加微信好友TextBox与Label有许多共同点,它们都能显示和输入文字。( ) 对 错 【答案】:请联系在线客服,或加微信好友InputBox函数默认的返回值类型是( )。 A. 数值 B. 字符串 C. 逻辑型 D. 数值或字符串【答案】:请联系在线客服,或加微信好友在Visual Basic中,下列优先级最高的是( )。 A. * B. C. < D. Not【答案】:请联系在线客服,或加微信好友文本框的ScrollBars属性设置为非零值,却没有效果,原因是( )。 A. 文本框中没有内容 B. 文本框的MultiLine属性值为True C. 文本框的MultiLine属性值为False D. 文本框的Locked属性值为True【答案】:请联系在线客服,或加微信好友VB6.0集成开发环境可以( )。 A. 编辑、调试、运行程序,但不能生成可执行文件 B. 编辑、生成可执行文件、运行程序,但不能调试程序 C. 编辑、调试、生成可执行程序,但不能运行程序 D. 编辑、调试、运行程序,也能生成可执行文件【答案】:请联系在线客服,或加微信好友ADO模型中一般可通过Conection对象的Execute方法执行增加、删除、修改SQL语句。( ) 对 错 【答案】:请联系在线客服,或加微信好友过程中的静态变量是局部变量,当过程被再次执行时,它的值是上一次过程调用后的值。( ) 对 错 【答案】:请联系在线客服,或加微信好友所谓按址传递就是当过程被调用时,形参与实参共享同一个内存单元。( ) 对 错 【答案】:请联系在线客服,或加微信好友下列说法不正确的是( )。 A. Form、PictureBox、Frame都可以作为控件容器 B. 任何对象的坐标都是以其所在的容器的坐标系统为准的 C. 可以容纳图片文字等的控件都是容器,如PictureBox、Image D. PictureBox与Image的最大区别是前者可以作为容器,而后者不能。【答案】:请联系在线客服,或加微信好友在设计应用程序时,可以查看到应用程序工程中所有组成部分的窗口是( )。 A. 窗体布局窗口 B. 代码编辑器窗口 C. 属性窗口 D. 工程资源管理器窗口【答案】:请联系在线客服,或加微信好友对于窗体级变量,下列说法中错误的是()。 A. 所在窗体的各子程序都可以访问 B. 其他窗体的子程序不能访问 C. 所在窗体的子程序不能访问用Private定义的窗体级变量 D. 一定要在所在窗体的通用区内定义【答案】:请联系在线客服,或加微信好友Do Until…Loop循环命令的功能是( )。 A. 先进入循环执行语句段落后,再判断是否再进入循环 B. 先进入循环执行语句段落后, 再判断是否不再进入循环 C. 执行前先判断是否不满足条件,若不满足才进入循环 D. 执行前先判断是否不满足条件,若满足才进入循环【答案】:请联系在线客服,或加微信好友当程序运行过程中,需要给用户一些提示信息或警告信息时,应使用()。 A. 赋值语句 B. InputBox C. MsgBox D. print【答案】:请联系在线客服,或加微信好友在一行语句内写多条语句时,每个语句之间用( )符号分割。 A. , B. : C. 、 D. ;【答案】:请联系在线客服,或加微信好友保存一个工程文件至少应该保存两个文件,这两个文件分别是( )。 A. 文本文件和工程文件 B. 窗体文件和工程文件 C. 窗体文件和标准模块文件 D. 类模块文件和工程文件【答案】:请联系在线客服,或加微信好友下面选项中,能绘制一条水平直线的选项是( )。 A. Line (1000, 2000)-(1000, 2000) B. Line (1000, 2000)-(1000, 3000) C. Line (1000, 2000)-(2000, 2000) D. Line (1000, 2000)-(2000, 3000)【答案】:请联系在线客服,或加微信好友以下关于变量作用域的叙述中,正确的是( )。 A. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用 B. 全局变量必须在标准模块中声明 C. 模块级变量只能用Private关键字声明 D. Static类型变量的作用域是它所在的窗体或模块文件【答案】:请联系在线客服,或加微信好友按照变量的作用域可将变量划分为( )。 A. 公有、私有、系统 B. 全局变量、模块级变量、过程级变量 C. 动态、常数、静态 D. Public、 Private、 Protected【答案】:请联系在线客服,或加微信好友为了保存一个Visual Basic应用程序,下列说法正确的是( )。 A. 只保存窗体文件(.frm) B. 只保存工程文件(.vbp) C. 分别保存工程文件和标准模块文件(.bas) D. 分别保存工程文件、窗体文件和标准模块文件【答案】:请联系在线客服,或加微信好友设窗体的名称Forml,则在程序运行过程中,单击窗体时,被执行的事件过程的名称是( )。 A. Forml_Click( ) B. Forml_DbClick( ) C. Form_Click( ) D. Form_DbClick( )【答案】:请联系在线客服,或加微信好友执行指令"Line(200,200,)-Step(500,500,)"后,CurrentX=( )。 A. 200 B. 500 C. 300 D. 700【答案】:请联系在线客服,或加微信好友如果工程中含有Sub Main过程,则程序一定首先执行该过程。() 对 错 【答案】:请联系在线客服,或加微信好友Sub过程是通过形参与实参的传递得到结果不返回值,且Sub过程是一个独立的语句。() 对 错 【答案】:请联系在线客服,或加微信好友标签没有Change事件和SetFocus方法。() 对 错 【答案】:请联系在线客服,或加微信好友将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后,将该可执行文件拿到其它机器上不能运行的主要原因是()。 A. 运行的机器上无VB系统所需的动态链接库 B. 缺少.frm窗体文件 C. 该可执行文件有病毒 D. 操作错误【答案】:请联系在线客服,或加微信好友下列对象中不能作为容器的是( )。 A. 窗体 B. Image控件 C. PictureBox控件 D. Frame控件【答案】:请联系在线客服,或加微信好友Dim A(1 To 6, 6) As String定义的数组包含的元素个数是( )。 A. 36 B. 49 C. 42 D. 50【答案】:请联系在线客服,或加微信好友以下不属于Visual Basic6.0的特点的选项是( )。 A. 可视化编程 B. 算法设计 C. 面向对象程序设计 D. 事件驱动【答案】:请联系在线客服,或加微信好友矩形、三角形、正方形、圆形4种图形中,不能用Shape控件绘制的是( )。 A. 矩形 B. 正方形 C. 三角形 D. 圆形【答案】:请联系在线客服,或加微信好友一句语句要在下一行继续写,用( )符号作为续行符。 A. + B. - C. _ D. …【答案】:请联系在线客服,或加微信好友 下列程序段的执行结果是( )。 k = 0 For i = 1 To 3 a = i ^ i ^ k Print a; Next i A. 1 1 1 B. 1 4 9 C. 0 0 0 D. 1 2 3 【答案】:请联系在线客服,或加微信好友复选框对象是否被选中,是由其( )属性决定的。 A. Checked B. Value C. Enabled D. Selected【答案】:请联系在线客服,或加微信好友当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息,应按的键是( )。 A. Help B. F1 C. Esc D. F10【答案】:请联系在线客服,或加微信好友数组元素中的下标的个数称为数组的维数。( ) 对 错 【答案】:请联系在线客服,或加微信好友计时器开始计时后,每经过一段按照Interval属性设定时间间隔,会自动触发一次Timer事件并且重新计时。() 对 错 【答案】:请联系在线客服,或加微信好友Sub过程与 Function过程最根本的区别是Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值。() 对 错 【答案】:请联系在线客服,或加微信好友窗体的Caption属性用来设置窗体的标题,在代码中可以用这个标题引用该窗体。() 对 错 【答案】:请联系在线客服,或加微信好友设置Shape控件的Style属性可以绘制多种形状的图形。() 对 错 【答案】:请联系在线客服,或加微信好友当图片框PictureBox控件的AutoSize属性为Ture时,超过图片框尺寸的图片其超过部分会被图片框截去。() 对 错 【答案】:请联系在线客服,或加微信好友子程序调用时,如果参数按址传递并且实际参数是变量,则子程序在执行时对形参的修改不会影响到对应传递的实参变量的内容。() 对 错 【答案】:请联系在线客服,或加微信好友计时器控件在Visual Basic应用程序启动后自动计时,无法暂停或关闭。() 对 错 【答案】:请联系在线客服,或加微信好友Do…Loop Until结构的循环,是“先判断、后执行(循环体)”的循环结构。( ) 对 错 【答案】:请联系在线客服,或加微信好友形参是用来接收传送给通用过程的数据;实参是将它们的数据(数值或地址)传送给Sub或Function过程与其对应的参数。( ) 对 错 【答案】:请联系在线客服,或加微信好友有程序代码如下:Text1.Text = "VB程序设计",则Text1,Text和"VB程序设计"分别代表( )。 A. 对象,值,属性 B. 对象,方法,属性 C. 对象,属性,值 D. 属性,对象,值【答案】:请联系在线客服,或加微信好友文本框的ScrollBars属性设置为非零值,却没有效果,原因是()。 A. 文本框中没有内容 B. 文本框的MultiLine属性值为True C. 文本框的MultiLine属性值为False D. 文本框的Locked属性值为True【答案】:请联系在线客服,或加微信好友使用Public Const语句声明一个全局的符号常量时,该语句应放在( )。 A. 过程中 B. 窗体模块的通用声明段 C. 标准模块的通用声明段 D. 窗体模块或标准模块的通用声明段【答案】:请联系在线客服,或加微信好友如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的()属性。 A. Caption B. PasswordChar C. Text D. Char【答案】:请联系在线客服,或加微信好友VB中控件主要分为三类,下面哪一种不是VB中的控件类( )。 A. 标准控件 B. ActiveX C. 可插入对象 D. 外部控件【答案】:请联系在线客服,或加微信好友使用Line方法画直线后,当前坐标在( )。 A. (0,0) B. 直线起点 C. 直线终点 D. 容器的中心【答案】:请联系在线客服,或加微信好友以下叙述中错误的是( )。 A. 一个工程中只能有一个SubMain过程 B. 窗体的Show方法是将指定的窗体装入内存并显示该窗体 C. 窗体的Hide方法和Unload语句作用效果相同 D. 如工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体【答案】:请联系在线客服,或加微信好友For…Next循环正常(未执行Exit For)结束后,控制变量的当前值等于终值。() 对 错 【答案】:请联系在线客服,或加微信好友用Static定义变量语句在过程中定义了一个变量x,则x可以在该过程所有所在的模块运行期间一直存在。( ) 对 错 【答案】:请联系在线客服,或加微信好友图片框的AutoSize属性和图像框的Stretch属性都能完整地显示图片,因此他们功能完全一样。() 对 错 【答案】:请联系在线客服,或加微信好友用InputBox函数设计的对话框,其功能是能接收用户输入的数据,并能返回用户输入的信息。() 对 错 【答案】:请联系在线客服,或加微信好友缺省的坐标系统都是从容器的左上角(0,0)坐标开始的,起始坐标不能改变,但刻度可以改变。() 对 错 【答案】:请联系在线客服,或加微信好友为了清除图片框Picture1中的图形,应采取的正确方法是()。 A. 选择图片框,然后按Del键 B. 执行语句Picture1.Picture = LoadPicture("") C. 执行语句Picture1.Picture = "" D. 选择图片框,在属性窗口中选择Picture属性条,然后按回车键【答案】:请联系在线客服,或加微信好友多窗体程序是由多个窗体组成,在缺省情况下,VB在应用程序执行时,总是把()指定为启动窗体。 A. 不包含任何控件的窗体 B. 设计时的第一个窗体 C. 包含控件最多的窗体 D. 命名为Frm1的窗体【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() For i = 1 To 10 Step 2 y = y + i Next i Print iEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 25 B. 10 C. 11 D. 9【答案】:请联系在线客服,或加微信好友如果想在程序运行时从键盘输入数据,应使用的方法是( )。 A. 赋值语句 B. InputBox C. MsgBox D. print【答案】:请联系在线客服,或加微信好友以下叙述中正确的是( )。 A. 窗体的Name属性指定窗体的名称、用来标识一个窗体 B. 窗体的Name 属性的值是显示在窗体标题栏中的文本 C. 可以在运行期间改变对象的Name属性的值 D. 对象的Name属性值可以为空【答案】:请联系在线客服,或加微信好友在代码中定义了一个子过程Sub p(a,b)…End Sub下面调用该过程的正确的语句格式是( )。 A. Call p B. Call p 10,20 C. Call p (10,20) D. p (10,20)【答案】:请联系在线客服,或加微信好友调用Sub过程时,使用( )语句,该语句用于把程序控制传送到一个Visual Basic的Sub过程。 A. Fact B. Click C. Functin D. Call【答案】:请联系在线客服,或加微信好友下面程序的循环次数是( )。For i = 10 To 40 Step 6 Print iNext i A. 4 B. 5 C. 6 D. 7【答案】:请联系在线客服,或加微信好友要读取一个磁盘文件,需要使用EOF函数来判断文件是否到达文件尾。() 对 错 【答案】:请联系在线客服,或加微信好友在控件数组中,每一个控件都共享一个事件过程。在控件数组中,每一个控件都共享一个事件过程。( ) 对 错 【答案】:请联系在线客服,或加微信好友窗体的Name属性的值是显示在窗体标题栏中的文本。( ) 对 错 【答案】:请联系在线客服,或加微信好友添加一个命令按钮,并编写如下程序代码: Private Sub Command1_Click() x = "12.34": y = "56.78" z = x + y p = Val(z) Print p End Sub 程序运行后,单击命令按钮后的输出结果为( )。 A. 12.34 B. 56.78 C. 69.12 D. 12.3456【答案】:请联系在线客服,或加微信好友在VB工程中,可以作为启动对象的是( )。 A. 任何窗体或标准模块 B. 任何窗体或过程 C. Sub Main过程或其他任何模块 D. Sub Main过程或任何窗体【答案】:请联系在线客服,或加微信好友表达式4 + 19 \ 6 * 7 / 8 Mod 2的值是()。 A. 4 B. 5 C. 6 D. 7【答案】:请联系在线客服,或加微信好友语句Print 5*5\5/5的输出结果是( )。 A. 5 B. 25 C. 0 D. 1【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() n = Text1.Text 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 Text2.Text = xEnd Sub程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是( )。 A. 10 B. 20 C. 30 D. 40【答案】:请联系在线客服,或加微信好友数学关系3≤x<10表示成正确的Visual Basic表达式为3 <= x And x < 10。() 对 错 【答案】:请联系在线客服,或加微信好友全局变量在整个应用程序中有效,一般在标准模块中使用Public语句声明。() 对 错 【答案】:请联系在线客服,或加微信好友目录列表框的Path属性,只能用程序代码设置,不能通过属性窗口设置。() 对 错 【答案】:请联系在线客服,或加微信好友在文件列表框中设定“文件列表”中显示的文件类型应修改该控件的( )属性。 A. Path B. Pattern C. Name D. FileName【答案】:请联系在线客服,或加微信好友如果要在程序中显示一个弹出式菜单,那么要调用Visual Basic中提供的方法是()。 A. Print B. Move C. Refresh D. PopupMenu【答案】:请联系在线客服,或加微信好友下列用来设置窗体Form1属性的语句中,在运行时不能正确操作的是()。 A. Form1.Caption="FormTest" B. Form1.Name="FormTest" C. Form1.Visible=True D. Form1.Width=4000【答案】:请联系在线客服,或加微信好友设置直线边框类型的属性是( )。 A. BorderStyle属性 B. DrawWidth属性 C. ScaleMode属性 D. ScaleWidth属性【答案】:请联系在线客服,或加微信好友当列表框中的表项太多、超出了设计的长度时,VB会自动给列表框加上垂直滚动条。() 对 错 【答案】:请联系在线客服,或加微信好友在Visual Basic中将一些通用的过程和函数编写好并封装,作为方法供用户直接调用。() 对 错 【答案】:请联系在线客服,或加微信好友在过程中用( )来表示形参的传值。 A. Var B. ByRef C. ByVal D. Value【答案】:请联系在线客服,或加微信好友目录列表框的Path属性的作用是( )。 A. 显示当前驱动器或指定驱动器上的路径 B. 显示当前驱动器或指定驱动器上的某目录下的文件名 C. 显示根目录下的文件名 D. 只显示当前路径下的文件【答案】:请联系在线客服,或加微信好友在循环体内,循环变量的值不能被改变。() 对 错 【答案】:请联系在线客服,或加微信好友在Print方法中,为了使数据以紧凑格式输出,应在输出项之间加入的分隔符是()。 A. 逗号 B. 分号 C. 空格 D. 顿号【答案】:请联系在线客服,或加微信好友下列关于PictureBox控件和Image控件的说法不正确的是( )。 A. PictureBox可以作为控件容器,因此比Image控件占用系统资源多 B. Image控件能自动调整大小以适应载入的图片 C. PictureBox除具有Image的所有特性外,还能作为容器 D. PictureBox控件能自动调整大小以适应其中的图形【答案】:请联系在线客服,或加微信好友在使用Delete方法删除当前记录后,记录指针位于被删除记录上。() 对 错 【答案】:请联系在线客服,或加微信好友TextBox与Label有许多共同点,它们都能显示和输入文字。() 对 错 【答案】:请联系在线客服,或加微信好友窗体设计窗口的主要功能是( )。 A. 设计控件外观 B. 编写源程序代码 C. 建立用户界面 D. 设置对象属性【答案】:请联系在线客服,或加微信好友WinsockServer.LocalPort = 10001语句的含义是(  )。 A. 设置侦听端口 B. 设置计算机IP地址 C. 设置中断地址 D. 设置通讯协议【答案】:请联系在线客服,或加微信好友由“For I = 1 To 16 Step 3”决定的循环结构被执行()次。 A. 4 B. 5 C. 6 D. 7【答案】:请联系在线客服,或加微信好友执行Form1.Scale(10,-20)-(-30,20)语句后。Form1窗体坐标系x轴和y轴的正方向是()。 A. 向左和向下 B. 向右和向上 C. 向左和向上 D. 向右和向下【答案】:请联系在线客服,或加微信好友下列关于属性设置的叙述错误的是( )。 A. 控件具有什么属性是VB预先设计好的,用户不能改变 B. 控件具有什么属性是VB预先设计好的,用户可以改变 C. 控件的属性既可以在属性窗口中设置,也可以用程序代码设置 D. 控件的属性在属性窗口中设置后,还可以用程序代码为其设置新值【答案】:请联系在线客服,或加微信好友以下表述中错误的是( )。 A. 在程序运行时,通用对话框控件是不可见的 B. 在同一个程序中,用不同的方法(如ShowOpen或ShowSave等)打开的通用对话框具有不同的作用 C. 调用通用对话框控件的ShowOpen方法,可以直接打开在该通用对话框中指定的文件 D. 调用通用对话框控件的ShowColor方法,可以打开颜色对话框【答案】:请联系在线客服,或加微信好友Right(〞ABCDEFG〞,3)的执行结果是( )。 A. ABC B. EFG C. DEF D. CDE【答案】:请联系在线客服,或加微信好友在Visual Basic中,如果一个变量未作类型声明而直接使用,则该变量的数据类型是()。 A. 字符串型 B. 数值型 C. 变体类型 D. 可以是任何类型【答案】:请联系在线客服,或加微信好友在Print方法中,为了使数据以紧凑格式输出,应在输出项之间加入的分隔符是( )。 A. 逗号 B. 分号 C. 空格 D. 顿号【答案】:请联系在线客服,或加微信好友对于窗体级变量,下列说法中错误的是( )。 A. 所在窗体的各子程序都可以访问 B. 其他窗体的子程序不能访问 C. 所在窗体的子程序不能访问用Private定义的窗体级变量 D. 一定要在所在窗体的通用区内定义【答案】:请联系在线客服,或加微信好友计时器开始计时后,每经过一段按照Interval属性设定时间间隔,会自动触发一次Timer事件并且重新计时。( ) 对 错 【答案】:请联系在线客服,或加微信好友目录列表框的Path属性,只能用程序代码设置,不能通过属性窗口设置。( ) 对 错 【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() For i = 1 To 10 Step 2 y = y + i Next i Print i End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 25 B. 10 C. 11 D. 9【答案】:请联系在线客服,或加微信好友Sub过程与 Function过程最根本的区别是( )。 A. Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以。 B. Function过程可以有参数,Sub过程不可以。 C. 两种过程参数的传递方式不同。 D. Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值。【答案】:请联系在线客服,或加微信好友在使用Delete方法删除当前记录后,记录指针位于被删除记录上。( ) 对 错 【答案】:请联系在线客服,或加微信好友子程序调用时,如果参数按址传递并且实际参数是变量,则子程序在执行时对形参的修改不会影响到对应传递的实参变量的内容。( ) 对 错 【答案】:请联系在线客服,或加微信好友下列关于变量的说法不正确的是( )。 A. 局部变量是指那些在过程中用Dim语句或Static语句声明的变量 B. 局部变量的作用域仅限于声明它的过程 C. 静态局部变量是在过程中用Static语句声明的 D. 局部变量在声明它的过程执行完毕后就被释放了【答案】:请联系在线客服,或加微信好友窗体的Caption属性用来设置窗体的标题,在代码中可以用这个标题引用该窗体。( ) 对 错 【答案】:请联系在线客服,或加微信好友以下能判断是否到达文件尾的函数是( )。 A. BOF B. LOC C. LOF D. EOF【答案】:请联系在线客服,或加微信好友如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的( )属性。 A. Caption B. PasswordChar C. Text D. Char【答案】:请联系在线客服,或加微信好友添加一个命令按钮,并编写如下程序代码: Private Sub Command1_Click() x = "12.34": y = "56.78" z = x + y p = Val(z) Print p End Sub 程序运行后,单击命令按钮后的输出结果为( )。 A. 12.34 B. 56.78 C. 69.12 D. 12.3456【答案】:请联系在线客服,或加微信好友将通用对话框CommondDialog1的类型设置成“另存为”对话框,可调用该控件的( )方法。 A. ShowOpen B. ShowSave C. ShowColor D. ShowFont【答案】:请联系在线客服,或加微信好友当程序运行过程中,需要给用户一些提示信息或警告信息时,应使用( )。 A. 赋值语句 B. InputBox C. MsgBox D. print【答案】:请联系在线客服,或加微信好友下列关于SUB过程的叙述正确的是( )。 A. 一个SUB过程必须有一个Exit Sub语句 B. 一个SUB过程必须有一个End Sub语句 C. 在SUB过程中可以定义一个Function过程 D. 可以用GoTo语句强制退出SUB过程【答案】:请联系在线客服,或加微信好友在Visual Basic中,如果一个变量未作类型声明而直接使用,则该变量的数据类型是( )。 A. 字符串型 B. 数值型 C. 变体类型 D. 可以是任何类型【答案】:请联系在线客服,或加微信好友下面程序的循环次数是( )。For i = 10 To 40 Step 6 Print i Next i A. 4 B. 5 C. 6 D. 7【答案】:请联系在线客服,或加微信好友DOrs为Recordset对象,从“学生基本情况表”中获取所有记录的语句是(  )。 A. ADOrs.New "Select * From 学生基本情况表" B. ADOrs.Open "Select * From 学生基本情况表" C. ADOrs.Execute "Select * From 学生基本情况表" D. ADOrs.Select "Select * From 学生基本情况表"【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() n = Text1.Text 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 Text2.Text = x End Sub程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是( )。 A. 10 B. 20 C. 30 D. 40【答案】:请联系在线客服,或加微信好友执行Form1.Scale(10,-20)-(-30,20)语句后。Form1窗体坐标系x轴和y轴的正方向是( )。 A. 向左和向下 B. 向右和向上 C. 向左和向上 D. 向右和向下【答案】:请联系在线客服,或加微信好友多窗体程序是由多个窗体组成,在缺省情况下,VB在应用程序执行时,总是把( )指定为启动窗体。 A. 不包含任何控件的窗体 B. 设计时的第一个窗体 C. 包含控件最多的窗体 D. 命名为Frm1的窗体【答案】:请联系在线客服,或加微信好友下列叙述不正确的是( )。 A. 注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被解释和编译 B. 注释语句可以放在代码中的任何位置 C. 注释语句不能放在代码中的任何位置 D. 代码中加入注释语句的目的是提高程序的可读性【答案】:请联系在线客服,或加微信好友Private Sub Form_click() b = 1 Do While b < 40 b = b * (b + 1) Loop Print b End Sub程序运行后,单击窗体,在窗体上显示的值为( )。 A. 42 B. 39 C. 6 D. 1【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim s As Double Dim i As Integer s = 5 i = 1 Do While i < 6 i = i + 2 s = s + i Loop Text1.Text = s End Sub程序运行后,单击命令按钮,在文件框Text1中的输出结果是( )。 A. 13 B. 20 C. 11 D. 18【答案】:请联系在线客服,或加微信好友Dim y As Integer Private Sub form_click() Dim x As Integer x = 1 y = 2 Call AA(y + 1) z = BB(x) Print x, y, z End Sub Public Sub AA(ByVal z As Integer) y = z + x z = x + y End Sub Public Function BB(ByRef y As Integer) y = y + 1 BB = x + y End Function程序运行后,单击窗体,在窗体上显示的值是( )。 A. 2 2 2 B. 2 3 2 C. 3 2 3 D. 2 3 3【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 0 Do While x < 50 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) End Sub程序运行后,单击Command1按钮,在两个文本框中显示的值分别为( )。 A. 1 0 B. 2 72 C. 3 50 D. 4 168【答案】:请联系在线客服,或加微信好友Sub test(i As Integer) i = i + 4 End Sub Private Sub Form_Click() Dim x As Integer x = 5 Print "x="; x Call test(x) Print "x="; x End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. x= 5 x= 9 B. x= 9 x= 5 C. x= 5 x= 9 D. 9 5【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k = 1 c = 2 For j = 1 To 5 If j > 3 Then
c = c + 5
Exit For
Else
k = k + 1
End If
Next j
Print c, k
End Sub
程序运行后,单击窗体,在窗体上显示的c,k的值分别是( )。

A.

7 3

B.

7 4

C.

2 4

D.

7 5

【答案】:请联系在线客服,或加微信好友

Private Sub Form_Click()
Dim i As Integer, k As Integer
Static c As Integer
For i = 1 To 6
If i Mod 2 = 0 Then
k = k + 2
Else
c = c + 3
End If
Next i
Print k, c
End Sub
程序运行后,连续两次单击窗体,在窗体上显示的值是( )。

A.

6 12

B.

6 24

C.

6 9

D.

6 18

【答案】:请联系在线客服,或加微信好友

Private Sub Form_Click()
Dim i As Integer, k As Integer, c As Integer
For i = 1 To 5
If i Mod 2 = 0 Then
k = k + 2
Else
c = c + 3
End If
Next i
Print k, c
End Sub
程序运行后单击窗体,Form1上的输出结果是( )。

A.

2 12

B.

4 9

C.

4 6

D.

2 9

【答案】:请联系在线客服,或加微信好友

Private Sub Form_Click()
Dim I As Integer, j As Integer
Dim c As Integer
c = 0
For I = 1 To 3
For j = 1 To 2
c = c + 3
Next j
Next I
Print c
End Sub
程序运行后,单击窗体,在窗体上显示的结果是( )。

A.

18

B.

15

C.

12

D.

9

【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
P = 0
s = 0
Do
P = P + 2
s = s + P
Loop While P < 11 Print "S="; s End Sub程序运行后,单击命令按钮,在窗体上显示的值是( )。 A. S=42 B. S=30 C. S=46 D. S=20【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim i As Integer, k As Integer, c As Integer For i = 1 To 10 If i Mod 2 = 0 Then k = k + 3 Else c = c + 4 End If Next i Print k, c End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 10 20 B. 20 15 C. 15 20 D. 10 30【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Static x As Integer Static y As Integer Cls y = 1 y = y + 5 x = 5 + x Print x, y End Sub程序运行后,单击命令按钮Command1三次后,窗体上显示的结果为( )。 A. 15 16 B. 15 6 C. 15 15 D. 5 6【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 0 Do While x < 60 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) Text3.Text = Val(Text1.Text) + Val(Text2.Text) End Sub程序运行后,单击命令按钮在文件框Text3中显示的结果是( )。 A. 72 B. 74 C. 7 D. 16【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim A(1 To 3) As String Dim c As Integer Dim j As Integer A(1) = "3" A(2) = "6" A(3) = "9" c = 1 For j = 1 To 3 c = c + Val(A(j)) Next j Print c End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 10 B. 19 C. 16 D. 17【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim x, y As Integer x = 5: y = 10 nc x, y Print x, y End Sub Private Sub nc(ByVal a%, b%) a = a + b b = a a = a * b End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 5 15 B. 15 15 C. 225 15 D. 5 10【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 1: n = 0 Do While x < 100 x = x * 10 n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。 A. 10 0 B. 2 100 C. 3 50 D. 4 168【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() I = 0 For G = 10 To 19 Step 3 I = I + 1 Next G Print I End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 4 B. 5 C. 3 D. 6【答案】:请联系在线客服,或加微信好友Function F(a As Integer) Dim b As Integer Static c As Integer b = b + 2 c = c + 3 F = a + b + c End Function Private Sub Command1_Click() Dim a As Integer a = 4 For i = 1 To 3 Print F(a); Next i End Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 9 9 9 B. 9 12 15 C. 9 14 19 D. 9 11 13【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim M(5) For I = 1 To 5 M(I) = I * I Next I Print M(I - 1) End Sub程序运行后,单击命令按钮,在窗体上显示的值是( )。 A. 5 B. 25 C. 05 D. 16【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() n = 0 j = 1 Do Until n > 2
n = n + 1
j = j + n * (n + 1)
Loop
Print n; j
End Sub
程序运行后,单击命令按钮,在窗体上显示的值是( )。

A.

0 1

B.

3 7

C.

3 21

D.

3 13

【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
Dim A(1 To 5) As Integer
Dim x As Integer
For i = 1 To 5
A(i) = i
Next i
i = 1
Do While x < 6 A(i) = A(i) + x x = x + 2 i = i + 2 Loop Text1.Text = A(3) Text2.Text = A(5) End Sub程序运行后,单击命令按钮,在两个文本框中显示的值是( )。 A. 5 9 B. 5 4 C. 9 5 D. 4 5【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim i As Integer, n As Integer For i = 0 To 50 i = i + 3 n = n + 1 If i > 10 Then Exit For
Next i
Text1.Text = Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是( )。

A.

2

B.

3

C.

4

D.

5

【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
Dim x As Integer
Static s As Integer
x = Val(InputBox(“请输入一个正整数=”))
If x < 5 Then s = s * x Else s = s + x End If Text1.Text = "s=" & Str(s) End Sub程序运行后,连续3次单击Command按纽,且设输入的数据为5、4、3时,文本框Text1中显示的值为( )。 A. 12 B. 20 C. 60 D. s=60【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k = 1 c = 2 For j = 1 To 5 If j > 3 Then
c = c + 6
Exit For
Else
k = k + 3
End If
Next j
Print c, k
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。

A.

10 8

B.

8 10

C.

8 7

D.

8 4

【答案】:请联系在线客服,或加微信好友

Sub abcd(ByVal n As Integer)
n = n + 5
End Sub

Private Sub Form_click()
nx% = 3
Call abcd(nx%)
Print nx%
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。

A.

5

B.

3

C.

9

D.

10

【答案】:请联系在线客服,或加微信好友

Sub Change(x As Integer, y As Integer)
Dim t As Integer
t = x
x = y
y = t
Print x, y
End Sub
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 30: b = 40
Change a, b
Print a, b
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。

A.

30 40
30 40

B.

30 40

40 30

C.

40 30
40 30

D.

40 30
30 40

【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
Static x As Integer
Cls
For I = 1 To 2
y = y + x
x = x + 2
Next I
Print x, y
End Sub
程序运行后,连续三次单击Command1按钮后,窗体上显示的是( )。

A.

4 2

B.

12 18

C.

12 30

D.

4 6

【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
Static Sum As Integer
Dim I As Integer
I = 1
Do
Sum = Sum + I
I = I + 1
Loop While I <= 5 Text1.Text = Sum Text2.Text = I End Sub程序运行后,两次单击Command1按纽后,文本框Text1、Text2上的输出结果是( )。 A. 10 5 B. 15 6 C. 25 5 D. 30 6【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim x As Integer Static y As Integer x = x + 2 y = x + y Form1.Print "x="; x, "y="; y End Sub程序运行后三次单击窗体,Form1上的输出结果为( )。 A. x=2 y=2 B. x=2 y=4 C. x=2 y=6 D. x=6 y=6【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Static y As Integer Cls For i = 0 To 2 x = x + y y = y + 3 Next i Print x, y End Sub程序运行后,连续二次单击Command1按钮后,窗体上显示的值是( )。 A. 9 9 B. 30 12 C. 36 18 D. 63 27【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim x As Integer For i = 1 To 5 A(i) = i Next i i = 1 Do While x < 2 A(i) = A(i) * x x = x + 1 i = i + 1 Loop Text1.Text = A(1) Text2.Text = A(2) End Sub程序运行后,单击Command1后按钮,文件框Text1、Text2中的结果是( )。 A. 2 0 B. 0 2 C. 2 4 D. 2 5【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim i As Integer, k As Integer, c As Integer For i = 1 To 10 If i Mod 2 = 0 Then k = k + 3 Else c = c + 4 End If Next i Print k, cEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 10 20 B. 20 15 C. 15 20 D. 10 30【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Static x As Integer Static y As Integer Cls y = 1 y = y + 5 x = 5 + x Print x, yEnd Sub程序运行后,单击命令按钮Command1三次后,窗体上显示的结果为( )。 A. 15 16 B. 15 6 C. 15 15 D. 5 6【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim x As Integer For i = 1 To 5 A(i) = i Next i i = 1 Do While x < 6 A(i) = A(i) + x x = x + 2 i = i + 2 Loop Text1.Text = A(3) Text2.Text = A(5)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值是( )。 A. 5 9 B. 5 4 C. 9 5 D. 4 5【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim x As Integer Static s As Integer x = Val(InputBox("请输入一个正整数=")) If x < 5 Then s = s * x Else s = s + x End If Text1.Text = "s=" & Str(s)End Sub程序运行后,连续3次单击Command按纽,且设输入的数据为5、4、3时,文本框Text1中显示的值为( )。 A. 12 B. 20 C. 60 D. s=60【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Static x As Integer Cls For I = 1 To 2 y = y + x x = x + 2 Next I Print x, yEnd Sub程序运行后,连续三次单击Command1按钮后,窗体上显示的是( )。 A. 4 2 B. 12 18 C. 12 30 D. 4 6【答案】:请联系在线客服,或加微信好友 Private Sub Form_Click() Dim i As Integer, k As Integer Static c As Integer For i = 1 To 6 If i Mod 2 = 0 Then k = k + 2 Else c = c + 3 End If Next i Print k, cEnd Sub程序运行后,连续两次单击窗体,在窗体上显示的值是( )。 A. 6 12 B. 6 24 C. 6 9 D. 6 18【答案】:请联系在线客服,或加微信好友Sub Change(x As Integer, y As Integer) Dim t As Integer t = x x = y y = t Print x, yEnd SubPrivate Sub Form_Click() Dim a As Integer, b As Integer a = 30: b = 40 Change a, b Print a, bEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 30 40 30 40 B. 30 40 40 30 C. 40 3040 30 D. 40 30 30 40【答案】:请联系在线客服,或加微信好友 Private Sub Command1_Click() Static Sum As Integer Dim I As Integer I = 1 Do Sum = Sum + I I = I + 1 Loop While I <= 5 Text1.Text = Sum Text2.Text = IEnd Sub程序运行后,两次单击Command1按纽后,文本框Text1、Text2上的输出结果是( )。 A. 10 5 B. 15 6 C. 25 5 D. 30 6【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim I As Integer, j As Integer Dim c As Integer c = 0 For I = 1 To 3 For j = 1 To 2 c = c + 3 Next j Next I Print cEnd Sub程序运行后,单击窗体,在窗体上显示的结果是( )。 A. 18 B. 15 C. 12 D. 9【答案】:请联系在线客服,或加微信好友Sub test(i As Integer) i = i + 4End SubPrivate Sub Form_Click() Dim x As Integer x = 5 Print "x="; x Call test(x) Print "x="; xEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. x= 5 x= 9 B. x= 9 x= 5 C. x= 5 x= 9 D. 9 5【答案】:请联系在线客服,或加微信好友Dim y As IntegerPrivate Sub form_click() Dim x As Integer x = 1 y = 2 Call AA(y + 1) z = BB(x) Print x, y, zEnd SubPublic Sub AA(ByVal z As Integer) y = z + x z = x + yEnd SubPublic Function BB(ByRef y As Integer) y = y + 1 BB = x + yEnd Function程序运行后,单击窗体,在窗体上显示的值是( )。 A. 2 2 2 B. 2 3 2 C. 3 2 3 D. 2 3 3【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() I = 0 For G = 10 To 19 Step 3 I = I + 1 Next G Print IEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 4 B. 5 C. 3 D. 6【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k = 1 c = 2 For j = 1 To 5 If j > 3 Then
c = c + 5
Exit For
Else
k = k + 1
End If
Next j
Print c, k
End Sub
程序运行后,单击窗体,在窗体上显示的c,k的值分别是( )。
A. 7 3 B. 7 4 C. 2 4 D. 7 5
【答案】:请联系在线客服,或加微信好友

Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = “3”
A(2) = “6”
A(3) = “9”
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
A. 10 B. 19 C. 16 D. 17
【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
Dim M(5)
For I = 1 To 5
M(I) = I * I
Next I
Print M(I – 1)
End Sub
程序运行后,单击命令按钮,在窗体上显示的值是( )。
A. 5 B. 25 C. 05 D. 16
【答案】:请联系在线客服,或加微信好友

Sub abcd(ByVal n As Integer)
n = n + 5
End Sub

Private Sub Form_click()
nx% = 3
Call abcd(nx%)
Print nx%
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
A. 5 B. 3 C. 9 D. 10
【答案】:请联系在线客服,或加微信好友

Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 2
y = x + y
Form1.Print “x=”; x, “y=”; y
End Sub
程序运行后三次单击窗体,Form1上的输出结果为( )。
A. x=2 y=2 B. x=2 y=4 C. x=2 y=6 D. x=6 y=6
【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
n = 0
j = 1
Do Until n > 2
n = n + 1
j = j + n * (n + 1)
Loop
Print n; j
End Sub
程序运行后,单击命令按钮,在窗体上显示的值是( )。
A. 0 1 B. 3 7 C. 3 21 D. 3 13
【答案】:请联系在线客服,或加微信好友

Function F(a As Integer)
Dim b As Integer
Static c As Integer
b = b + 2
c = c + 3
F = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 4
For i = 1 To 3
Print F(a);
Next i
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
A. 9 9 9 B. 9 12 15 C. 9 14 19 D. 9 11 13
【答案】:请联系在线客服,或加微信好友

Private Sub Form_click()
b = 1
Do While b < 40 b = b * (b + 1) Loop Print bEnd Sub程序运行后,单击窗体,在窗体上显示的值为( )。 A. 42 B. 39 C. 6 D. 1【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim s As Double Dim i As Integer s = 5 i = 1 Do While i < 6 i = i + 2 s = s + i Loop Text1.Text = sEnd Sub程序运行后,单击命令按钮,在文件框Text1中的输出结果是( )。 A. 13 B. 20 C. 11 D. 18【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim x As Integer For i = 1 To 5 A(i) = i Next i i = 1 Do While x < 2 A(i) = A(i) * x x = x + 1 i = i + 1 Loop Text1.Text = A(1) Text2.Text = A(2)End Sub程序运行后,单击Command1后按钮,文件框Text1、Text2中的结果是( )。 A. 2 0 B. 0 2 C. 2 4 D. 2 5【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 0 Do While x < 60 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) Text3.Text = Val(Text1.Text) + Val(Text2.Text)End Sub程序运行后,单击命令按钮在文件框Text3中显示的结果是( )。 A. 72 B. 74 C. 7 D. 16【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() Static y As Integer Cls For i = 0 To 2 x = x + y y = y + 3 Next i Print x, yEnd Sub程序运行后,连续二次单击Command1按钮后,窗体上显示的值是()。 A. 9 9 B. 30 12 C. 36 18 D. 63 27【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k = 1 c = 2 For j = 1 To 5 If j > 3 Then
c = c + 6
Exit For
Else
k = k + 3
End If
Next j
Print c, k
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
A. 10 8 B. 8 10 C. 8 7 D. 8 4
【答案】:请联系在线客服,或加微信好友

Private Sub Command1_Click()
P = 0
s = 0
Do
P = P + 2
s = s + P
Loop While P < 11 Print "S="; sEnd Sub程序运行后,单击命令按钮,在窗体上显示的值是( )。 A. S=42 B. S=30 C. S=46 D. S=20【答案】:请联系在线客服,或加微信好友Private Sub Form_Click() Dim x, y As Integer x = 5: y = 10 nc x, y Print x, yEnd SubPrivate Sub nc(ByVal a%, b%) a = a + b b = a a = a * bEnd Sub程序运行后,单击窗体,在窗体上显示的值是( )。 A. 5 15 B. 15 15 C. 225 15 D. 5 10【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 0 Do While x < 50 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x)End Sub程序运行后,单击Command1按钮,在两个文本框中显示的值分别为( )。 A. 1 0 B. 2 72 C. 3 50 D. 4 168【答案】:请联系在线客服,或加微信好友Private Sub Command1_Click() x = 1: n = 0 Do While x < 100 x = x * 10 n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。 A. 10 0 B. 2 100 C. 3 50 D. 4 168【答案】:请联系在线客服,或加微信好友VB应用程序开发的一般步骤?【答案】:请联系在线客服,或加微信好友

上一篇:

下一篇:

相关新闻

联系微信
联系微信
联系QQ
返回顶部