下列各种形式的循环中，输出"*"的个数最少的循环是

在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timer1_ ________TxtTime.text=Time End Sub 在下划线上应填入的内容是

A．Enabled
B．Visible
C．Interval
D．Time

单项选择题

如果A为整数且｜A｜＞=10，则打印“OK”，否则打印“Error”，表示这个条件的单行格式If语句是( )。

A．If Int(A)=A And Sqr(A)＞=10 Then Print "OK" Else Print "Error"
B．If Fix(A)= A And Abs(A)＞=10 Then Print "OK" Else Print "Error"
C．If Int(A)=A And(A＞=10,A＜=-10)Then Print "OK" Else Print "Error"
D．If Fix(A)=A And A＞=10,And A＜=10 Then Print "OK" Else Print "Error"

单项选择题

在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5,5)As Integer Dim i As Integer,j As Integer For i=1 To 3 For i=1 To 3 a(i,j)=(i-1)*3+j Print a(i,j) Next j Print Next i End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是______。

A．1 4 7 2 5 8 3 6 9
B．1 2 3 4 5 6 7 8 9
C．1 2 3 4 5 6 7 8 9
D．没有输出

单项选择题

系统符号常量的定义可以通过______获得。

A．对象浏览器
B．代码窗口
C．属性窗口
D．工具箱

单项选择题

下列程序段的执行结果为( )。 Dim A(3，3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M, N)=1 Else A(M，N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M，N) Next N Print Next M

A．1 0 0 0 1 0 0 0 1
B．1 1 1 1 1 1 1 1 1
C．0 0 0 0 0 0 0 0 0
D．1 0 1 0 1 0 1 0 1

单项选择题

下列程序的执行结果是( )。 Function P(N As Integer) For i=1 To N Sum=Sum+i Next i P=Sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S; End Sub

A．15
B．16
C．2O
D．25

单项选择题

为了使用窗体输出，使Print方法在Form_Load事件中起作用，必须设置窗体的( )属性。

A．AutoReDraw
B．BackColor
C．Moveable
D．Caption

单项选择题

以下叙述中错误的是

A．在KeyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母(即具有相同的KeyCode)
B．在KeyUp和KeyDown事件过程中，将键盘上的“1”和右侧小键盘上的“1”视作不同的数字(具有不同的KeyCode)
C．KeyPress事件中不能识别键盘上某个键的按下与释放
D．KeyPress事件中可以识别键盘上某个键的按下与释放

单项选择题

下面叙述中正确的是______。

A．随机文件中记录的长度不是固定不变的
B．随机文件由若干条记录组成，并可以按记录号访问各个记录
C．不能按任意顺序访问随机文件中的数据
D．可以同时对打开的随机文件进行读写操作

单项选择题

下列程序段的结果为______。A="ABBACDDCBA"For I=6 To 2 Step-2 X=Mid(A，I，I) Y=Left(A，I) Z=Right(A，I) Z=X & Y & ZNext IPrint Z

A．ABA
B．AABAAB
C．BBABBA
D．ABBABA

单项选择题

只能用来显示字符信息的控件是______ 。

A．文本框
B．标签框
C．图片框
D．图像框

单项选择题

单击命令按钮时，下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m＝m\10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub

A．12 24
B．2 24
C．2 3
D．12 2

单项选择题

符号%是声明 ______ 类型变量的类型定义符。

A．Integer
B．Variant
C．Single
D．String

单项选择题

设有变量声明Dim TestDate As Date，为变量TestDate正确赋值的表达方式是 ______。

A．TestDate=#1/1/2002#
B．TestDate＝#”1/1/2002"#
C．TestDate＝date("1/1/2002")
D．TestDate＝Format("m/d/yy"，"1/1/2002")

单项选择题

下面的4个数组中，语句语法正确的是 ______ 。

A．Dim a[10]
B．Def fn(10)
C．Dim a(10)
D．Dimension a(10)

单项选择题

滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是 ______。

A．Max
B．Value
C．LargeChange
D．SmallChange

单项选择题

