单选题以下叙述中错误的是 A.如果过程被定义为Static类型,则该过程中的局部变量都是Static类型 B.Sub过程中不能嵌套定义Sub过程 C.Sub过程中可以嵌套调用Sub过程 D.事件过程可以像通用过程一样由用户定义过程名
单选题为了保存数据,需打开顺序文件”E:\UserData.txt”,以下正确的命令是( )。
单选题VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是______。
A..vbp
B..bas
C..vbw
D..frm
单选题要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是( )。
单选题在理想情况下,每一个菜单都应有唯一的访问键(菜单名后括号中的英文字母)来方便使用键盘选择命令的用户。用户可以在键盘上同时按下 ______ 和访问键,以选中菜单或菜单项。
单选题在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是( )。
单选题为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效,必须把它的Style属性设置为
单选题下列说法正确的是
A. 在Visual Basic中的对话框分为两种类型:预定义对话框和自定义对话框
B. 自定义对话框由用户根据自己需要定义的
C. 预定义对话框是用户在设置程序代码后定义的
D. MsgBox函数是用户的自定义对话框的函数
单选题设在工程文件中有一个标准模块,其中定义了如下记录类型:Type Books Name As String *
10 TelNum As String * 20End
Type在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
A.Private Sub Command1_Click() Dim B As Books Open "c:/Person.txt" For
Output As #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write
#1,B.Name, B.TelNum Close #1 End Sub B.Private Sub Command1_Click() Dim B As
Books Open "c:/Person.txt" For Input As #1 B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码") Print #1, B.Name, B.TelNum Close #1 End Sub
C.Private Sub Command1_Click() Dim B As Books Open "c:/Person.txt" For Output As
#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码") Write #1, B Close #1 End Sub
D.Private Sub Command1_Click() Open "c:/Person.txt" For Input As #1
Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print #1, Name, TelNum
Close #1 End Sub
单选题某二叉树中有n个度为2的节点,则该二叉树中的叶子节点数为
单选题在数据库设计中,将E-R图转换成关系数据模型的过程属于( )。
单选题下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是( )。
单选题执行以下程序段后,变量c$的值为______ 。 a$=“Visual Basic Programing” b$=“Quick” c$= b$ & UCase (Mid$(a$,7,6))&Right $,(a $,11)
单选题希尔排序法属于哪一种类型的排序法______。 A) 交换类捧序法 B) 插入类排序法 C) 选择类排序法 D) 建堆排序法
单选题阅读程序: Function Fun(a As Integer) Static C b=0:b=b+2:c=c+2 Fun=a*b*c End Function Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 2 Print Fun(A): Next End Sub 运行上面的程序,单击命令按钮,输出结果为( )。 A) 8 16 B) 9 18 C) 10 20 D) 7 14
单选题对于存在多个条件复杂组合的判断问题,其加工逻辑使用______ 描述较好。
单选题End语句在不同的环境下其用途是不同的。下列两条语句:End Sub和End Select所对应的用途是______。
单选题在窗体上画1个文本框,名称为Text1,然后编写如下程序:
Private Sub Form_Load()
Open"C:/dat.txt"For Output As #1
Text1.Text=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If______=13 Then
If UCase(Text1.Text=______)Then
Close 1
End
Else
Write #1, Text1.Text
Text1.Text=""
End If
End If
End Sub
程序的功能是,在C盘根目录下建立1个名为dat.txt的文件,在文本框中输入字符,每次按回车键(回车符的ASCII码是13)都把当前文本框中的内容写入文件dat.txt中,并清空文本框中的内容;如果输入“END”,则结束程序,请选择适合空白处的语句______。
单选题在窗体上画1个文本框,其名称为Text1,然后编写如下过程: Pfivme Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为______。
单选题窗体上有名称为Text1、Text2的两个文本框,和一个由3个单选按钮构成的控件数组Option1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图2所示。为了实现上述功能,在程序中的横线处应填入的内容是()。PrivateSubOption1_Click(IndexAsInteger)IfText1.Text<>""ThenSelectCase______Case0Text2.Text=Text1.TextCase1Text2.Text=Text1.Text*10Case2Text2.Text=Text1.Text*100EndSetectEndIfEndSub