首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 【说明】 在一些应用场合中,需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控,拒绝向List列表添加重复信息
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 【说明】 在一些应用场合中,需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控,拒绝向List列表添加重复信息
admin
2009-02-15
84
问题
阅读以下说明和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://www.kaotiyun.com/show/esjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
计算机操作系统的功能不包括_______。
在Excel中,若要计算出B3:E6区域内的数据的最大值并保存在B7单元格中,应在B7单元格中输入______。
数据源有多种,从传感器、智能仪表自动发送过来的数据属于______。
为查看Windows系统当前正在运行哪些应用程序或进程,可用(43)组合键实现。
在Excel中,若A1单元格中的函数为"=IF("教授">"助教",TRUE,FALSE)",按回车键后,A1单元格中的显示内容为______。
下列选项中,具有连接范围窄、用户数少、配置容易、连接速率高等特点的网络是(8)。
在调查某地区各类用户所喜欢的电视栏目时,信息处理技术员小王制作了用户类(U)与电视栏目(V)关系图。下面的示意图描述了五类用户(从上到下U1~U5)与四个电视栏目(从上到下V1~V4)之间的关系:如果某类用户大多喜欢某个电视栏目,则在它们之间画一条连线。从
在Excel2007中,若A1单元格中的值为50,B1单元格中的值为60,若在A2单元格中输入“=IF(OR(A1>=60,B1>=60),"通过","不通过")”,按回车键后,则A2单元格中的值为(47)________________。
鼠标指针的形状取决于它所在的位置以及与其他屏幕元素的相互关系。在文字处理的文本区域,指针就像(),指向当前待插入字符的位置。
随机试题
Wewerelateasusual.Myhusbandhad【C1】______wateringtheflowersinthegardenbyhimself,andwhenhediscoveredthatheco
细胞未受刺激时存在于细胞内外两侧的电位差为
王先生,68岁,肺癌晚期,入院后了解到病情后,情绪异常,抱怨家人不关心,指责医护人员不尽力,在治疗护理中配合差。请问:针对患者的特殊心理反应,护士应如何护理?
药用部位为内壳的中药材是
某省的药品经营企业在发布感冒药的广告时,发现其内容存在虚假违法的内容。对于该企业的处罚部门是()。
在与治理层沟通时,下列说法中,错误的有()。
下列选项中,不属于从基本形态对设计进行分类的是()
2011年,某市工业企业(规模以上,下同)用水总量193.27亿立方米,比上年减少1.66亿立方米。其中,取水总量41.26亿立方米,增加0.57亿立方米;河湖海冷却水86.25亿立方米,增加1.09亿立方米。2011年该市工业企业
16位真彩色显示器可显示的颜色种数为()。
设f(x)在[0,1]上连续,在(0,1)内可导,f(0)=0,f(1)=0.证明:对任意的k∈(-∞,+∞),存在ξ∈(0,η),使得f’(ξ)-k[f(ξ)-ξ]=1.
最新回复
(
0
)