[主观题]

如果存在如下过程:

Private Function FMax(a() As Integer)

D.im First As Integer, Last As Integer, i As Integer

F.irst=LBound(A)

Last=UBound(A)

Max=a(First)

F.or i=First To Last

If a(i) > Max Then Max=a(i)

Next i

F.Max=Max

E.nd Function

在窗体上添加一个命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

ReDim m(1 To 4) As Integer

m(1) =20: m(2) =30: m(3) =50: m(4) =100

c=FMax(m)

Print c

E.nd Sub

单击命令按钮,其输出结果为 (12) 。

参考答案与解析:

相关试题

如果存在如下过程: Private Function Fun(a() As In

[试题]如果存在如下过程:Private Function Fun(a() As Integer)D.im First As Integer, Last As Integer, i As IntegerF.irst=LBound(a)Last=UBound(a)Max=a(First)F.or i=First To LastIf a(i) > Max Then Max=a(i)NextF.un=MaxE.nd Function在窗体上添加一个命令按钮,然后编写如下事件过程:Private Sub C

  • 查看答案
  • 设有如下通用过程:PublicSubFun(a(),ByValx AsInteg

    [单选题]设有如下通用过程: Public Sub Fun(a(), ByVal x As Integer) For i=1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Commandl Click() Dim arr(5) As Variant For i=1 To 5 arr(i) =i Next n = 10 Call Fun(arr(), n) Text

  • 查看答案
  • 设有以下函数过程: Functionfun(mAsInteger)AsInteg

    [试题]设有以下函数过程:F.unction fun(m As Integer) As IntegerD.im k As Integer, sum As Integersum = 0F.or k = m To 1 Step -2sum = sum + kNext kfun = sumE.nd Function若在程序中用语句 s = fun(10) 调用此函数,则s的值为______。

  • 查看答案
  • 设有如下过程: Private Sub Form. KeyDpwn(KeyCod

    [单选题]设有如下过程: Private Sub Form. KeyDpwn(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form. KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 若把窗体的KeyPreview属性设置为True,程序运行后,如果按“A”键,则输出结果为( )。A. A AB. A BC

  • 查看答案
  • ( 22 )有如下过程代码:Sub var_dim()Static numa

    [单选题]( 22 )有如下过程代码:Sub var_dim()Static numa As IntegerD.im numb As Integernuma=numa+2numb=numb+1print numa;numbE.nd Sub连续 3 次调用 var_dim 过程,第 3 次调用时的输出是A. ) 2 1B. ) 2 3C. ) 6 1D. ) 6 3

  • 查看答案
  • UE处于idle状态发起如下过程触发RRC连接建立()

    [单选题]UE处于idle状态发起如下过程触发RRC连接建立()A.发起呼叫B.切换过程C.专用承载建立D.RA更新

  • 查看答案
  • 有如下过程代码:Sub var_dim()Static numa AS Inte

    [单选题]有如下过程代码:Sub var_dim()Static numa AS IntegerD.im numb As Integernuma=Duma+2numb=numb+1print numa;mumbE.nd Sub连续3次调用vardim过程,第3次调用时的输出是A.2 1B.2 3C.6 1D.6 3

  • 查看答案
  • 安全防范系统的目标实现通常经历如下过程()

    [多选题] 安全防范系统的目标实现通常经历如下过程()A . 通过对被保护对象的风险评估确定系统目标B . 使系统的防护级别与被保护对象的风险等级相适应C . 设计一个系统以满足系统目标要求D . 将技防、物防、人防相结合,探测、延迟、反应相协调E . 评估系统满足系统目标的程度,即对系统的效能进行评估

  • 查看答案
  • 残损人民币销毁主要指如下过程()。

    [多选题]残损人民币销毁主要指如下过程()。A.中国人民银行发行库回收残损人民币B.商业银行按规定程序对发行库回收残损人民币进行整点C.中国人民银行将整点后残损

  • 查看答案
  • 把窗体的KeyPreview属性设置为True,然后编写如下过程:Private

    [单选题]把窗体的KeyPreview属性设置为True,然后编写如下过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果为 ______。A.A AB.A B

  • 查看答案