网友您好，请在下方输入框内输入要搜索的题目：

搜题

题目内容（请给出正确答案）

提问人：网友bingleng9900 发布时间：2022-01-06

[主观题]

在窗体上添加一个命令按钮，然后编写如下事件过程：Phvate Sub Commanl_Click（)Dima（10)As Integer

在窗体上添加一个命令按钮，然后编写如下事件过程： Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程

A．35

B．33

C．31

D．29

简答题官方参考答案（由简答题聘请的专业题库老师提供的解答）

查看官方参考答案

更多“在窗体上添加一个命令按钮，然后编写如下事件过程：Phvate Sub Commanl_Click（)Dima（10)As Integer”相关的问题

第1题

在窗体上添加一个命令按钮(名为Cmd)，然后编写如下事件过程：

Private Sub Cmd_Click()

Dim sum,k

For k=1 to 6

sum=30+k

Next k

MsgBox sum+k

End Sub

打开窗体后，单击命令按钮，消息框的输出结果是【】。

点击查看答案

第2题

在窗体上添加一个命令按钮Command1，并编写下列事件过程： Private Sub Command1_Click() x = 0 n = 0 Do Until x > 10 x = (x + 1) ^ 2 n = n + 1 Loop End Sub 程序运行时，单击Command1按钮，则n和x的值分别是（）。

A、3和25

B、2和16

C、3和36

D、4和49

点击查看答案

第3题

在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim m(10) As Integer, n(10) As Integer i = 3 For t = 1 To 5 m(t) = t n(i) = 2 * i + t Next t Print n(i); m(i) End Sub 窗体运行后，单击命令按钮，显示结果为（）。

A、3 11

B、3 15

C、11 3

D、15 3

点击查看答案

第4题

窗体中有命令按钮cmd1，对应的事件代码如下： Private Sub cmd1_Enter() 　　Dim num As Integer,a As Integer,b As Integer,i As Integer 　　For i = 1 To 10 　　　　num = InputBox("请输入数据：","输入") 　　　　If Int(num/2) = num/2 Then 　　　　　　a = a + 1 　　　　Else 　　　　　　b = b + 1 　　　　End If 　　Next i 　　MsgBox("运行结果：a=" & Str(a)& "，b=" & Str(b)) End Sub 运行以上事件过程，所完成的功能是(　　)。

A、对输入的10个数据求累加和

B、对输入的10个数据求各自的余数，然后再进行累加

C、对输入的10个数据分别统计奇数和偶数的个数

D、对输入的10个数据分别统计整数和非整数的个数

点击查看答案

第5题

在运行程序的过程中，当执行“复制”(mnuEditCopy)命令时，使“粘贴”(munEditPaste)命令变为可用，则应做如下处理()。

A．Private Sub nuEditPaste_Click() …… mun EditPaste.Enable=True End Sub

B．Private Sub mnuEditCopy click …… muEditPaste.Enable=True End Sub

C．Privat Sub munEditPaste_Click() …… mnuEditPaste.Visible=Tme End Sub

D．Private Sub munEditCopy_ClicK() …… munEditPaste.Visible=Tme End Sub

点击查看答案

第6题

如果要在菜单中添加一个分隔线，则应将其Caption属性设置为()。

A．=

B．*

C．&

D．-

点击查看答案

第7题

如果要在菜单中添加一个分隔线，则应将其Caption属性设置为()。

A．=

B．*

C．&

D．-

点击查看答案

第8题

确定一个控件在窗体上的位置的属性是()。

A．Width和Height

B．Width或Height

C．Top和Left

D．Top或Left

点击查看答案

第9题

确定一个控件在窗体上的位置的属性是()。

A．Width和Height

B．Width或Height

C．Top和Left

D．Top或Left

点击查看答案

第10题

在程序代码中将图片文件mypic.jpg装入图片框Pictruel的语句是()。

A．Picture1.Picture="mypic.jpg"

B．Picture1.Image="mypic.jpg"

C．Picture1.Picture=LoadPicture("mypic.jpg")

D．LoadPicture("mypic.jpg")

点击查看答案

账号：尚未登录

登录没有账号？去注册

搜题记录

联系客服

购买搜题卡

考试指南全部 >

报考湖南成人高考艺术类专业注意事项! 2024年自考准考证打印入口官网有什么注意事项 2024年自考大专报名需要中专毕业证吗都要哪些材料湖南成人高考艺术类专业录取控制分数线划定方式？初中可以自考本科文凭吗报考要求有哪些考生报名2024年湖南成人高考要趁早，注意改革变化! 2024年自考本科报名限制学历吗流程步骤是什么 2024年考自考大专要具备什么学历有哪些要求 2024年初中学历去自考大专怎么报名需要什么条件 2024年湖南成人高考录取查询时间！

购买搜题卡查看答案

购买前请仔细阅读《购买须知》

请选择支付方式

微信支付

支付宝支付

点击支付即表示你同意并接受《服务协议》和《购买须知》

立即支付已付款，但不能查看答案，请点这里登录即可>>

搜题卡使用说明

1. 搜题次数扣减规则：

功能	扣减规则
功能	基础费（查看答案）	加收费（AI功能）
文字搜题、查看答案	1/每题	0/每次
语音搜题、查看答案	1/每题	2/每次
单题拍照识别、查看答案	1/每题	2/每次
整页拍照识别、查看答案	1/每题	5/每次