单选题使用FileListBox,如果只显示系统文件,需要设置的属性为____。
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:
Microsoft Visual Basic Programming
然后编写如下事件过程:
Private Sub Command1_Click()
Open "d:/temp/outftxt" For Output As #1
For i=1 To Len(Text1.Text)
c=Mid(Text1.Text,i,1)
If c>="A" And c<="Z" Then
Print #1, LCase(c)
End If
Next i
Close
End Sub
程序运行后,单击命令按钮,文件outf.txt中的内容是______。
单选题窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正整数") ReDim a(m) End Sub Private Sub Command2_Click() m=InputBox("请输入一个正整数") ReDim a(m) End Sub 运行程序时,单击Command1后输入整数8,再单击Command2后输入整数4,则数组a中元素的个数是______。 A) 4 B) 5 C) 8 D) 9
单选题编写如下程序:Private Sub Commandl_Click() Dim a(3,3)As Integer,S As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next i Next i S=0 For i=1 To 3 s=s+a(i,4-i) Next i Print s End Sub程序运行后,单击命令按钮Commandl,输出结果为
单选题已知x=10,表达式“x>10 And x<=100 Or 10 Mod 2=0"的值为( )。
单选题窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:Private Type x a As Integer b As IntegerEnd TypePrivate Sub Command1_Click() Dim y As x y.a=InputBox("") If y.a/2=y.a / 2 Then y.b=y.a * y.a Else y.b=Fix(y.a / 2) End If Text1.Text=y.bEnd Sub 对以上程序,下列叙述中错误的是( )。
单选题在窗体上画一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是( )。
单选题以下变量名中合法的是( )。 A) x-2 B) 12abc C) sum_total D) print
单选题下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FirSt="abcdef" Print Pat(FirStr) End Sub Private Function Pat(xStr As String) As String Dim tempStr As String,strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i<=Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop Pat=tempStr End Function
单选题SCAN...ENDSCAN结构的语句的控制循环,是通过( )
单选题假定有以下程序段
For i=1 To 3
For i=5 To 1 Step-1
Print i*j
Next j
Next i
则语句Printi*j的执行次数是
单选题为了从当前文件夹中读入文件File1.txt,某人编写了下面的程序:
Private Sub Command1_Click()
Open"File1.txt" For Output As # 20
Do While Not EOF(20)
Line Input #20,chPrint ch
Loop
Close #20
End Sub
程序调试时,发现有错误,下面的修改方案中正确的是______。
单选题下面描述中错误的是( )。 A) 系统总体结构图支持软件系统的详细设计 B) 软件设计是将软件需求转换为软件表示的过程 C) 数据结构与数据库设计是软件设计的任务之一 D) PAD图是软件详细设计的表示工具
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程: Private Sub Commandl_Click() Counter=0 Fori=1T04 Forj=6 To 1 Step-2 Counter=Counter+1 Nextj Nexti Labell.Caption=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是( )。
单选题在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是( )。 A) O(n) B) O(n2) C) O(log2n) D) O(nlog2n)
单选题确定一个窗体或控件的大小的属性是______。
A. Width或Height
B. Width和Height
C. Top或Left
D. Top和Left
单选题函数过程n的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。以下能正确实现上述功能的代码的是______。
单选题设有如下事件过程:Private Sub Command1_Click() Dim
a a=Array(12,3,8,5,10,3,5,9,2,4) For k=1 To 9 Print fun(a(k-1),
a(k)); " "; Next kEnd SubPrivate Function fun(x,y)As
Integer Do While x>=y x=x-y Loop fun=xEnd
Function程序运行时的输出结果是______。
A.4 0 1 0 3 0 0 4 0
B.0 3 3 5 1 3 5 1 2
C.9 -5 3 -5 7 -2 -4 7-2
D.9 3 3 5 7 3 5 7
2
单选题执行语句s=Len(Mid("study hard",1,5))后,s的值是
单选题简单的交换排序方法是
____
。