下列程序是将两个文本框(text1和text2)的内容进行组合，组合后的结果在图片框(Pic1)显示出来。 Private Sub Command1_Click() Dim sl As String，s2 As String S1=Text1.Text S2=TextText For i=Len(s1)To 1 Step-1 s3=s3+Mid(s1，i，1)+Mid(s2，i，1) Next i Pic1.Print s3 End Sub 程序运行后，在Text1文本框中输入“ABCDE”，在Text2文本框中输入“12345”，单击命令按钮，则在Pic1图片框中显示的内容是

A．E5D4C3B2A1
B．ABCDE12345
C．12345ABCDE
D．A1B2C3D4E5

单项选择题

以下关于保存工程的说法正确的是

A．保存工程时只保存窗体文件即可
B．保存工程时只保存工程文件即可
C．先保存窗体文件，再保存工程文件
D．先保存工程文件，再保存窗体文件

单项选择题

下列程序段的执行结果为_______。 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y；Y-X

A．-3 3
B．5 -8
C．3 -3
D．25 -25

单项选择题

下列不能打开属性窗口的操作是 ______。

A．执行“视图”菜单中的“属性窗口”命令
B．按F4键
C．按Ctrl+T
D．单击工具栏上的“属性窗口”按钮

单项选择题

通过设置何属性可以改变所画图形的形状

A．Shape
B．Index
C．Enabled
D．Height

单项选择题

下列各种形式的循环中，输出"*"的个数最少的循环是

A．a=5：b=8 Do Print"*" a=a+l Loop While a＜b
B．a=5：b=8 Do Print"*" a=a+l Loop Until a＜b
C．a=5：b=8 Do Until a-b Print"*" b=b+1 Loop
D．a=5：b=8 Do Until a＞b Print"*"a=a+1 Loop

单项选择题

设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮，并有以下事件过程： Private Sub Commandl一Click() x!==Val(Textl．Text) Select Case x Casc Is<-10，Is>=20 Print“输入错误” Case Is<0 Print 20 x Case ls<10 Print 20 Case Is=20 Print x+10 End Select End Sub 程序运行时，如果存文本框中输入一5，则单击命令按钮后的输出结果是

A．5
B．20
C．25
D．输入错误

下列各种形式的循环中，输出"*"的个数最少的循环是

你可能感兴趣的试题

下列数组声明正确的是( )。

下列叙述中正确的是______。

栈和队列的共同点是______。

设R和S为二个关系，______中的符号分别代表选择、投影、笛卡儿积的关系代数运算。

列表框的______属性代表着列表框中项目的数目。

假设线性表的长度为n，则在最坏情况下，冒泡排序需要的比较次数为

用黑盒技术测试用例的方法之一为

设有下列二叉树：对此二叉树后序遍历的结果是

串的长度是

滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是______。

下列程序段的执行结果为______。 K=0 For I=1 To 3 A=I^I^K Print A; Next I

在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timer1_ ________TxtTime.text=Time End Sub 在下划线上应填入的内容是

如果A为整数且｜A｜＞=10，则打印“OK”，否则打印“Error”，表示这个条件的单行格式If语句是( )。

系统符号常量的定义可以通过______获得。

下列程序段的执行结果为( )。 Dim A(3，3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M, N)=1 Else A(M，N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M，N) Next N Print Next M

下列程序的执行结果是( )。 Function P(N As Integer) For i=1 To N Sum=Sum+i Next i P=Sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S; End Sub

为了使用窗体输出，使Print方法在Form_Load事件中起作用，必须设置窗体的( )属性。

以下叙述中错误的是

下面叙述中正确的是______。

下列程序段的结果为______。A="ABBACDDCBA"For I=6 To 2 Step-2 X=Mid(A，I，I) Y=Left(A，I) Z=Right(A，I) Z=X & Y & ZNext IPrint Z

只能用来显示字符信息的控件是______ 。

单击命令按钮时，下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m＝m\10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub

符号%是声明 ______ 类型变量的类型定义符。

设有变量声明Dim TestDate As Date，为变量TestDate正确赋值的表达方式是 ______。

下面的4个数组中，语句语法正确的是 ______ 。

滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是 ______。

以下关于保存工程的说法正确的是

下列程序段的执行结果为_______。 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y；Y-X

下列不能打开属性窗口的操作是 ______。

通过设置何属性可以改变所画图形的形状

下列各种形式的循环中，输出"*"的个数最少的循环是

设有下列二叉树：
对此二叉树后序遍历的结果是