网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Forn=1 To 20 If n Mod 3<>Thenm=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。

A.15

B.18

C.21

D.24


参考答案

更多 “ 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Forn=1 To 20 If n Mod 3<>Thenm=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24 ” 相关考题
考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:Private Sub Commandl_Click()Dimi As Integer,j As IntegerDima(10,10)As IntegerFori=1 To 3Forj=1 To 3a(i,j)=(i-1)*3+jPrinta(i,j);NextjPrintNextiEnd SubA.B.C.D.

考题 在窗体上画一个名称为Commandl的命令按钮,一个名称为Labell的标签,然后编写如下事件过程: Private Sub Commandl_Click() S=0 Fori=1 To 15 x=2*i-1 If x Mod3=0 Thens=S+1 Nexti Labe11.Caption=S End Sub 程序运行后,单击命令按钮,则标签中显示的内容是( )。A.1B.5C.27D.45

考题 在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程: Private Sub Commandl_click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 D CD BCD ABCD 则在______处填入的内容为。A. Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(By Val m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Commandl_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是______。A. 6B.7C.8D.9

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

考题 在窗体上画一个名称为Commandl的命令按钮。单击命令按钮时执行如下事件过程:Private Sub Commandl_Click()a$=”software and hardware”b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,bs,cS,1End sub则在弹出的信息框标题栏中显示的标题是( )。A.software and hardwareB.hardwareC.softwareD.1

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Prirate Sub Commandl_click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。A.software andhardwareB.softwareC.hardwareD.1

考题 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,其输出结果为__________。

考题 在窗体上画一个命令按钮(名称为 Commandl),然后编写如下事件过程: Private Sub Commandl_Click() Static a As Integer a=a+1 End Sub 运行程序,第3次单击命令按钮后,变量a的值为( )A.0B.1C.2D.3

考题 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )A.123345B.468C.123D.345

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京","上海","天津","重庆") Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。A.空白B.错误提示C.北京D.上海

考题 窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是A.Private Sub Forml_Click() … End SubB.Private Sub Form_Click() … End SubC.Private Sub Commandl_Click() … End SubD.Private Sub Command_Click() … End Sub

考题 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:Private Sub Corrtmandl Click()a$=”Nationalcomputer rank Examination”n=Len(a$)S=0For i=1 To nb$=Mid(a$,i,1)Ifb$=”n”Thens=s+1End IfNext iPrint sEnd Sub程序运行后,单击命令按钮,输出结果是【 】。

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是______。A. software and hardwareB.softwareC.hardwareD.1

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:Pfivae Sub Commandl_click()a=0For i=1 To 2For j=1 To 4If i Mod 20 Thena=a-1End Ifa=a+1Next jNext IMsgBox aEnd Sub程序运行后,单击命令按钮,消息框中的输出结果是______。

考题 设在窗体上有一个名称为Commandl的命令按扭和一个名称为Textl的文本框。要求单击Commandl按钮时可把光标移到文本框中。下面正确的事件过程是。 A.Private Sub Commandl_Click B.Private Sub Commandl_Click Textl.GotFocus Commandl.GotFocus End Sub End Sub C.Private Sub Commandl_Click D.Private Sub Commandl_Click Textl.SetFocus Commandl.SetFocus End Sub End sub

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n \ 3 Next n print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是A.15B.18C.21D.24

考题 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc("A")+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

考题 在窗体上添加一个命令按钮,名称为Commandl,然后编写如下事件过程: Option Base 0Private Sub Commandl_Click() Dim cityAs VariantCity=.Array("北京", "上海","天津”, "重庆")Print city(1)End Sub程序执行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.空白B.错误提示C.北京D.上海

考题 在窗体中添加了一个文本框和一个命令按钮(名称分别为Textl和Commandl),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是( )。A.Private Sub Commandl.Click( ) Caption=”Access模拟”Commandl.B.Private Sub Textl click( ) Caption=”Access模拟”EndSubEndSubC.Private SUb Commandl Change( ) Caption=”Access模拟”Commandl.D.Private Sub Textl_Change( ) Caption=”Access模拟”End SubEnd Sub

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Pfivate Sub Commandl_Click() Dima() a=Array("机床","车床","钻床","轴承")Print a(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

考题 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

考题 在窗体上画一个命令按钮,名称为Commandl。然后编写如下程序:Private Sub Commandl_Click()For I=1 T0 2For J=1 To IPrint String(I,″Hello″);Next JPrintNext IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.H HH HHB.H HHHHC.HHHHHD.H HH HHHH

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,“车床”,“钻床”,“轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() y = 8 Print fun1(1 + fun1(fun1(fun1(y)))*10) End Sub Private FLinctiOn fUnl(A)funl(A)= 1 + a End Function 程序运行后,单击命令按钮,则窗体上显示的内容是A.112B.2C.909090D.1001

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub Command1_Click() Static x As Integer Stati cy As Integer y=1 y=y+5 x=x+5 Printx;y End Sub 程序运行时,三次单击命令按钮Commandl后,窗体上显示的结果为()A、1516B、156C、1515D、56