单选题以下控件可作为其他控件容器的是
单选题设a=2,b=3,c=4,d=5,下列表达式的值是______。 3>2*b Or a=c And b<>c Or c>d
单选题假定窗体有一个标签,名为Label1,为了使该标签透明并且没有边框,正确的属性设置为( )。
单选题下列程序段的执行结果为( )。 a=3: b=1 For i=1 To 3 f=a+b:a=b:b=f Print f Next j A) 4 3 6 B) 4 5 9 C) 6 3 4 D) 7 2 8
单选题设有语句Open"c:/Test.Dat" For Ouput As #1则以下叙述中错误的是
单选题设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是______。
单选题在软件设计中的软件过程,其主要描述的是{{U}} {{/U}}。
A. 模块操作细节
B. 模块间关系
C. 模块控制方法
D. 模块类型
单选题下列不能打开代码窗口的操作是______。
A. 双击窗体上的某个控件
B. 双击窗体
C. 按<F7>键
D. 单击窗体或控件
单选题设窗体上有一个文本框Text1和一个命令按钮Command1,并有下列事件过程: Private Sub Command1_Click() Dim s As String,Ch As String s="" For k=1 To Len(Text1) ch=Mid(Text1,k,1) s=ch+s Next k Text1.Text=s End Sub 程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是( )。
单选题在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Function Fun(x) Private Sub Command1_Click() y=0 n=InputBox("请输入一个数") If x<10 Then n=Val(n) y=x P=Fun(n):Print P Else End Sub y=y+10 End If Fun=y End Function 运行程序,单击命令按钮,将显示输入对话框,如果在对话框中输入100,并单击“确定”按钮,则输出结果为
单选题下列程序的输出结果为( )。S1="1":S2="2":S1=Val(S1)+Val(S2)S2=Val("12")If S1<>S2 Then Print S1-S2 Else Print S2-S1
单选题在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程: Private Sub Command1_Click() a=0 For i=l To 10 a=a+l:b=0 For j=1 To 10 a=a+l:b=b+2 Nextj Label1.Caption=Str(a):Label2.Caption=Str(b) End Sub 程序运行后,单击命令按钮,在标签Label1和Label2中显示的内容分别是
单选题在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer If a=0 Then x=x-1 Else If b<>0 Then End If End If If c<>0 Then x=3 Else x=4 End If Print x End Sub 程序运行后,单击命令按钮,其输出结果为 ______。 A.34 B.4 C.35 D.3
单选题在窗体上有一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(5) As String
For i=1 To 5
a(i)=Chr(Asc ("A")+(i-1))
Next i
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是______。
单选题下列程序的功能是调用字体对话框来设置文本框字体,单击按钮弹出对话框后,按Cancel键退出对话框,则 Private Sub Command1_Click( ) CommonDialogl.CancelError=True CommonDialogl.Flags=cdlCFEffects Or cdlDFBotb CommonDialogl.Action=4 CommonDialogl.ShowFont Text1.Font.Name=CommonDialogl.FontName Text1.Font.Size=CommonDialogl.FontSize Text1.Font.Bold=CommonDialog1.FontBold Text1.Font.Italic=CommonDialog1.FontItalic Text1.Font.Underline=CommonDialog1.FontUnderline Text1.FontStrikethru=CommonDialog1.FontStrikethru Text1.ForeColor=CommonDialog1.Color End Sub
单选题关于随机文件,以下叙述中错误的是
单选题单链表要求内存中可用存储单元的地址______。
A.必须是连续的
B.一定是不连续的
C.部分地址必须是连续的
D.可以是连续的,也可以是不连续的
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Public Enum s
a=4
b=3
End Enum
Private Sub Command1_Click()
Dim x As Integer
x=a
If x>=3 Then MsgBox "Pass!"
End Sub
运行程序,其结果是______。
单选题用户在组合框中输入或选择的数据可以通过一个属性获得,这个属性是( )。
单选题单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print Fun(23,18) End Sub Public Function Fun(m As Integer,n As Integer) As Integer DO While m<>n DO While m>n:m=m-n:Loop DO While m<n:n=n-m:Loop Loop Fun=m End Function
