单选题为了通过键盘访问主菜单项,可在菜单编辑器的“标题”选项中的某个字母前插入何字符,建立热键字母?
单选题下列可作为Visual Basic变量名的是
单选题设窗体上有名称为Optionl的单选按钮,且程序中有语句: If Optionl.Value=True Then下面语句中与该语句不等价的是
单选题执行下列程序后,鼠标单击窗体,输出结果为______。
Private Sub Form_Click()
Print "Click"
End Sub
Private Sub Form_MouseDown(Button As Integer, Shin As Integer, X As Single, Y As Single)
Print "Down"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "Up"
End Sub
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Commandl_Click() Dimarrayl(10,10)As
Integer Dimi As Integer,j As Integer
Fori=1 To 3 Forj=2 To 4
arrayl(i,j)=i+j
Nextj Nexti
Text1.Text=axvayl(2,3)+arrayl(3,4) End Sub
程序运行后,单击命令按钮,在文本框中显示的值是{{U}} {{/U}}。
A.15
B.14
C.13
D.12
单选题对用MsgBox显示的消息框,下面 ______ 是错的。
单选题窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:
Private Sub Command1_Click()
CD1. Filter="All File|*.*||Text File|*.txt|PPT|*.ppt"
CD1. FiherIndex=2
CD1. InitDir="C:/1"
CD1. FileName="default"
CD1. ShowSave
End Sub
关于上述过程,以下叙述中正确的是______。
单选题下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single EndType Private Sub Form_Click() Dim Y As Single Dim i As Integer Dim Ksc As Ang Open ______ Y=3.14159/180 For i=1 To 90 Ksc. K=i Ksc. Sinx=Sin(i*Y) Ksc. Cosx=Cos(i+Y) ______ Nexti Close#2 Elid Stub
单选题当文本框中的内容发生改变时所触发的事件是
单选题对于能够获得焦点的控件,若要使其不能接收焦点,应该
单选题在窗体上画一个名称为List1的列表框,然后编写如下程序:
Private Sub Form_Click()
For i=1 To 10
Item="Item" &i
List1.Addltem Item
Next i
End Sub
程序运行时,单击窗体,所完成的功能是______。
单选题关于过程调用正确的是( )。
单选题假定有如下的Sub过程: Sub S(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=2 S a,b print a,b End Sub 程序运行后,单击命令按钮,输出结果是( )。
单选题窗体上有1个名称为List1的列表框,其中已经输入了若干个项目,如图所示;还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有下列事件过程。PrivateSubCommand1_Click()DimstrAsString,sAsString,kAsIntegers=Text1str=""Fork=List1.ListCount-1To0Step-1IfInStr(List1.List(k),s)>0Thenstr=str&List1.List(k)&""EndIfNextkIfstr=""ThenText2="没有匹配的项目"ElseText2=strEndIfEndSub程序运行时,在Text1中输入"京",单击命令按钮,则在Text2中显示的内容是______。
单选题运行以下程序后,输出的图案是()。Form1.ClSA$=Strillg$(10,“*”)Fori=1To5n=10-2*IX$=A$:Y$=Space$(n)Mid$(X$,i+1,n)=Y$PrintX$Nexti
单选题假定在窗体上建立了一个通用对话框,其名称为Cd1,用下面的语句可以建立一个对话框: Cdl. ShowPrinter 与该语句等价的语句是 ( )
单选题数学式Y
2
=x>10在VB中应表示为( )。
单选题命令按钮Command1的单击事件过程如下: Private Sub Command1_Click( ) Dim a( 10, 10)As Integer x=0 For i = 1 To 3 For j = 1 To 3 a(i, j) =i * 2 Mod j If x<a(i, j)Then x=a(i, j) Next Next Print x End Sub 执行上述事件过程后,窗体上显示的是( )。 A) 1 B) 2 C) 3 D) 4
单选题在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click( ) A=Text1.Text+Text2.Text Print a End Sub Private Sub Form_Load( ) Text1.Text="" Text2.Text="" End Sub 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44,然后单击命令按钮,则输出结果为______。
单选题根据变量的作用域,可以将变量分为3类,分别为( )。
