首页 > 计算机 > 计算机考试 正文

[填空题] 设有如下程序 Private Sub Search(a()As Variant, ByVal key As Variant, index%) Dim I% For I=LBound(a

时间:2021-07-20 16:46:11 解答: 65 次

[填空题] 设有如下程序 Private Sub Search(a()As Variant, ByVal key As Variant, index%) Dim I% For I=LBound(a) To UBound(a) If key=a(I) ThenIndex=IExit Sub End If Next I Index=-1 End Sub Private Sub Form Load() Show Dim b()As Variant Dim n As Integer b=Array(1,3,5,7,9, 11, 13, 15) Call Search(b, 11, n) Print n End Sub 程序运行后,输出结果是______。

正确答案:

E

参考解析:

本题综合考查了数值的初始赋值,Sub过程的建立与调用,For循环控制语句等多项内容。本题的要点在于理解Sub过程 Search所要表达的意思.根据题意,Search需要在数组a()中寻找等于key的数,如果找到了,则令Index等于该元素的下标值,如果没有找到,则令Index等于-1。据此,在调用Search时,11为b(8)的第6个元素,下标为5,故index为5。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-02 21:56:29

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-02 21:56:29

←请使用微信扫码支付