单选题软件测试的过程是______。 Ⅰ.集成测试 Ⅱ.验收测试
Ⅲ.系统测试 Ⅳ.单元测试
A. Ⅰ、Ⅱ、Ⅲ、Ⅳ
B. Ⅳ、Ⅲ、Ⅱ、Ⅰ
C. Ⅳ、Ⅰ、Ⅱ、Ⅲ
D. Ⅱ、Ⅰ、Ⅳ、Ⅲ
单选题窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:Private Sub Commandl_Click() Open"c:\f1.txt"For Input As#1:Open"c:\f2,txt"For Output As #2 Do While Not EOF(1) Line Input#1,str1:Print#2 str1 Loop Close End Sub以下关于上述程序的叙述中,错误的是
单选题把数学表达式表示为正确的VB表达式应该是______。
单选题设有以下函数过程:
Function fun(a As Integer,b As Integer)
Dim c As Integer
If a<b Then
c=a:a=b:b=c
End If
c=0
Do
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数,则函数返回的是
A) a、b的最大公约数 B) a、b的最小公倍数
C) a除以b的余数 D) a除以b的商的整数部分
单选题下面程序运行后,单击命令按钮,输出的结果是 Private Sub Command1_Click( ) Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i = 1 To 4 a(i) =i Next For i = 2 To 6 b(i) =i Next str 1 = YAG (a) str 2 = YAG (b) Print "str1 ="; str1; "str2 ="; str2 End Sub Function YAG(a()As Integer) Dim t#,i% t=1 For i=LBound(a)TO UBound(a) t=t * a(i) Next YAG=t End Function
单选题执行以下程序段 Dim x As Integer, i As Integer x=0 For i=20 To Step -2 x=x+i/5 Next i 后,x的值为
单选题设有下面程序代码:
Private Sub Command1_Click()
Dim a As Variant
a=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)
m=a(0)n=m
For k=1 To UBound(a)
Ifa(k)>mThen
n=m:m=a(k)
Elselfa(k)>n And a(k)<>m Then
n=a(k)
End If
Next k
Print n
End Sub
程序运行时的输出是
单选题下列程序段的执行结果为______。
x=Int(Rnd+3)
Select Case x
Case 5
Print "A Row"
Case 4
Print "B Row"
Case 3
Print "C Row"
Case Else
Print "D Row"
End Select
单选题以下不能触发滚动条Change事件的操作是
单选题鼠标拖放控件要触发两个事件,这两个事件是
单选题某人设计了一个窗体用于登录注册信息,上面有若干控件,其中接收注册时间输入的文本框名称为Text1。他希望,当要输入注册时间时能自动填写当前时间,于是编写了一行代码:Text1.Text=Date
请问,这行代码应该放入______事件的事件过程中才能达到目的。
单选题下面可以产生90~100(含90和100)的随机整数的表达式是______。 A) Int(Rnd*10+100) B) Int(Rnd*10+90) C) Int(Rnd*11+90) D) Int(Rnd*90+100)
单选题设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1,及下面的事件过程:PrivateSubForm_Load()HScroll1.Min=0HScroll1.Max=100EndSubPrivateSubCommand1_Click()HScroll1.Value=70EndSub程序运行时单击命令按钮,则滚动条上滚动块位置的图示是
单选题程序流程图中带有箭头的线段表示的是( )。 A) 图元关系 B) 数据流 C) 控制流 D) 调用关系
单选题没有如图所示窗体和以下程序:PrivateSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubText1_LostFocus()IfText1.Text<>"BASIC"ThenText1.Text=""Text1.SetFocusEndIfEndSub程序运行时,在Text1文本框中输入“Basic”(如图所示),然后单击Command1按钮,则产生的结果是()。A)文本框中无内容,焦点在文本框中B)文本框中为“Basic”,焦点在文本框中C)文本框中为“Basic”,焦点在按钮上D)文本框中为“VisualBasic”,焦点在按钮上
单选题Visual Basic程序中语句的续行符是( )。 A) ’ B) : C) / D) _
单选题下列哪一项使图像(Image)控件中的图像自动适应控件的大小( )。 A) 将控件的AutoSize属性设为True B) 将控件的AutoSize属性设为False C) 将控件的Stretch属性设为True D) 将控件的Stretch属性设为False
单选题有一个名称为Form1的窗体,上面没有控件,没有以下程序(其中方法Pset(X,Y)的功能是在坐标X,Y处画一个点): Dim cmdmave As Boolean Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) cmdmave=True End Sub Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) If cmdmave Then Form1.Pset(X,Y) End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) cmdmave=False End Sub 此程序的功能是( ) A.每按下鼠标键一次,在鼠标所指位置画一个点 B.按下鼠标键,则在鼠标所指位置画一个点;放开鼠标键,则此点消失 C.不按鼠标键而拖动鼠标,则沿鼠标拖动的轨迹画一条线 D.按下鼠标键并拖动鼠标.则沿鼠标拖动的轨迹画一条线,放开鼠标键则结束画线
单选题用于去掉一个字符串的右边的空白部分的函数是______。
单选题有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
