单选题要将窗体Form1标题设为“学习VB”以下能正确实现该功能的语句为
单选题设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text="BBBBB" End If End Sub 上述程序运行后,如果按【Shift+F2】,则在文本框中显示得是
单选题下面有3个程序段可以正确判断,另一个不能正确判断的是
单选题表达式Str(Len(”123”))+Str(77.71)的值是( )。
单选题执行下列语句:
strInput=InputBox("请输入字符串","字符串对话框","字符串")
将显示输入对话框。此时如果直接单击“确定”按钮,则变量strlnput的内容是______。
单选题下列程序段的执行结果为 ______。 N=10 For K=N To 1 Step-1 X=Sqr(K) X=X-2 Next K Print X-2
单选题在数据库管理技术的发展中,数据独立性最高的是( )。
单选题设:a = 3,b = 5,c = 4,d = 7,表达式 a d) Or Not( b < c)的值是
单选题窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1_Click() Dim arr(5) As Integer For k=1 To 5 arr(k)=k Next k Prog arr() For k=1 To 5 Print arr(k) Next k End Sub Sub prog(a() as Integer) n=Ubound(a) For i=n To 2 Step-1 For j=1 To n-1 if a(j)<a(j+1) Then t=a(j):a(j)=a(j+1):a(j+1)=t End If Next j Next i End Sub 程序运行时,单击命令按钮后显示的是 A) 1 2 3 4 5 B) 5 4 3 2 1 C) 0 1 2 3 4 D) 4 3 2 1 0
单选题在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并编写有如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+l Ifi>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的是( )。
单选题下列程序代码段中,在单击命令按钮调用SelMid函数时,其运行结果为( )。 Private Function SelMid(aSlr AS String)As String Dim temp As String,sLen As Integer temp="":sLen=Len(aStr) i=1 Do While i<=sLcn/2 temp=temp+Mid(aStr,i,1)+Mid(aStr,sLen-i+1,1) i=i+1 Loop SeMid=temp End Function Private Sub Command1_Click() Dim SirAs String Str="abcdef":Print SelMid(Str) End Sub
单选题窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubcommand1_Click()DimnIfText1.Text<>"123456"Thenn=n+1Print”口令输入错误”&n&“次”EndIfEndSub希望程序运行时得到左图所示的效果,即输入口令,单击“确认口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是______。
单选题在窗体上画一个名称为Command1的命令按钮,并编写以下程序: Private Sub Command1_Click() Print fun("ABCDEFG") End Sub Function fun(st As String)As string stlen=Len(st) temp=" " For k=1 To stlen/2 temp=temp+Mid(st,k,1)+Mid(st, stlen-k+1 ,1) Next k fun=temp End Function 程序运行时,单击命令按钮,则在窗体上显示的是______。 A) ABCDEFG B) AGBFCED C) AGBFCE D) GAFBEC
单选题在窗体上有两个名称分别为Text1、Text2的文本框,—个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明: Private Type Person name As String*8 major As String*20 End Type Dim p As Person 设文本框中的数据已正确地赋值给Person类型的变量p,当单击“保存”按钮时,能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是______。
单选题设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下: Private Sub Command1_Click() Dim a ks Integer a=10 Call g(Form2, ) End Sub private Sub g(f As Form, x As Integer) Y=Iif(x>10, 100, -100) f. Show f. Caption=Y End Sub 运行以上程序,正确的结果是______。
单选题下列程序的执行结果是______。 s=0 i=1 Do While i<=100 s=s+i Loop Print S
单选题以下关于通用对话框概念的说法中,错误的是______。
单选题在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是______。
A.路径的集合
B.选择的集合
C.操作的集合
D.目标的集合
单选题在Visual Basic中,所有标准控件都具有的属性是
单选题下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click0 Dim x(a)As Integer k=-1 For i=1 To a x(i)=i*k k=(-1)*k Next i For i=1 To 10 Print x(i) Next i End Sub