题目内容 (请给出正确答案)
[主观题]

PrivateSubForm_Click()DimxAsIntegerStaticyAsIntegerx=x+2y=y+3Form1.Print"x=";x

PrivateSubForm_Click()DimxAsIntegerStaticyAsIntegerx=x+2y=y+3Form1.Print"x=";x

PrivateSubForm_Click()

DimxAsInteger

StaticyAsInteger

x=x+2

y=y+3

Form1.Print"x=";x,"y=";y

EndSub

写出程序运行时连续单击三次窗体后,Form1上的输出结果。

提问人:网友Dume2021 发布时间:2022-01-07
参考答案
查看官方参考答案
如搜索结果不匹配,请 联系老师 获取答案
更多“PrivateSubForm_Click()DimxAsIn…”相关的问题
第1题
阅读下列程序并写出程序运行结果。Private Sub Form_Click()Dim x As IntegerStatic y As Integ
阅读下列程序并写出程序运行结果。

Private Sub Form_Click()

Dim x As Integer

Static y As Integer

x = x + 2

y = y + 3

Form1.Print "x="; x, "y="; y

End Sub

写出程序运行时连续单击三次窗体后,Form1上的输出结果。

点击查看答案
第2题
设有一个窗体,内有一个名称为Command1的命令按钮,该模块内还有一个函数过程:

Public Function f(x As Integer)As Integer

Dim y As Integer

x=20

y=2

f=x*y

End Function

Private Sub Command1_Click()

Dim y As Integer

StatiC x As Integer

x=10

y=5

y=f(x)

Debug.Print x;y

End Sub程序运行后,如果单击命令按钮,则在立即窗口上显示的内容是(  )。

A.10 5  B.20 5  C.20 40 D.10 40

点击查看答案
第3题
以下程序:

PublicSubSwap1(ByValxAsInteger,ByValyAsInteger)

DimtAsInteger

t=x:x=y:y=t

EndSub

PublicSubSwap2(xAsInteger,yAsInteger)

DimtAsInteger

t=x:x=y:y=t

EndSub

PrivateSubCommand1_Click()

DimaAsInteger,bAsInteger

a=10:b=20

Swap1a,b

Print"A1=";a,"B1=";b

a=10:b=20

Swap2a,b

Print"A2=";a,"B2=";b

EndSub

当单击命令按钮后,窗体上输出的结果是()

A.A1=20B1=10A2=10B2=20

B.A1=10B1=20A2=20B2=10

C.A1=10B1=20A2=10B2=10

D.A1=20B1=20A2=20B2=10

点击查看答案
第4题
执行下列事件过程,y的值为( )。 Private Sub Command1_Click() x = 3 If x > 10 Then y = x ^ 2 + 3 * x + 2 Else If x > 5 Then y = 3 * x + 2 Else y = 5 End If End If End Sub

A、20

B、11

C、5

D、3

点击查看答案
第5题
用Berg量表评分时,说明患者“平衡功能较好,可独立步行”的评分结果是()。
A.<40分

B.0~20分

C.41~56分

D.21~40分

点击查看答案
第6题
在波士顿矩阵中,代表了企业某项业务的实力,以倍数而不是以百分数表示的指标是()。
A.市场占有率

B.相对市场占有率

C.市场增长率

D.销售收入

点击查看答案
第7题
中国话剧典型的代表性作品有郭沫若的《屈原》、老舍的《茶馆》《日出》、曹禺的《雷雨》《北京人》《原野》等。()

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

点击查看答案
第8题
酵母菌对蛋白质的分解能力较强,因此是导致肉类腐败的主要微生物。()

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

点击查看答案
第9题
某小型律师事务所。有四个律师,三个助手,他们必须有一个保存文档模板的中央存储器,并且每个人均可访问文档模板。同时,他们还需要一个存储各自案件文档的地方,并且各个案件文档只有该案件的律师可以查阅。事务所的一个助手有一些网络管理员知识,其他人均没有,您是否应实施对等网络,为什么是或为什么不是。

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

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

简答题官方微信公众号

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

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

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