在窗体上画1一个名称为Command1的命令按钮，并编写以下程序Private Sub Command1_Click（）Print fun（“ABCDEFG”）End SubFunction fun（st As String） As Stringstlen=Len（st）temp=””For kfun=tempEnd Function程序运行时，单击命令按钮，则窗体上显示的是（ ）。A．ABCDEFGB．AGBFCEC．GFEDCBAD．AGBFCED

题目

在窗体上画1一个名称为Command1的命令按钮，并编写以下程序

Private Sub Command1_Click（）

Print fun（“ABCDEFG”）

End Sub

Function fun（st As String） As String

stlen=Len（st）

temp=””

For k

fun=temp

End Function

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

A．ABCDEFG

B．AGBFCE

C．GFEDCBA

D．AGBFCED

相似考题

1.在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click()For I=1 To 2For J=1 To IPrint String(I，"Hello")；Next JPrintNext IEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．H HH HHB．H HHHHC．HHHHHD．H HH HHHH

2.（ 31 ）在窗体上画 1 一个名称为 Command1 的命令按钮，并编写以下程序Private Sub Command1_Click （）Print fun （ “ ABCDEFG ” ）End SubFunction fun （ st As String ） As Stringstlen=Len （ st ）temp= ””For ktemp=temp=Mid(st,k,l)+Mid(st,stlen-k+1 ， 1)Next kfun=tempEnd Function程序运行时，单击命令按钮，则窗体上显示的是（ ）A ） ABCDEFGB ） AGBFCEC ） GFEDCBAD ） AGBFCED

3.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_ Click() Static x As Integer Static y As Integer Cls y=1 y=y+5 x=y +x Print x, yEnd Sub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为______。A．15 16B．15 6C．15 15D．5 6

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

更多“在窗体上画1一个名称为Command1的命令按钮,并编写以下程序 PrivateSubCommand1_Click( ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，其名称为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。

  • 第2题：

    在窗体上画一个命令按钮，其名称为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；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。

  • 第3题：

    在窗体上画一个命令按钮，其名称为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

  • 第4题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i=1 To 2 For j=1 To i Print String(i,"Hello") Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。

    A．H HH HH

    B．H HHHH

    C．HHHHH HH HHHH

    D．H


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

  • 第5题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i = 1 To 2 For j = 1 To i Print String(i, "Hello") Next j Print Next i End Sub

    A．H HH HH

    B．H HHHH

    C．HHHHH HH HHHH

    D．H


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

相关内容