VB学习一
一、基础函数
CStr()
函数转化表达式为一个字符串
Trim()
移除字符串两侧的空白字符串或者其他预定义字符
成功:返回删除后的字符串
失败:返回空字符串
VBA.Mid(string,start,length)
用来在文本(string)的第几(start)位开始取几个(length)字符的函数
String:
所要截取字符串
Start:
数字,从左数第几个
Length:
数字,取几个,可省略
Space(n)
用来添加空格,n为空格数目
Len(str)
测量一个字符串(str)中的字符数量
LenB(str)
测量一个字符串(str)中的字节数量
StrConv(string,conversion,LCID)
返回按指定类型转换的结果
String: 要转换的字符串
Conversion: 其值决定转换类型
LCID: 可选
Left(str,n)
左起第一位开始取值,向右取n位
Str:所取的字符串
Vbcr:
回车
Format(expression,fmt)
格式化输出函数,将expression按照fmt的格式输出
ByRef 与ByVal区别:
ByVal是值传递:
ByRef是地址传递:在调用前必须赋值,out参数作为输出参数在调用前不一定被赋值,正常返回前必须被赋值
While…….Wind语句
C语言中的while循环
MidB(源字符串,起点,长度):
返回其中部分字节的字符串
UBound(a()):
函数返回一个数组中的最大下标,数据类型为long
LBound(a()):
函数返回一个数组中的最小下标,默认为0
ReDim Preserve VCards(UBound(VCards) + 1)
重新定义扩展一个数组且保留原来数组的数据,VCard为数组名称
Val():
将数字字符串换成数值
CSTR():
将数字表达式换成字符串
Mod(n1,n2):
求余数
RaiseEvent+函数
在事件中函数未定义,提供在外部写函数的程序
DoEvents
转让控制权,在循环语句中可以做其他的事
Ucase()
用来将小写字母转化为大写字母
Debug.Print
在编程过程中从立即窗口获得某一结果
ParamArray()
用在函数形式参数最后一个参数,是个没有大小的数组
For循环
For Each 成员 in 数组
[语句组]
Next 成员
二、控件使用
a、Timer控件使用:
1、属性
Interval: 时间间隔,以毫秒为单位
Enable:控制是否可用,T\F
2、方法:Timer
整体像一个循环,在一定时间内触发
b、ComboBox控件用法:
1、样式:Style
常数为0:下拉式组合框
常数为1:简单组合框
常数为2:下拉式列表框
分开详述
下拉式组合框:可以输入文本,也可以单击右键选择,选中显示
简单组合框:可以输入文本,也可以单击右键选择,任何时候都显示
下拉式列表框:必须选择,不可以输入,选中显示
2、添加项目
ComboBoxName.Items.Insert(index As integer,item As Object)
Comboboxname 列表框名称
Item 添加的字符串,用“”
Index 指定新项目在列表中的位置
如果在第一个位置添加项目,可以combobox.Items.Add(item As Object)
3、列表排序
Sorted属性设置为True 在列表中按照字母排序
4、删除项目
ComboBoxName.Items.Remove(index)
删除指定索引位置的条目
删除所有,用ComboBoxName.Clear
5、用text属性获取列表内容
ComboBoxName.Text可以是输入或者选中的内容
6、Item属性访问列表选项
该属性包含一个数组,每个项目都是数组的元素。
引用列表中的项目,使用:
ComboBoxName.Items(index)
顶端索引为0,以此类推
在文本框中显示列表的第三个项目:Text1.Text=CStr(ComboBox1.Items(2))
7、用SelectIndex属性判断位置
该属性设置或者返回控件中当前选定项目的索引值,只在运行有效
对于该属性的设置也会触发Click事件
如果没有为-1
8、Items.Count属性返回项目数
c、ListBox控件用法:
1、 添加新项目
ListBoxName.AddItem 项目名称(索引)
项目名称为字符串表达式
索引为数值,第一个为0,缺省插入最后,Sorted为False
2、 删除项目
ListBoxName.RemoveItem(Index)
删除所有为ListName.Clear
3、 插入项目
ListItemName.Items.Insert(Index,”字符串”)
4、属性
(1)、List 包含字符串数组
s$=listName.list(Index)
(2)、ListCount返回列表框中的项目总数
(3)、Columns 指定列表框中的列数
0:以滚动单列单列显示
1:以水平滚动单列显示
大于1:水平滚动多列方式显示
(4)、MultiSelect 表明是否允许用户从列表框中选定多个项目以及选定的方式
0:只允许选择一个
1:允许通过单击或者按下空格选定、撤销多个项目
2:允许使用shift和ctrl组合操作
Object.MultiSelect = [Number]
(5)、Sorted 排序
True 按照字母
(6)、Style 显示样式
0:标准
1:项目前加复选框
(7)、Selected 数组
为True 或者False 决定是否选择了该项
ListBoxName.Selected(Index)=True|False
(8)、MultiColumn 指示是否以水平方式在列表框中显示
False 显示为一列
True 多列形式显示
(9)SelectedItems、SelectedItem、SelectedIndex
与列表框中的项有关
SelectedItems 返回当前选定的项的集合
SelectedItem 返回ListBox中选定的第一项
SelectedIndex 返回SelectedItem在列表框中的索引
d、Toolbar控件用法:
1、 功能
加入按钮,载入图像、设置标题、提示字符串
按钮分组,Style属性
加入组合框等控件
AllowCusomize属性允许用户在程序运行中
双击工具条对其中内容进行裁剪
2、 添加控件
Align属性改变放置位置
0-vbAlignNone 不对其
1-vbAlignTop 对齐顶端
2-vbAlignBottom 对齐底端
3-vbAlignLeft 对齐左边
4-vbAlignRight 对齐右边
3、加入按钮
右键“属性”设置
Buttons组 InsertButton 和RemoveButton按钮分别用于添加和删除按钮
所有的按钮构成集合,删添按钮实际是Toolbar的Buttons集合进行操作
按钮属性:Index索引、Caption标题、Description描述信息、Key关键字、Value初态、Style模式、Width宽度、ToolTipText提示信息
A、按钮通过集合Buttons来访问,集合中的唯一标示为Index和Key
Index是int型
Key为字符串型,可以为空
访问按钮示例:ToolbarName.Buttons(1)
ToolbarName.Buttons(“Key”)
B、Caption 标题
C、ToolTipText和Description
D、Style属性设置按钮模式
0-tbrDefault 一般
1-tbrCheck 开关
2-tbrButtonGroup 编组
3-tbrSeparator 分隔
4-tbrPlaceholder 占位
5-tbrDropdown 下拉式
E、Value 属性设置开关和编组按钮初态
F、Wide 属性只有在占位时才可以被编辑
G、关联下拉菜单
DIM CM AS CONTEXTMENU()
DIM MIONE AS NEW MENUITEM(“一”)
DIM MITWO AS NEW MENUITEM(“二”)
DIM MITHREE AS NEW MENUITEM(“三”)
CM.MENUITEMS.ADD(MIONE)
CM.MENUITEMS.ADD(MITWO)
CM.MENUITEMS.ADD(MITHREE)
Toolbar1.Buttons(3).DropDownMenu=cm
4、属性
ImageList 设置与Toolbar相关联的ImageList对象
5、方法
增加按钮:Add
ToolbarName.Buttons.Add(index,key,caption,style,image)
Image可以是关联图像库中某个图片的index值或者一个字符串(对应关键字)
删除按钮:Remove
ToolbarName.Buttons.Remove(Index)
ToolbarName.Buttons.Remove(“Key”)
删除所有
ToolbarName.Buttons.Clear
6、为按钮载入图像
借助于ImageList控件
A、在ImageList中加入图像
右键“属性” Images组,InsertPicture按钮插入图片
允许.bmp和.ico文件
B、建立Toolbar和ImageList的关联关系
右键“属性” General组,ImageList下拉列表框
选择关联的ImageLIst控件
C、为Toolbar按钮载入图像
右键“属性”Buttons组,Image项文本可以编辑
输入ImageList图像库的索引Index值,被加载
D、为按钮关联下拉菜单
右键“属性“Buttons组,Insert ButtonMenu
e、Treeview控件的使用
1、属性
LineStyle 设置样式
为1时,则当前项下有子项时,显示”+“,2时不显示。
Indentation 设置宽度
LabelEdit 标签是否可被编辑
不想被改变,设置为1
Singlesel 设置在树中选择新条目时,是否展开此条目并收拢前一个条目
TRUE时,是
HideSelection 当树失去焦点选择,选中的条目是否可以显示为被选中
Appearance 设置控件是否以3D效果显示
Checkboxes 是否显示一个复选框
Style 设置控件每个列表组成方式,如”图片“+”文本“
2、方法
a控件添加条目和子条目
object.Nodes.Add(relative,relationship,key,text,image,selectedimage)
relative:已存在的节点对象的索引号或者键值
relationship:与relative节点的关系,可能参数
1-tvwlast 该节点置于所有其他的在relative中被命名的同一级别的节点的后面
2-tvwNext 该节点置于在relative中被命名的节点的后面
3-tvwPrevius 该节点置于在relative中被命名的节点的前面
4-tvwChild 该节点成为在relative中被命名的节点的子节点
Key 唯一的字符串,用于用Item方法检索Node
Text 在Node中出现的字符串
Image 关联的imageList控件中的图像索引
Selectedimage 在关联的imageList控件中的图像的索引,在Node被选中时显示
f、Statusbar控件的使用
属性
由panel(窗格)对象组成,可以包含文本和图像
Width、Alignment、Bevel
使用Style属性显示公共数据,如日期、事件、键盘状态
StatusbarName.Panel(index).text显示数据
g、CommonDialog控件用法:
1、指定在”文件类型“列表框中显示的文件过滤器列表
Description1|filter1|description2|filter2…….
如:Dexcription=”Text Files(.txt)“
Filter=”.txt”
2、显示对话框
ShowOpen显示
CancelError属性为True,用户单击”取消“生成一个错误
例如:CommonDialog1.ShowOpen
CommonDialog1.Filter=”All Files(.)|.|Text Files(.txt)|.txt|Batch File(.bat)|.bat”
CommonDialog1.FilterIndex=2
OpenFile(CommonDialog1.FileName)