单选题设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=strL/2 tStr=tStr & Mid(xStr, i, 1)& Mid(xStr,strL-i+1,1) i=i+1 Loop Fun=tStr End Function 在窗体上画—个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim S1 As String S1="abcdef" Print UCase(Fun(S1)) End sub 程序运行后,单击命令按钮,输出结果是______。
单选题窗体上有一个名称为Command1的命令按钮,其事件过程如下: Private Sub Command1_Click() x="VisualBasicProgramming" a=Right(x,11):b=Mid(x,7,5):c=MsgBox(a,b) End Sub 运行程序后单击命令按钮。以下叙述中错误的是
单选题命令按钮Command1的MouseUp事件过程结构如下: Private Sub Command1_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) End Sub 则以下叙述中错误的是
单选题软件需求分析—般应确定的是用户对软件的 ______。
A. 功能需求
B. 非功能需求
C. 性能需求
D. 功能需求和非功能需求
单选题下列关于Do…Loop语句的叙述不正确的是 ( )
单选题有如下程序; Private SubForm_Click() Dim check As Boolean,n As Integer check=False n=0 Do Do While n<10 n=n+1 If n=5 Then check=True Exit Do End if Print n; Loop Loop Until check = True End Sub 程序运行后,输出的结果是 ______ 。 A) 1 2 3 B) 1 2 3 4 C) 1 2 3 4 5 D) 1 2 3 4 5 6
单选题设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是______。
单选题以下叙述中错误的是
单选题对于用户自定义的数据类型,以下4种描述中,错误的是______。
单选题以下叙述中错误的是( )。
单选题以下叙述中错误的是______。
A.在程序运行时,通用对话框控件是不可见的
B.调用同一个通用对话框控件的不同方法(如ShowOpen或ShowSave)可以打开不同的对话框窗口
C.调用通用对话框控件的ShowOpen方法,能够直接打开在该通用对话框中指定的文件
D.调用通用对话框控件的ShowColor方法,可以打开颜色对话框窗口
单选题窗体上有—个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为“VB Programming”。运行程序后,选中其中的“VB”,并执行如下事件过程:Private Sub Command1_Click()Text1 SelTaxt="C++"End hub则文本框中显示的内容为
单选题在窗体上画一个组合框、一个命令按钮和一个文本框,其名称分别为combol,Command1和Text1,然后编写如下事件过程:
Private Sub Form_Load()
Combo1.AddItem"AAAAA"
Combo1.AddItem"BBBBB"
Cnmbo1.AddItem"CCCCC"
Combo1.AddItem"DDDDD"
Combo1.AddItem"EEEEE"
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的Click事件过程中应使用的语句为______。
单选题要使标签中的文本靠右显示,应将其Aligment属性设置为
单选题在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1,A) Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是______。
单选题执行下列程序后,变量a的值为( )。 Dim i As Integer Dim a As Integer a=0 For i=1 To 100 Step 2 a=a+1 Next i
单选题双精度浮点数的类型说明符为
单选题下列程序执行后,n的值为______。
单选题窗体上有一个文本框,其Name属性为Text1,如图所示,并有如下事件过程:PrivateSubForm_Load()Text1.Text="":Text1.SetFocusFori=1To10Sum=Sum+iNextiText1.Text=SumEndSub上述程序的运行结果是()。
单选题如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的( )属性。 A) Value B) Visible C) Enabled D) Default
