单选题窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
单选题在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:Private Sub Command1_Click() a=InputBox("Enter an integer") b=Text1.Text Text1.Text=b+a End Sub程序运行后,在文本框中输入456,然后单击命令按钮,在输入对话框中输入123,则文本框中显示的内容是( )。
单选题没有如下程序:
Private Sub Form_Click()
Dim s As Long,f As Long
Dim n As Integer, i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是______。
单选题若有以下程序,当程序运行后,单击命令按钮,则输出的结果为( )。 Private Sub Command1_Click() Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2# For i= 1 To 4 a(i) = i Next i For i=3 To 6 b(i) = i Next i s1 = Factorial (
单选题在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click( )
Dim I As Integer
If Text1.Text <> "Gong" Then
I = MsgBox("密码错误", 5 + vbExclamation, "输入密码")
If I <> 4 Then
End
Else
Text1.Text = ""
Text1.SetFocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"Gong",则程序运行结果为( )
单选题为了删除列表框中的一个列表项,应使用的列表框方法是
单选题下面( )属性肯定不是框架控件的属性。 A.Text B.Caption C.Left D.Enabled
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:
Private Sub Commandl_Click( )
Dim x,y,z As Integer
x=5
y=7
z=0
Text1.Text=""
Call Fun1(x,y,z)
Text1.Text=Str(z)
End Sub
Sub Fun1(ByVal a As Integer,ByVal b As Integer,c As Integer)
c=a+b
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是
单选题在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click()
For I=1 To 4
For J=0 To I
Print Chr$(65+I);
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
单选题设a=4,b=5,c=6,执行语句:Print a<b And b<c后,窗体上显示的是( )。
单选题窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=8
b=12
Print Fun(a,b);a;b
End Suo
Private Function Fun(ByVal a As Integer,b As Integer) As Integer
a=a Mod 5
b=b/5
Fun=a
End Function
程序运行时,单击命令按钮,则输出结果是______。
单选题下面变量定义中错误的是
单选题如果Tab函数的参数小于1,则打印位置在第______列。 A) 0 B) 1 C) 2 D) 3
单选题以下关于控件数组的叙述中,正确的是( )。
单选题执行语句Dim X,Y As Integer后,
单选题VB集成开发环境开发的应用程序不适宜的运行环境是( )
单选题要使标签中的文本靠右显示,应将其Aligment属性设置为
单选题已知X>Y,A>B,能正确表示它们之间关系的式子是______。
单选题假定在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10
TelNum As String*20
End Type
要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
单选题在VB中,函数过程与子程序过程的区别之一是