题目内容 (请给出正确答案)
[单选题]

有程序段如下Private Sub Form_Click()Static I As IntegerI = I + 1Print IEnd Sub 当第三次单击窗体时打印出的I值为()

A.0

B.1

C.2

D.3

提问人:网友lixin080108 发布时间:2022-01-07
参考答案
查看官方参考答案
如搜索结果不匹配,请 联系老师 获取答案
网友答案
查看全部
  • · 有5位网友选择 D,占比55.56%
  • · 有3位网友选择 B,占比33.33%
  • · 有1位网友选择 A,占比11.11%
匿名网友 选择了B
[20.***.***.180] 1天前
匿名网友 选择了D
[131.***.***.124] 1天前
匿名网友 选择了B
[20.***.***.180] 1天前
匿名网友 选择了A
[198.***.***.153] 1天前
匿名网友 选择了D
[131.***.***.124] 1天前
匿名网友 选择了D
[253.***.***.109] 1天前
匿名网友 选择了B
[252.***.***.145] 1天前
匿名网友 选择了D
[229.***.***.80] 1天前
匿名网友 选择了B
[144.***.***.198] 1天前
匿名网友 选择了D
[176.***.***.194] 1天前
匿名网友 选择了D
[9.***.***.239] 1天前
匿名网友 选择了A
[198.***.***.153] 1天前
匿名网友 选择了A
[198.***.***.153] 1天前
匿名网友 选择了D
[131.***.***.124] 1天前
匿名网友 选择了D
[253.***.***.109] 1天前
匿名网友 选择了B
[252.***.***.145] 1天前
匿名网友 选择了D
[229.***.***.80] 1天前
匿名网友 选择了B
[144.***.***.198] 1天前
匿名网友 选择了D
[176.***.***.194] 1天前
匿名网友 选择了D
[9.***.***.239] 1天前
加载更多
提交我的答案
登录提交答案,可赢取奖励机会。
更多“有程序段如下Private Sub Form_Click()…”相关的问题
第1题
运行下列程序,窗体中的显示结果是:x= 。

Option Compare Database

Dim x As Integer

Private Sub Form_Load()

x=3

End Sub

Private Sub Commandll_ Click()

Static a As Integer

Dim b As Integer

b=x^2

funl x,b

funl x,b

MsgBox〝x=〞&x

End Sub

Sub funl(ByRef y As Integer,ByVal z As nteger)

y=y+z

z=y-z

End Sub

点击查看答案
第2题
(11)运行下列程序,窗体中的显示结果是:x= 【11】 。

Option Compare Database

Dim x As Integer

Private Sub Form_Load()

x=3

End Sub

Private Sub Command11_Click()

Static a As Integer

Dim b As Integer

b=x^2

fun1 x,b

fun1 x,b

MsgBox "x="&x

End Sub

Sub fun1(ByRef y As Integer,ByVal z As Integer)

y=y+z

z=y-z

End Sub

点击查看答案
第3题
有程序段如下Private Sub Form_Click()Dim I As IntegerI = I + 1Print IEnd Sub 当第三次单击窗体时打印出的I值为()
A、0

B、1

C、2

D、3

点击查看答案
第4题
下面程序: Private Sub Form_Click() Dim a(100) As Integer For i = 1 To 10 j = i * i a(j) = j Next i Print a(25) End Sub 运行后,单击窗体,则输出的结果是( )。

A、25

B、36

C、49

D、81

点击查看答案
第5题
阅读下面的程序, class BaseClass { private static int CallCounter; static BaseClass() { CallCounter=2; Console.WriteLine("m={0}", CallCounter); } public BaseClass() { CallCounter++; Console.WriteLine("n={0}", CallCounter); } static void Main(string[] args) { BaseClass b1 = new BaseClass(); BaseClass b2 = new BaseClass(); BaseClass b3 = new BaseClass(); } } 程序运行的结果是什么?
点击查看答案
第6题
有如下程序:

Private Sub Form_Click()

Dim i As Integer, sum As Integer

sum = 0

For i = 2 To 10

If i Mod 2 $amp;sum = sum + i

End If

Next i

Print sum

End Sub

程序运行后,单击窗体,输出结果为()。

A.12

B.30

C.24

D.18

点击查看答案
第7题
有如下程序: Const n = -5 Const m = 6 Dim a(n To m) As Integer For i = LBound(a, 1) To UBound(a, 1) a(i) = i Next i Print a(LBound(a, 1)); a(UBound(a, 1)) 运行后输出的结果为( )。

A、0 0

B、-5 0

C、-5 6

D、0 6

点击查看答案
第8题
踏面疲劳裂纹是指轨头踏面在轮轨接触应力作用下形成的沿钢轨全长密集分布的表面裂纹

此题为判断题(对,错)。

点击查看答案
账号:
你好,尊敬的用户
复制账号
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
欢迎分享答案

为鼓励登录用户提交答案,简答题每个月将会抽取一批参与作答的用户给予奖励,具体奖励活动请关注官方微信公众号:简答题

简答题官方微信公众号

警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

微信搜一搜
简答题
点击打开微信
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
微信搜一搜
简答题
点击打开微信