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

在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base 1 Private Sub Comma

nd1_Click() Dim c As Integer , d As Integer d = 0 c = 6 X = Araay(2,4,6,8,10,12) For i = 1 To 6 If X(i)> c Then d = d + X(i) c = X(i) Else d = d - c End If Next i Print d End Sub程序运行后,单击命令按钮,则在窗体上输出的内容为A. 10 B. 12 C. 16 D. 20

提问人:网友neo861103 发布时间:2022-01-07
参考答案
查看官方参考答案
如搜索结果不匹配,请 联系老师 获取答案
更多“在窗体上放置一个命令按钮Command1,并编写下列单击事件…”相关的问题
第1题
富文本框的SelectionFont属性可以用来设定一部分内容的字体
点击查看答案
第2题
在文本框Text1和Text2中分别输入3和4,单击按钮Command1,则标签Label1中显示( )。 Private Sub Command1_Click() Label1.Caption = Fun(Text1.Text, Text2.Text) End Sub Function Fun(m As Integer, n As Integer) As Integer Fun = m*m + n*n End Function

A、12

B、3

C、4

D、25

点击查看答案
第3题
下列关于Visual Basic的颜色表示中,( )是错误的。

A、vbRed

B、RGB(0, 0, 0)

C、RGB(255, 0, 0)

D、RGB(-255, 0, 0)

点击查看答案
第4题
下载”实验八.RAR“附件,并在自己电脑上解压(解压密码007),打开其中的实验八.pdf,完成其中的”二、实验内容1、2、3“中的5道设计题。完成后以压缩文件的格式提交到系统上,压缩文件名为学号+实验八(如:2401007实验八.rar或2401007实验八.zip)
点击查看答案
第5题
指定二进制方式读写文件,应在Open语句中使用( )模式。

A、Binary

B、Append

C、Outpu

D、Decimal

点击查看答案
第6题
可以将Form1窗体隐藏的语句是( )

A、Form1.Show

B、Form1.Hide

C、Form1.Cls

D、Form1.Unload

点击查看答案
第7题
要指定对话框CommandDialog1为"另存为"文件类型,程序代码为( )。

A、CommandDialog1.ShowOpen

B、CommandDialog1.ShowFont

C、CommandDialog1.ShowSave

D、CommandDialog1.ShowPrinter

点击查看答案
第8题
改变驱动器列表框的Drive属性值将激活( )事件。

A、Change

B、KeyPress

C、Scroll

D、KeyDown

点击查看答案
第9题
要在窗体form1中,显示弹出式菜单EGM,正确的代码是( )。

A、form1.print egm

B、form1.menu=egm

C、form1.popupmenu egm

D、form1.value=egm

点击查看答案
第10题
下列不属于VB默认的20种标准控件的是( )。

A、列表组合框

B、驱动器列表框

C、文件列表框

D、通用对话框

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

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

简答题官方微信公众号

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

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

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