首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 【说明】 在一些应用场合中,需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控,拒绝向List列表添加重复信息
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 【说明】 在一些应用场合中,需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控,拒绝向List列表添加重复信息
admin
2009-02-15
68
问题
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。
【说明】
在一些应用场合中,需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控,拒绝向List列表添加重复信息。例如,在List列表中存在元素“a01001;a01002”,如果用户输入数据为“a01001”或“a01002”,系统则弹出提示信息,拒绝将新数据加入List列表;如果用户输入的数据不同于List列表中的任何一个元素,则作为新元素加入List中。VisualBasic界面显示如图所示。根据程序功能说明,完成程序代码。
【代码5-1】
Begin VB.Form Forml
Caption = "List 列表拒绝添加重复信息"
//...窗体描述(略)
Begin VB.CommandButton Command2
Caption = "退出"
//...窗体描述(略)
End
Begin VB.CommandButton Commandl
Caption = "添加"
//...窗体描述(略)
End
Begin VB.TextBox Text1
//...窗体描述(略)
End
Begin VB.ListBox List1
Height = 1860
ItemData = "Form1.fix": 0000
Left = 1020
List = "Form1.fix": 0002
TabIndex = 0
Top = 525
Width = 2580
End
Begin VB.Labe1 Labe11
BackStyle = 0 ’Transparent
Caption = "请输入编号"
//...窗体描述(略)
End
End
【代码5-2】
Attribute VB Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB Creatable = False
Attribute VB PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form Load ()
List1.AddItem "a01001"
List1.AddItem "a01002"
End Sub
Private Sub Cormnand1 Click ()
Dim Myval As Long
For i=0 To (1)
(2)
If (3) Then
MsgBox "系统不允许重复输入,请重新输入"
Exit Sub
End If
(4)
(5)
End Sub
选项
答案
为所有的列表个数;(2)、(3)实现了List列表的内容进行监控,避免重复;(4)为循环控制变量i更新;(5)Lis列表的内容进行监控时数据合格,没有重复,接受。 (1)List1.ListCount-1 (2) List1.ListIndex = i (3) List1.Text = Text1.Text Then (4) Next i (5) List1.Addltem Text1.Text
解析
转载请注明原文地址:https://kaotiyun.com/show/esjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在PowerPoint 2000中,如果要更改幻灯片上对象出现的顺序,应设置“自定义动画”中的(62)。
Windows7文件夹采用___________目录结构
银行的信息非常重要,对信息以及信息处理的安全性要求很高。安全性包括多项任务,但不(24)。
设有关系R、S、T如下所示,则________。
某年级有甲乙两班,在最近举行的全年级数学考试中,甲班平均成绩为P,乙班平均成绩为Q,甲班人数占全年级的比例为α,则全年级的平均成绩为()。
在Excel中,若A1单元格的值为5,在B1单元格输入函数“=A1-10”,则B1单元格的值为______。
操作系统的资源管理功能不包括________________。
在Excel2003中,A1到E6单元格的值如下图所示,若在A7单元格中输入计算众数的函数“=MODE(A1:E6)”,按回车键后,则.A7单元格显示的值为(47)。
某年级两个班举行了一次数学统考,一班(共30人)的平均成绩为70分,二班(共 20人)的平均成绩为75分,则该年级的平均成绩为(65)分。
(1)是固化在主板ROM内的程序,为计算机提供最底层、最直接的硬件访问和控制。
随机试题
______往往专注于一个行业。
随着口腔医学防治水平和人民生活水平的提高,以下哪一类口腔颌面部疾病正在逐年减少
在坝址、地下工程及大型边坡等勘察中,当需详细调查深部岩层性质及其构造特征时,可采用()。
若是外国外交官员要求随团活动,导游员应请示(),严格按我国政府有关规定办理。
简述教育研究方法演进的主要趋势。
试述受贿罪与公司、企业人员受贿罪的界限。
我国为改善农业生产条件,增加农业投入的重要途径有
设f(x)为连续函数,且满足∫01f(xt)dt=f(x)+xsinx,则f(x)=________.
已知某文法G[S]:S→0S0 S→1,从S推导出的符号串可用(25)(n≥0)描述。
GoingGreenAfterGrayVisantoMelina,R.D.,gotthesurpriseofhercareerlastyear,whenSeattle-basedvegetariannutriti
最新回复
(
0
)