首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有工程文件sjt3.vbp,控件及其属性见窗体文件。 程序功能为:单击窗体,则先把数据集读入数组arr,再根据用户输入的值删除数组中对应的元素,并提示操作结果。删除元素分为三步完成:首先查找到要删除的元素,其次将其后续元素顺次前移,最后
考生文件夹下有工程文件sjt3.vbp,控件及其属性见窗体文件。 程序功能为:单击窗体,则先把数据集读入数组arr,再根据用户输入的值删除数组中对应的元素,并提示操作结果。删除元素分为三步完成:首先查找到要删除的元素,其次将其后续元素顺次前移,最后
admin
2019-08-21
63
问题
考生文件夹下有工程文件sjt3.vbp,控件及其属性见窗体文件。
程序功能为:单击窗体,则先把数据集读入数组arr,再根据用户输入的值删除数组中对应的元素,并提示操作结果。删除元素分为三步完成:首先查找到要删除的元素,其次将其后续元素顺次前移,最后将数组大小减1。
请将程序代码中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释“’”,将问号改为正确的内容。 参考答案(画横线部分是需要填入的内容) Private Sub Form_Click() Dim art() Dim x As Single Dim i As Integer,j As Integer art=Array(23,6,9,12,5,8,20,35,65,2,46,56,200,10,7) For i=LBound(aiT)To UBound(nit) Text1.Text=Text1.Text+Str(arr(i)) Next i x=Val(InputBox("输入要删除的值:",,0)) For i=LBound(an.)To UBound(arr) If x=
arr(i)
Then For j=i+1 To UBound(nit) arr(j-1)=
arr(j)
Next j
ReDim Preserve
arr(LBound(arr)To UBound (arr)-1) For k=LBound(arr)To UBound(arr) Text2.Text=Text2.Text+Str(arr(k)) Next k MsgBox"已完成删除操作!"
Exit Sub
End If Next i MsgBox"找不到删除的元素!" End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过For循环把数组alT中的数值依次显示在textl中;Val函数把输入的字符串转化为数值类型;将输入的需要删除的数据与art数组中的每一个数进行比较,若相等,则把该数后面的每一个数依次向前移动一个位置,数组长度减1,此时需要重新分配数组的长度,如果不加Preserve选择项,会清除数组中的内容;找到所需删除的元素,进行相关的操作后,需要退出该事件。
转载请注明原文地址:https://kaotiyun.com/show/aOUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
设有如下语句:Dima,bAsIntegerc="VisualBasic"d=#7/20/2005#以下关于这段代码前叙述中,错误的是
窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框,窗体的单击事件过程如下:PrivateSubForm_Click()CD1.DialogTitle="改变颜色":CD1.Color=Form1.BackColorC
为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”,若通过程序设置该标题,则应使用的语句是
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandl_Click()DimmAsStringm=InputBox("请输入字符串")Printpick_str(m)En
以下关于数组的叙述中,错误的是
下列关于通用对话框CD1的叙述中,错误的是()。
设x为一整型变量,且情况语句的开始为:SelectCasex,则不符合语法规则的Case子句是()。
在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsii5.frm)。窗体Form1上有两个名称为Labl和Lab2的标签,它们的标题分别为“密码"和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和T
以下数据结构中,属于非线性数据结构的是()。
随机试题
研究者在某种程度上置身于观察对象的环境和社会活动中,努力使自己真正地与被研究群体相通,通过亲身感受和观察,直接获取资料的方法是【】
唐宋派
简述人力资源的内涵。
对前置胎盘患者进行检查,下面叙述正确的是
调剂室工作人员收集患者ADR信息的目的不是
下列不属于物权变动的原则的是()。
安全规章制度日常管理的重点是在执行过程中的(),确保得到贯彻落实。
脚手架及其地基基础的检查和验收阶段有()。
三个中国学生张林、赵强、李珊和三位外国留学生约翰、杰西、安娜暑假外出旅游。可供选择的旅游地有西安、杭州、大连和张家界。已经知道:(1)每人只能去一个地方;(2)凡是有中国学生去的地方,就必须有外国留学生去;(3)凡是有外国留学
=___________.
最新回复
(
0
)