单选题任何控件都具有( )属性。
单选题下列符号常量的声明中不合法的是( )。
单选题在利用菜单编辑器设计菜单时,为了把组合键“Alt+x”设置为“退出(x)”菜单项的访问键,可以将该菜单项的标题设置为( )。
单选题以下叙述不正确的是______。 A) 在Sub过程中可以调用Function过程 B) 在用Call调用Sub过程时必须把参数放在括号里 C) 在Sub过程中可以嵌套定义Function D) 用Static声明的过程中的局部变量都是Static类型
单选题实体联系模型中,实体与实体之间的联系不可以是
单选题在对象方法中,一个对象请求另一个对象为其服务的方式是通过发送( )来实现的。
单选题在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a$,b$,c$,k% a="ABCD" b="123456" c=" " k=1 Do White k<=Len(a)Or k<=Len(b) If k<=Len(a) Then c=c&Mid(a,k,1) End If If k<=Len(b) Then c=c&Mid(a,k,1) End If k=k+1 Loop Print c End Sub 运行程序,单击命令按钮,输出结果是( ) A.123456ABCD B.ABCD123456 C.D6C584A321 D.A182C3D456
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为( )。
单选题执行语句Print Sgn(一2^3)+Abs(Int(一12.2)Mod 100\Sqr(100))的输出结果为( )。
单选题设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:
Function fun(a As Integer,b As Integer)
While a>b
a=a-b
Wend
fun=a
End Function
在调试时发现函数是错误的。为使函数能产生正确的返回值,应做的修改是
A) 把a=a-b改为a=b-a B) 把a=a-b改为a=a/b
C) 把While a>b改为While a<b D) 把While a>b改为While a>=b
单选题如图20-6所示的6个单选框中,你可以选{{U}}{{/U}}个。A.1B.2C.3D.6
单选题顺序执行下面两条命令:
N=123456.789
@ 10,6 SAY N PICTURE ″$ $ 999,999.9″
屏幕显示的结果是( )
单选题执行下列程序后,鼠标单击窗体,输出结果为( )。 Private Sub Form_Click() Print "Click"; End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single,Y As Single) Print "Down" End Sub Private Sub Form_MouseUp(Button As Integer, Shift_ As Integer,X As Single,Y As Single) Print "Up" End Sub A) DownUpClick B) ClickDownUp C) DownClickUp D) UpDownClick
单选题下列表达式中不能判断x的是否为偶数的是
单选题在窗体上面一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub
TxtA_KeyPress(KeyAscii as Integer) … End
Sub 若焦点位于文本框中,则能够触发KeyPress事件的操作是______。
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
单选题已知两个窗体Form1、Form2,下列事件过程中,______ 可以实现单击窗体Form1的命令按钮时,显示窗体Form2,而窗体Form1消失。
单选题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() MsgBox Str(123+321) End Sub 程序运行后,单击命令按钮,则在信息框中显示的提示信息为
单选题在以下事件中,Private表示 Private Sub sub1(x As Integer,y As Integer) ... End Sub
单选题在窗体上画一个文本框,然后编写如下事件过程: Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1.Text=Sting(6,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为______。
单选题在窗体上画一个命令按钮Command1,然后编写如下代码: Privae Sub Command1_Click() Dim Arr1(10) As Integer,Arr2(10) As Integer n=3 For i=1 To 5 Arr1(i)=i Art2(n)=2*n+i Next i Print Arr2(n);Arr1(n) End Sub 运行程序后,单击命令按钮,输出结果是( )。
