- 2
- 0
- 约3.38千字
- 约 3页
- 2018-03-13 发布于河南
- 举报
VB计算机二级培训重点概要2
第四讲 常用控件
重点1:图片框(Picture1)与图像框(Image1)
(1)图像框(Image1)和图片框(Picture1)的区别
① 图片框是容器类控件② 图片框可以通过Print方法接收文本
③ 图像框比图片框占用的内存少,显示速度快
(2)图形文件装入
① 利用属性窗口装入② 在设计阶段装入:
对象.Picture=LoadPicture(“绝对路径”)
对象.Picture=LoadPicture(App.Path + “\文件名.文件类型”)
③ 删除控件上的图片:对象.Picture=LoadPicture(” ”)
重点2:单选按钮(Option1)与复选框(Check1)
是否被选中属性:Value
If Option1.Value= True Then ‘该单选按钮被选中
If Check1.Value=1 then ‘该复选框被选中
重点3:列表框(List1)与组合框(Combo1)
属性:(1)List:列表(输入时按Ctrl+回车直接输入多条)。是一个数组。
例题:在属性窗口中设置List1的List属性为北京、上海、沈阳、鞍山。
Text1.text=list1.list(2) 则Text1中显示 沈阳。
注:list1.list(n)表示第n条条目内容(n从0开始)。
List1.list(1)=”营口” ‘上海变成营口。
(2)ListCount:条目的个数
Text1.text=list1.ListCount 答案:4
(3)ListIndex:最后一次选中条目的下标(序号)
***从0开始。
选中 沈阳,Text1=list1.ListIndex 答案:2
没有选中任何条目,则 ListIndex为 -1.
If List1.ListIndex=-1 then
MsgBox “请先选择一个条目!”
Endif
(4)Text 最后一次选中的条目内容
***可以读取,不可以更改
Text1 = List1.Text
Text1 = List1.List(List1.ListIndex)
等价,Text1中显示List1选中条目的内容
List1.Text = 营口
List1.List(List1.ListIndex) = 营口
不等价,前者无法更改,后者可以将选中内容更改为营口。
(5)MultiSelect:多选。不是True和False。
0、1、2 .一般设置为2,shift连续多选;Ctrl断续多选。
选中鞍山,然后按ctrl单击上海,执行Text1=list1.Text 则text1中为上海。
(6)SelCount选中条目的个数
(7)selected 某条目是否被选中(选中-True;未选中-False)。
选中 沈阳,执行 text1=list1.selected(2) ‘Text1中是 True。
方法
(1)增加条目addItem
addItem “内容” [,下标] 省略下标,加在末尾。
将abc增加在最上面 list1.addItem abc,0
将text1中内容追加到list1末尾 List1.AddItem Text1.Text
(2)删除条目 RemoveItem
RemoveItem n ‘ n从0开始
(3)清除全部条目 Clear
移去选中的条目 List1.RemoveItem List1.ListIndex
移去最后一个条目List1.RemoveItem List1.ListCount - 1
删除Text1中指定内容的条目
分析:从最上面的条目(0)到最后一个条目(list1.listCount-1)逐一判断(第i条)内容是否与text1中相同,如果相同则移去 该条目。
For i=0 To List1.ListCount-1
If List1.List(i)=Text1.text then
List1.RemoveItem i
Endif
Next i
重点4:文本控件:文本框(Text1)和标签(Label1)
标签上显示文本内容:Label1.Caption=”计算机二级”
文本框上显示文本内容:Text1.Text=”计算机二级”
例:
Text1.text=”abcdefghi” : Text1.SelStart=3 :Text1.SelLength=2 : Text2.text=text1.SelText
最后显示结果:de
重点5:命令按钮(Command1)
您可能关注的文档
- 中心四年级语文教学质量分析.doc
- 中层生的培养策略.doc
- 人性论在中国的发展.doc
- 中学计算机设备维护维修管理制度.doc
- 中学电子备课室使用管理制度.doc
- 产能过剩价狂跌 河南调整电价救铝企.doc
- 产妇吃什么下奶.doc
- 中学班会优秀课件:初三,梦想从这里起航.doc
- 中学生如何写好作文.doc
- 五邑大学 c语言试卷4.doc
- 商业航天的融资渠道与风险研究_2026年1月.docx
- 智慧路灯与城市安防联动布控策略研究_2026年1月.docx
- 元宇宙实验室在工科教学中的沉浸效果评估_2026年1月.docx
- 某公司获国际海底管理局许可采矿但环保组织抗议破坏未知生态系统_2026年1月.docx
- 2026年及未来5年市场数据中国网约车行业发展前景预测及投资战略研究报告.docx
- 2026年及未来5年市场数据中国网络零售产业竞争现状及十五五投资动向研究报告.docx
- 2026年及未来5年市场数据中国卫星通信设备行业市场需求与投资战略规划分析报告.docx
- 2026年及未来5年市场数据中国卫星导航市场竞争力分析及投资战略预测研发报告.docx
- 2026年及未来5年市场数据中国网络教育行业前景研究与投资战略研究报告.docx
- 2026年及未来5年市场数据中国微型滤波器行业市场专项调研及投资前景可行性预测报告.docx
原创力文档

文档评论(0)