首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp。窗体左边的图片框名称为Picture1,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
在考生目录下有一个工程文件sjt5.vbp。窗体左边的图片框名称为Picture1,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
admin
2017-03-27
24
问题
在考生目录下有一个工程文件sjt5.vbp。窗体左边的图片框名称为Picture1,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文本框Text1以及四个标签,如图3—50(a)所示。
程序运行时,可以用鼠标拖拽的方法把右边的物品放到左边的图片框中(右边的物品不动),同时把该物品的价格累加到Text1中,如图3—50(b)所示。最多可放六个物品。
实现此功能的方法是:程序刚运行时,Picture1中的图片框数组不显示,当拖拽一次物品时,就显示一个图片框数组元素,并在该图片框数组元素中加载相应的图片,产生物品被放入的效果。
文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹下的工程文件sjt5.vbp。 步骤2:在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Select Case Source.Name For k=0To5 If Pic(k).Visible=False Then Pic(k).Visible=True Text1=Text1+a 步骤3:按要求将文件保存至考生文件夹中。
解析
控件的DragDrop事件有三个主要参数,其中,“Source”参数是一个对象变量,类型为“Control”,包含被拖动对象的属性,“X”和“Y”参数是放下对象时鼠标光标的位置。本题中为了判断拖动的是哪一个图片,因此需要判断Source参数的Name属性。当拖动的图片确定,则在控件数组中显示的图片以及需要累加的价格也随之确定。
由于控件数组共有6个数组元素,因此应该在拖放事件中进行一个6次的循环,在每次循环中判断数组元素是否已经被显示出来,如果没有被显示出来则令其Visible属性为True,然后退出循环,这样可以实现序号由小到大每次显示一个图片的效果。
转载请注明原文地址:https://jikaoti.com/ti/IOy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列不能打开菜单编辑器的操作是()。
当一个工程含有多个窗体时,其中的启动窗体是______。
数据结构分为逻辑结构和存储结构,循环队列属于【】结构。
有如下程序:FunctionF(aAsInteger)b=0StaticCb=b+1c=c+2F=a+b+cEndFunctio
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括______。
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
对话框在关闭之前,不能继续执行应用程序的其他部分,这种对话框属于()。
产生[10,27]之间的随机整数的VisualBasic表达式是
结构化程序设计主要强调的是______。
为了定义自己的鼠标光标,首先应把MousePointer属性设置为【】,然后把【】属性设置为一个图标文件。
随机试题
(2021年聊城莘县)()是指在适当情况下,心理辅导教师公开有关自己的类似经验,与学生一起分享,以此帮助学生对自己的态度、情绪和行为后果有进一步的了解,并且从中得到积极的启示。
在驾驶员、接线员、银行出纳员等人群中,高血压的患病人数增加,此病属于
丙泊酚与硫喷妥钠的心血管作用不同点是
边界层分离不会:
记账凭证财务处理程序、汇总记账凭证账务处理程序和科目汇总表财务处理程序的相同点包括()。
精神上的贫困,往往比物质上的贫困更可怕。有些贫困地区和贫困村多年来扶而不起、帮而不富、助而不强,与缺乏穷则思变、穷则思勤的奋斗精神有一定关系。有些地方主动“返贫”,乐当贫困县,不愿摘穷帽子,有的贫困户发展农副产业不积极,争当低保户却很积极,从中都能发现“
“五条禁令”自( )起施行。原有规定与“五条禁令”不一致的,以“五条禁令”为准。
请观察下面这幅漫画,谈谈你对这个问题的认识。
Cache的中文译名是
Readthetextsinwhichfivepeopletalkedabouttheirviewsaboutsuccess.Forquestionsto65,matchthenameofeachperson(
最新回复
(
0
)