简介 INTRODUCTION
listbox列表框控件和combobox组合框控件的用法类似,只是界面风格不同。
课题04 列表框和自动输入框的综合使用
授课:刘金玉
回顾知识,符合以下要求任务练习学生管理功能模块:
1.界面制作
2.功能开发
课程目标:VB基础:掌握listbox和combobox控件的应用
理解:listbox列表框控件和combobox组合框控件的用法类似,只是界面风格不同。
1.增加 additem方法
要求能够将添加的项目,添加到指定的位置。
additem 参数1,参数2
参数1:需要加入的项目内容
参数2:加入的位置(索引位置,默认索引从0开始)
val函数:可以将字符串类型转为数值类型。
使用方法:val(字符串) 将返回一个数值类型的数据
val详解:从字符串的左侧开始检测是否是数字,直到检测到非数字位置,将检测到的数字转为数值。
字符串的值:
1)空 结果是 0 字符串""就是空
2)"123" 结果是123
3)"aaa" 结果是0
4) "aa22"结果是0
5)",12"结果是0
6)"66abc"结果是66
7)"66abc77"结果是66
8)"刘金玉123"结果是0
9)"567编程"结果是567
10)" "结果是0
pictruebox中打印文字,需要加上控件的名称。
对比在form窗体打印:print "内容"
在pictruebox中打印:picture1.print "内容"
写代码基本要求:
不同层次的代码要求缩进一个tab
一个tab相当于4个空格
符号表示:
integer % 整型 dim i% 相当于 dim i as integer
string $ 字符串型(文本型)
long & 长整型
single ! 单精度浮点型
double # 双精度浮点型
如何测试变量的数据类型?
通过使用方法TypeName(变量),返回数据类型。
获取listbox列表框控件的项数:listcount方法
通过索引获取列表框中指定项的文本:list(索引) 方法
案例:遍历列表框中的所有项目
Dim i%
For i = 0 To List1.ListCount - 1 Step 1
Picture1.Print List1.List(i)
Next i
提高:将姓名列表输出到pictruebox中的一行上?
只需要结合符号分号;
以下方法的使用,这两个控件都一样:
2.移除 removeItem方法
3.清空 clear方法
4.修改 = 移除+插入
5.插入 additem使用第二个参数定位
6.统计项数 listcount
目标实现案例:
学生管理模块
软件设计界面:
源代码分享:
OptionExplicitPrivateSub Command1_Click()IfText5.Text = "" ThenCombo1.AddItemText1.TextElseCombo1.AddItemText1.Text, Val(Text5.Text)EndIfEndSubPrivateSub Command2_Click()Combo2.AddItemText2.TextEndSubPrivateSub Command3_Click()IfText4.Text = "" ThenList1.AddItemText3.TextElseList1.AddItemText3.Text, Val(Text4.Text)EndIfEndSubPrivateSub Command5_Click()MsgBoxVal(" ")EndSubPrivateSub Command6_Click()'Picture1.Print"刘金玉"Dimi%Fori = 0 To List1.ListCount - 1 Step 1Picture1.PrintList1.List(i)NextiEndSubPrivateSub Command7_Click()Dima#MsgBoxTypeName(a)EndSub
举报/反馈

刘金玉编程

1.1万获赞 4868粉丝
一个逗比计算机老师。
中小学教师,刘金玉,优质教育领域创作者
关注
0
0
收藏
分享