[主观题]

(6)在窗体上有1个名称为Command 1的命令按钮,并有如下事件过程和函数过程:

Private Sub Command 1_Click()

D.im p As Integer

p=m(1)+m(2)+m(3)

Print p

E.nd Sub

Private Function m(n As Integer) As Integer

Static s As Integer

F.or k=1 To n

s=s+1

Next

m=s

E.nd Function

运行程序,单击命令按钮Command 1的输出结果为(6)。

参考答案与解析:

相关试题

( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过

[试题]( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:Private Sub Command1_Click()D.im x As Integer,y As Integer,zx=3y=5z=fy(y)print fx(fx(x)),yE.nd SubF.unction fx(ByBal a As Integer)a=a+afx=aE.nd FunctionF.unction fy(ByRef a As Integer)a=a+afy=aE.nd Function运

  • 查看答案
  • 在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程:Priv

    [单选题]在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是( )。A.2B.3C.4D.5

  • 查看答案
  • 在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Pri

    [单选题]在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For j=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End SubA.2B.3C.4D.5

  • 查看答案
  • 在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程: 记录类型

    [单选题]在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:记录类型定义如下:下列叙述中正确的是( )。A. 记录类型animal不能在Form1中定义,必须在标准模块中定义B. 如果文件c:/vbTest.dat不存在,则Open命令执行失败C. 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾D. 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中

  • 查看答案
  • 在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程: 程序执行

    [单选题]在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:程序执行时,单击命令按钮,实现的功能是( )。A. 命令按钮移动到距窗体左边界、上边界各500的位置B. 命令按钮向左、上方向各移动500C. 窗体移动到距屏幕左边界、上边界各500的位置D. 窗体向左、上方向各移动500

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Commandl Click() StatiC b As Variant b=Array(1,3,5,7,9) ... End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是A.For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.For i=0 To 5 tmp=b(i

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Command1_Click() Static b As Variant b=Array(1,3,5,7,9) End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是( )。A.For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.For i=0 To 5 tmp=b(i

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Command1_Click( ) Static b As Variant b=Array(1,3,5,7,9) …… End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是A.Fori=0 T0 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.Fori=0 To 5 tmp=b(i)

  • 查看答案
  • 在窗体上有一个名称为Command1的命令按钮,并有如下程序: 程序执行时,单击

    [单选题]在窗体上有一个名称为Command1的命令按钮,并有如下程序:程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。A. 5 16B. 5 6C. 15 15D. 15 6

  • 查看答案
  • 在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程: Priv

    [单选题]在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a=0F.or i=1 To 2F.or j=1 To 4If j Mod 2<>0 Thena=a-1E.nd Ifa=a+1Next jNext iPrint aE.nd Sub程序运行后,单击命令按钮,输出结果是( )。A.0B.2C.3D.4

  • 查看答案