单选题下列有关Visual Basic特点的描述有误的是______。
A.Visual Basic是一种可视化、面向对象的程序设计语言
B.Visual Basic采用事件驱动编程机制
C.Visual Basic可用于开发Windows环境下的各类应用程序
D.Visual Basic是非面向对象的程序设计语言
单选题一个教师讲授多门课程,一门课程由多个教师讲授。则实体教师和课程间的联系是
单选题下列程序的执行结果为______。A.150B.200C.50D.5
单选题Sub过程与Function过程最根本的区别是{{U}} {{/U}}。
A. Sub过程可以用Call语句直接使用过程名调用,而Function过程不可以
B. Function过程可以有形参,Sub过程不可以
C. Sub过程不能返回值,而Function过程能返回值
D. 两种过程参数的传递方式不同
单选题在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和 Commandl,然后编写如下两个事件过程:
Prirate SUb Command1 Click()
strText = InputBox(“请输入”)
Textl.Text = strText
End Sub
Private Sub Text1 Change()
Labell.Caption = Right(Trim(Text1.Text), 3)
End Sub
程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是
单选题以下关于VB文件的叙述中,正确的是( )。
单选题窗体上有一个名称为Option1的单选按钮数组,程序运行时,当单击某个单选按钮时会调用下面的事件过程下列关于此过程的参数Index的叙述中正确的是
单选题窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:Private Sub Command1_Click() Dim m As String m=InputBox("请输入字符串") Print pick_str(m)End SubPrivate Function pick_str(s As String)As String temp="" i=1 sLen=Len(s) Do While i<=sLen / 2 temp=temp+Mid(s, i, 1)+Mid(s, sLen-i+1, 1) i=i+1 Loop pick_str=tempEnd Function运行程序,单击命令按钮,并在输入对话框中输入"basic",则在窗体上显示的内容为( )。
单选题程序运行时,当用鼠标点击滚动条两端的箭头按钮时,不会产生的结果是______。
单选题唯一能区别一个控件的属性是 ______。
单选题设有语句
X=InputBox("输入数值","示例",0)
程序运行后,如果从键盘上输入10并按回车键,则以下叙述中错误的是
单选题用什么语句可以选择指定的表项或取消已选择的表项?
单选题表达式Int(Rnd(0)*50)所产生的随机数范围是( )。
单选题假定x的值为5,则在执行以下语句时,其输出结果为“Result”的Select Case语句是
单选题在窗体上画一个文本框,名称为Text1,然后编写如下程序:Private Sub
Form_Load() Show Text1.Text="" Text1.SetFocusEnd
SubPrivate Sub Form_Click() Dim a As String,s As
String a=Text1.Text s="" For k=1 To
Len(a) s=UCase(Mid(a,k,1))+s Next k Text1.Text=sEnd
Sub程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容______。
A.与原字符串相同
B.与原字符串中字符顺序相同,但所有字母均转换为大写
C.为原字符串的逆序字符串,且所有字母转换为大写
D.为原字符串的逆序字符串
单选题下面有关标准模块的叙述中,错误的是______。
单选题有如下函数:
Private Function fun(x As Integer, y As Integer) As Integer
Dim k%, n%
n=IIf(y<0,-y,y)
For k=1 To n
x=x-Sgn(y)
Next k
fun=x
End Function
此函数的功能是______。
单选题为了取消窗体的最小化功能,需要把它的一个属性设置为False,这个属性是______。 A) ControlBox B) MinButton C) Enabled D) MaxButton
单选题如果设置了通用对话框的以下属性:DefaultExt="doc" FileName="c:\file1.txt",Filter= "应用程序|*.exe”,则显示“打开”对话框式,在“文件类型”下拉列表中的默认文件类型是 ______ 。
单选题设有以下函数过程: Function fun(a As Integer,b As Integer) Dim c As Integer If a<b Then c=a:a=b:b=c End If c=0 Do c=c+a Loop Until c Mod b=0 fun=c End Function 若调用函数fun时的实际参数都是自然数,则函数返回的是______。 A) a、b的最大公约数 B) a、b的最小公倍数 C) a除以b的余数 D) a除以b的商的整数部分
