首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp。窗体左边的图片框名称为Picture1,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
在考生目录下有一个工程文件sjt5.vbp。窗体左边的图片框名称为Picture1,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
admin
2020-02-27
42
问题
在考生目录下有一个工程文件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=0 To 5 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://kaotiyun.com/show/5GTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列数组定义中错误的是()。
有如下程序:PrivateSubForm—Click()DimSAsStringS=InputBox(“请输入一个字符串:”)Fori=1ToLen(S)\2IfMid(S,i,1)Mid(S,Len(S)一i+1,1)Then
通过一个属性可以获得文件列表框中当前被选中文件的文件名,这个属性是()。
下列叙述中正确的是()。
表示“x+y小于10且x—y大于或等于6”的VisualBasic表达式是()。
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在数据库系统的组织结构中,下列()映射把用户数据库与概念数据库联系了起来。
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数
在E—R图中,用来表示实体联系的图形是()。
随机试题
TCP协议是攻击者攻击方法的思想源泉,主要问题存在于TCP的三次握手协议上,以下哪个顺序是正常的TCP三次握手过程11.请求端A发送一个初始序号ISNa的SYN报文;32.A对SYN+ACK报文进行确认,同时将ISNa+1,ISNb+1发送给B
波士顿矩阵
设f(x)为连续函数,则∫f(t)dt=【】
[2008年第142题]按照现行《医院洁净手术部建筑技术规范》的要求,洁净手术室分为四个等级,下列洁净用房等级对应的参考手术正确的是:
对问题的表征包括问题的表面特征和深层特征,其中——是解决问题的关键。
已知α=(3,5,7,9),β=(-1,5,2,0),x满足2α+3x=β,则x=________.
Themajorityofthepopulationintheworldmightdrinkonlytwolitersofwateraday,buttheyconsumeabout3,000litersada
Inapurelybiologicalsense,fearbeginswiththebody’ssystemforreactingtothingsthatcanharmus—theso-calledfight-or-
OnJuly1,1859,fourmen,abundantlysuppliedwithprovisions,startedonatripbyballoonfromSt.LouistoNewYork,at7:30
Theycallthemthenewbreadearners.Theyarewomen,andtheyaresettotakeover.Womenarebeginningtorise【C1】______to
最新回复
(
0
)