首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设计如图3-6所示的表单(列表框应用):在文本框中输入内容,单击“确定”按钮加入到列表框中,对于重复内容,列表框中只列出一项。在列表框中选定项,该选项自动显示在另一个文本框中,选中的项目可删除。当未在列表框中选定项时,“删除”按钮和“全部清除”按钮不可用。
设计如图3-6所示的表单(列表框应用):在文本框中输入内容,单击“确定”按钮加入到列表框中,对于重复内容,列表框中只列出一项。在列表框中选定项,该选项自动显示在另一个文本框中,选中的项目可删除。当未在列表框中选定项时,“删除”按钮和“全部清除”按钮不可用。
admin
2009-02-15
58
问题
设计如图3-6所示的表单(列表框应用):在文本框中输入内容,单击“确定”按钮加入到列表框中,对于重复内容,列表框中只列出一项。在列表框中选定项,该选项自动显示在另一个文本框中,选中的项目可删除。当未在列表框中选定项时,“删除”按钮和“全部清除”按钮不可用。
选项
答案
操作步骤如下: ①在表单中创建2个“标签”控件、2个“文本框”、1个“列表框”控件和4个 “命令按钮”控件,并选择好位置和大小。 ②设置控件的字体和字号。 ⑧表单控件的主要属性见表3-2。 [*] ④添加列表框Listl的Click事件代码,该事件代码如下: for i=l to this.listcount if this.selected(i) thisform.text2.value=this.list(i) endif endfor thisform.command2.enabled=.t. ⑤添加“确定”按钮Command1的Click事件代码,该事件代码如下: thisform.listl.additem(alltrim(thisform.textl.value)) thisform.listl.refresh thisform.textl.value=" " thisform.textl.setfocus() thisform.command3.enabled=.t. thisform.command4.enabled=.t. ⑥添加“删除”按钮Command3的Click事件代码,该事件代码如下: for i=l to thisform.listl.listcount if thisform.listl.selected(i) tid=i endif endfor =messagebox ( "第"+str (tid, 2) +’已被选中’, 0+16+64, "删除") thisform.listl.removeitem(tid) =messagebox ("此条信息已被删除", 0+16+64, "确定" ) if thisform.listl.listcount=0 thisform.command3.enabled=.f. thisform.command4.enabled=.f. thisform.text2.value=’’ return endif if thisform.listl.listcount>=tid thisform.listl.selected(tid)=.t. else thisform.listl.selected(thisform.listl.listcount)=.t. endif thisform.text2.value=thisform.listl.list(tid) thisform.listl.gotfocus() ⑦添加“全部清除”按钮Conunand4的Click事件代码,事件代码如下: for i=thisform.listl.listcount to 1 setp -1 thisform.listl.removeitem(i) endfor thisform.command3.enabled=.f. thisform.command4.enabled=.f. thisform.text2.value=’’ thisform.listl.refresh ⑧添加“退出”按钮Command5的Click事件代码,事件代码为; release thisform
解析
转载请注明原文地址:https://kaotiyun.com/show/tqKZ777K
本试题收录于:
二级VF题库NCRE全国计算机二级分类
0
二级VF
NCRE全国计算机二级
相关试题推荐
将Cisso6500第4模块第1端口的通信方式设置为半双工,第2~24端口的通信方式设置为全双工,以下交换机的端口配置,正确的是()。
下图是网络地址转换NAT的一个实例,根据图中信息,数据包2中的目的地址和目的MAC地址分别为()。
下列选项中,不属于Winmail邮件服务器系统设置功能的是()。
如下图所示,网络站点A发送数据包给B,在数据包经过路由器转发的过程中,封装在数据包3中的目的IP地址和目的MAC地址是()。
在Cisco路由器的内存中,主要用于存储启动配置文件(startup-config)或备份配置文件的可读写存储器是()。
使用Outlook创建邮件帐户时,不能选择的邮件接收服务器类型是()。
为“数量”字段增加有效性规则:数量>0,应该使用的SQL语句是【】,ABLE使用零件【】数量SET【】数量>0建立一个由零件名称、数量、项目号、项目名称字段构成的视图,视图中只包含项目号为“s2”的数据,应该使用的SQL语句是CR
在VisualFoxPro中参数传递的方式有两种,一种是按值传递,另一种是按引用传递,将参数设置为按引用传递的语句是:SETUDFPARMS【】。
下列关于数据结构的叙述中,正确的是______。
下列关于队列的叙述中正确的是_________。
随机试题
建筑材料对火灾的影响不包括()。
再生障碍性贫血的诊断标准?
胸腔积液病因的描述,哪项是恰当的
女,35岁。原发性甲亢,术前用碘剂及硫氧嘧啶类治疗无效,改用普萘洛尔(心得安)后有效。术前用苯巴比妥钠及阿托品,术中患者心率增加到163次/分,原因是
海藻的药用部位为冬虫夏草的药用部位为
法的规范作用包括()。
商品房预售的条件包括()。
以下是初二思想品德课教材案例:张先生和妻子、儿子一家三口住着一套三室两厅的房子,而张的父母却住在一间旧平房里。张父退休金较少,张母无收入,二人生活困难。当父母要求儿子张先生给予一定生活补助时,张先生以其父母没有照料过他的孩子为由,拒付赡养费。老人
所谓教育,主要是指法制教育,要求被教育者必须懂法、守法,不得以任何借口逃避、拒绝教育。()
Nearlyacenturyago,biologistsfoundthatiftheyseparatedaninvertebrateanimalembryointotwopartsatanearlystageof
最新回复
(
0
)