单选题若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( )。
单选题将窗体的KeyPreview属性设为True,然后编写如下程序: Private Sub Form_KeyDown(KeyCode_ Private Sub Form_KeyPress(KeyAscii As Integer,Shift As Integer) As Integer) Print Chr(KeyCode) Print Chr(KeyAsci i) End Sub End Sub 运行程序时,按下字母键a,则窗体上显示的是
单选题在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
单选题可以实现从键盘输入一个作为双精度变量a的值的语句是{{U}} {{/U}}。
A.a=InputBox()
B.a=InputBox("请输入一个值")
C.a=Val(InputBox( "请输入一个值"))
D.a=Val(InputBox())
单选题滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是 ______。
A. Max
B. Value
C. LargeChange
D. SmallChange
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
C=1234
c1=Trim(Str(c))
For i=1 To 4
Print
Next
End Sub
程序运行后,单击命令按钮,要求在窗体上显示如下内容:
1
12
123
1234
则在______处应填入的内容为
单选题在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是
单选题下面程序的执行结果是______。
Private Sub Command1_Click()
a=0
k=1
Do While k<4
x=k^k^a
k=k+1
Print x;
Loop
End Sub
单选题下列叙述中错误的是( ) A.列表框和组合框都有List属性 B.列表框有Selected属性,而组合框没有 C.列表框和组合框都有Style属性 D.组合框有Text属性,而列表框没有
单选题为了能将信息直接送往打印机,应该将Print方法的对象改为
单选题在利用菜单编辑器设计菜单时,为了把组合键<Alt+O>设置为“打开(O)”菜单项的访问键,可以将该菜单项的标题设置为( )。
单选题下列数据类型定义中,正确的是
单选题窗体的左右两端各有1条直线,名称分别为Linel、Line2;名称为Shape1的圆靠在左边的Linel直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停止移动。为实现上述功能,某人把计时器的Interval属性设置为1000,并编写了如下程序:PrivateSubTimer1_Timer()Fork=Linel.X1ToLine2.X1Step100IfShape1.Left+Shape1.Width
单选题有如下程序,运行后输出s的值是______。 For j=1 To 20
x=2*j-1 If x Mod 3=0 0r x Mod 7=0
Then s=s+1 Next j Print s
A. 5
B. 9
C. 11
D. 15
单选题设有数组定义语句:Dima(5)AsInteger,Listl为列表框控件。下列给数组元素赋值的语句错误的是( )。
单选题表达式Str(Len("123"))+Str(77.7)的值是( )。
单选题窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是( )。 Private Sub Commandl_Click() Picturel.Picture=LoadPicture("c:/picture.jpg") Picmrel.Cls Picturel.Print "picture" End Sub
单选题有如下一个Sub过程: Sub mlt (ParamArray numbers()) n=1 For Each x In numbers n=n * x Next x Print n End Sub在一个事件过程中如下调用该Sub过程: Private Sub Coinmand1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 则运行该程序,结果为______。
单选题在窗体上画两个文本框(名称分别为Text1和Text2)和—个命令按钮(名称为Cotranand1),然后编写如下事件过程:Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为______。
单选题窗体上有一个名称为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click()
x=15
Do While x>0
x=x-3
x=IIf(Int(x/5)=x/5,x+2,x)
Loop
Print x
End Sub
程序运行后,单击命令按钮Command1,输出结果为______。