单选题设A、B、C是三角形的3条边,则以下表示“任意两边之和大于第三边”的布尔表达式是( )。
单选题有如下程序:Private Sub Command1_Click() Dim i As Integer, j As
Integer Dim sum As
Integer n=1 Do j=1 Do sum=sum+j j=j+1 Print
j; Loop Until j>3 n=n+2 Loop Until n>10 Print sumEnd
Sub运行上述程序,外层Do循环执行的次数为______。
A.4
B.5
C.7
D.10
单选题关于KeyPress事件,以下叙述中正确的是
单选题数据表文件工资.DBF共有10条记录,当前记录号为5。用SUM命令计算工资总和,如果不给出范围短句,那么命令( )
单选题为了建立随机文件,要求文件的每条记录应包含多个不同数据类型的数据项,则记录应使用的数据类型是
单选题要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角的标签(名称为Labell)中,如下图所示,放开鼠标左键后,停止同步显示。下面可以实现此功能的程序是()。
单选题某二叉树前序遍历结点的访问顺序是abdgcefh,中序遍历结点的访问顺序是dgbaechf,则后序遍历结点的访问顺序是
单选题如果把命令按钮的Cancel属性设置为True,则程序运行后
单选题执行下列程序后,在文本框中输入字符“d”,输出结果为______。 Private Sub Form_Load() Text1="" End Sub Private Sub Text1_Change() Print Text1.Text End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub
单选题设a=2,b=3,c=4,d=5,下列表达式的值是______。 Not a<=c Or 4*c=b^2 And b<>a+c
单选题以下数组定义语句中,错误的是( )。
单选题关系数据库管理系统能实现的专门关系运算包括( )。
单选题在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Private Sub Command1_Click()
Dim n()As Integer
Dim a,b As Integer
a=InputBox("Enter the first number")
b=InputBox("Enter the seeond number")
ReDim n(a To b)
For k=LBound(n)To UBound(n)
n(k)=k
Print n(k);
Next k
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为______。
单选题在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程: Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入78和87,然后单击命令按钮,则输出结果为( )。
单选题有如下事件过程:
Private Sub Command1_Click()
b=10
Do Until b=-1
a=InputBox("请输入a的值")
a=Val(a)
b=InputBox("请输入b的值")
b=Val(b)
a=a * b
Loop
Print a
End Sub
程序运行后,依次输入数值30,20,10,-1,输出结果为( )。
单选题下列______是日期型数据。
单选题已知有一名为Form1的窗体,现在要把它装入内存但不显示出来,应使用( )。
单选题在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:
Private Sub Command1_Click() a=Text1. Text+Text2.
Text Print a End Sub Private
Sub Form_Load() Text1. Text="" Text2.
Text="" End sub
程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321然后单击命令按钮,则输出结果为{{U}}
{{/U}}。
A.444
B.321123
C.123321
D.132231
单选题fileFiles.Pattem="*.dat"程序代码执行后,会显示
____
。
单选题有如下程序:
Private Sub Commandl_Click( )
a$="A WORKER IS HERE"
x=Len(a$)
For i=1,To x-1
b$=Mid$(a$,i,3)
If b$="WOR" Then S=S+1
Next
Print S
End Sub
单击命令按钮,程序运行结果为( )。
