题目
在窗体上画一个文本框,然后编写如下代码:
Option Base 1
Private Sub Form_Click( )
Dim arr
Dim Start As Integer, Finish As Integer
Dim Sum As Integer
art=Array(12,4,8,16)
Start=LBound(arr)
Finish=UBound(arr)
Sum=0
For i=Start To Finish
Sum=Sum+arr(i)
Next i
c=Sum/Finish
Text1.Text=c
End Sub
程序运行后,单击窗体.则在文本框中显示的内容是______。
A.40
B.10
C.12
D.16
提示:未搜索到的试题可在搜索页快速提交,您可在会员中心"提交的题"快速查看答案。
答案
查看答案
搜题
相关试题
仲裁庭裁决争议案件中,仲裁员若(),则应当回避。
- A与案件有利害关系
- B接受代理人请客送礼
- C促使争议双方当事人达成调解协议
- D私自会见当事人
- E是仲裁委员会主任
(),我国的利率管制时代宣告终结。
- A2005年6月
- B2015年10月
- C2004年10月
- D2014年6月
[单选]一线执行者的职责和心态应该包括哪些()(1)善于并乐于把事情弄明白,不盲目执行任务(2)流程意识,遵守规则和标准(3)细节意识(4)主动且忠诚于组织
A.(1)(2)
B.(2)(3)(4)
C.(1)(3)(4)
D.(1)(2)(3)(4)
A.(1)(2)
B.(2)(3)(4)
C.(1)(3)(4)
D.(1)(2)(3)(4)
风险分析是根据( )的使用目的,对识别出的风险进行定性和定量的分析,为风险评价和风险应对提供支持。
A、风险类型
B、获得的信息
C、风险评估结果
D、风险汇总
E、影响范围
执行标准状况采用单位应用状况、工程应用状况、技术人员掌握标准状况等三项指标进行评价。
A、正确
B、错误