在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）a = 12345Print Format$（a, "000.00"）End Sub程序运行后，单击命令按钮，窗体上显示的是（ ）。A．123.45B．12345.00C．12345D．00123.45

题目

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

Private Sub Command1_Click（）

a = 12345

Print Format$（a, "000.00"）

End Sub

程序运行后，单击命令按钮，窗体上显示的是（ ）。

A．123.45

B．12345.00

C．12345

D．00123.45

相似考题

1.在窗体上画一个名称为 \"Command1\" 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim a As StringA="123456789"For i=1 To 5Print Space（6-i）;Mid $ （a,______ ,2*i-1）Next iEnd Sub程序运行后，单击命令按钮，窗体上的输出结果是5456345672345678123456789请填空。

2.在窗件上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后，单击命令按钮，窗体上显示的是______。A．123.45B．12345.00C．12345D．00123.45

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

4.在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是 ______。A．a=11B．a=b+cC．a=D．假

参考答案和解析
正确答案：B
更多“在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: PrivateSubCommand1_Cl ”相关问题

  • 第1题：

    在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：


    正确答案：

    36 

  • 第2题：

    在窗体上画一个名称为Cl的命令按钮，然后编写如下事件过程：

    程序运行后单击命令按钮，如果输入4，则在窗体上显示的内容是（ ）。

    A)5

    B)6

    C)9

    D)10


    正确答案：D
    本题考查VBA程序设计中的循环知识。在本题的程序中，每次循环a都会加1，所以关键问题就是循环共执行多少次。我们已知外循环共执行4次，每次外循环中内循环都执行i次，则内循环共执行的次数为1234=10次。

  • 第3题：

    在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：

    程序运行后，单击命令按钮，消息框输出的是系统当前日期和当前时间。


    正确答案：
    72【解析】本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值，当i=3，j=3时，al(3，3)=3 3=6，a2(3，3)=al(3，3) 3 3=12，所以最后二者之积为72。

  • 第4题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，"000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是

    A．123.45

    B．12345.00

    C．12345

    D．00123.45


    正确答案：B
    解析：解题的关键是掌握对格式说明字符的理解。0表示一个数字位，0的个数决定了显示区段的长度，多余的位以0补齐；小数点与O结合使用，可以放在显示区段的任何位置，根据格式字符串的位置，小数部分多余的数字按四舍五入处理。由于本题中变量a为12345，并没有涉及小数，故可以直接在其后补两个0。

  • 第5题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A. 机床

    B. 车床

    C. 钻床

    D. 轴承


    正确答案：C
    本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的a(2)就是数组的第三个元素即“钻床”。

  • 第6题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。


    正确答案：A
    A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。

  • 第7题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。

    A．49

    B．64

    C．81

    D．100


    正确答案：C

  • 第8题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：

    Private Sub Command1_Cilck()

    End Sub

    运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是( )。


    正确答案：hardware
    hardware

  • 第9题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是

    A． 123.45

    B．12345.00

    C．12345

    D．00123.45


    正确答案：B
    解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。

  • 第10题：

    在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 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．15

    B．18

    C．21

    D．24


    正确答案：C
    解析：本题考查的是For．．．Next循环语句。For．．．Next循环执行时，先将初始值赋给循环变量，判断是否超过终值；若未超过则执行循环体，遇到Next语句后，循环变量增加一个步长，(默认值为1)，再判断是否超过终值，若未超过则继续执行循环体，如此重复直到循环变量超过终值，退出循环。本题中的循环变量为n，步长为1，当n=20时，再执行Nextn，则n=21，此时n大于终值20，退出循环。

  • 第11题：

    在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：

    程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。


    正确答案：
    9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为： 其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。

  • 第12题：

    单选题
    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：运行程序后单击命令按钮，输出结果是（　　）。
    A

    123456ABCD

    B

    ABCD123456

    C

    D6C584A321

    D

    A1B2C3D456


    正确答案： B
    解析：
    Len（a）=4，Len（b）=6，字符型变量c用于每次连接计算的结果。Mid（a，k，1）表示从字符串a左边第k个位置开始向右取1个字符。当k=1时，执行第一次循环，两个If语句都被执行，第一个If判断之后，c=″A″，第二个If判断之后，c=″A1″。前四次k的值都可以执行两个If语句。当k=5和6时，第一个If语句不再执行，只执行第二个If语句，最后的结果c=″A1B2C3D456″。

  • 第13题：

    （7）在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程：

    Private Sub Command1_Click( )

    a$="National Computer Rank Examination"

    n=Len(a$)

    s=0

    For i=1 To n

    b$=Mid(a$, i, 1)

    If b$="n" Then

    s=s+1

    End If

    Next i

    Print s

    End Sub

    程序运行后，单击命令按钮，输出结果是 【7】 。


    正确答案：

    （7）【答案】4
    【解析】此题实际上是从左自右逐个提取a$中的字符，判断是不是等于“n”，统计其中“n”的个数。

  • 第14题：

    在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：

    程序运行后，单击命令按钮，其输出结果为__________。


    正确答案：
    9【解析】本题考查VBA中程序设计的知识。对于这个问题，首先注意到循环的次数为6次；然后注意到循环内的两个If语句为顺序关系而不是嵌套关系，第一个If语句只有第一次循环时才会满足；第一次循环时首先执行第一个If语句把x赋值为1，然后执行第二个If语句；以后各次循环均照此分析，前4次循环x自加l，后两次循环X自加2，最后输出结果为9。

  • 第15题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() x=-5 If Sgn(x) Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub 程序运行后，单击命令按钮，其输出结果为 ______。

    A．-5

    B．25

    C．-1

    D．1


    正确答案：D
    解析：Sgn(number)函数的功能是返回number的正负号。如果number＞0，Sgn返回1；number=0，Sgn返回0；number0，Sgn返回-1。在本题中Sgn(-5)的返回值为-1，-1为真，所以执行y=Sgn(x^2)，返回1，所以y的值为1。

  • 第16题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：

    运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是__________。


    正确答案：
    hardware【解析】本题考查消息框的知识。使用MsgBox函数来弹出消息框，此函数的使用格式为：MsgBox(prompt[，buttons][，title][，helpfile，context])其中第一个参数是显示在对话框中的消息，第二个参数是按钮的数目及形式，第三个参数是对话框标题栏显示的字符串，后面的是帮助文件以及帮助上下文编号。第一个参数必需有，其余参数可省略，但是若中间若干个参数省略时不能省略逗号分隔符。本题中第三个参数是变量b，即hardware。

  • 第17题：

    在窗体上画一个命令按钮，其名称为Command]，然后编写如下事件过程：程序运行后，单击命令按钮，消息框输出的是（ ）

    A. 48

    B. 72

    C. 96

    D. 128


    正确答案：B
    奉题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。浅们只需要注意这两个数组元素在循环中被赋了什么值，当i=3 j=3时，al(3，3)=3+3=6，a2(3。3)= al(3，3)+3+3=12．所以最后二者之积为72。

  • 第18题：

    在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

    程序运行后，单击命令按钮，在文本框中显示的值是

    A．2

    B．3

    C．4

    D．5


    正确答案：B
    题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。

  • 第19题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：

    程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A．

    B．H

    C．

    D．


    正确答案：A
    【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。

  • 第20题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：

    程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A)机床

    B)车床

    C)钻床

    D)轴承


    正确答案：C
    本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。

  • 第21题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1 Click() For i=1 To 4 If i=1 Then x=i If i＜=4 Then x=X+1 Print x Next i End Sub 程序运行后，单击命令按钮，其输出结果为：_______。

    A．1 2 3 4

    B．2 3 4 5

    C．2 3 4 4

    D．3 4 5 6


    正确答案：B
    解析：第一次循环时x的值为2，每次加1，所以答案为2345。

  • 第22题：

    在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() a=4:b=5:c:6 Print a=b+c End Sub 程序运行后，单击命令按钮，其结果为

    A．a=11

    B．a=b+c

    C．False

    D．出错


    正确答案：C
    解析：Print方法具有计算和输出两种功能。当Print的输出项是表达式时，将先计算表达式，然后输出表达式的值。所计算和输出的表达式可以是算术表达式，也可以是关系表达式或逻辑表达式。本题中的a=b+c是一个关系表达式，其中a的值为4，b+c的值是11，Printa=b+c实际上执行的是Print4=11，显然是一个“假”值，

  • 第23题：

    在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：

    PriVate Sub Commandl_CUck()

    Dimalt(1 To 100)As Integer

    Fori=1 To 100

    arr(i)=Int(Rnd*1000)

    Nexti

    Max=arr(1)

    Min=arr(1)

    Fori=1 To 100

    If [12] Then

    Max=arr(i)


    正确答案：arr(i)＞Max或arr(i)＞=Max或Maxarr(i)或Max=arr(i)arr(i)Min或arr(i)=Min或Min＞arr(i)或Min＞=arr(i)
    arr(i)＞Max或arr(i)＞=Max或Maxarr(i)或Max=arr(i),arr(i)Min或arr(i)=Min或Min＞arr(i)或Min＞=arr(i)

  • 第24题：

    单选题
    设有如下通用过程：在窗体上画一个名为Command1的命令按钮，然后编写如下的事件过程：程序运行后单击命令按钮，输出结果是（　　）。
    A

    ABCDEF

    B

    abcdef

    C

    AFBECD

    D

    DEFABC


    正确答案： C
    解析：
    在循环中，利用Mid函数使得变量tStr的值不断变化，然后通过命令按钮的单击事件调用循环所在的函数，UCase函数将Fun函数返回的结果字符串中的小写字母转换成大写字母。

相关内容