VB常用控件属性.docx
- 文档编号:19071290
- 上传时间:2023-04-24
- 格式:DOCX
- 页数:33
- 大小:29.99KB
VB常用控件属性.docx
《VB常用控件属性.docx》由会员分享,可在线阅读,更多相关《VB常用控件属性.docx(33页珍藏版)》请在冰豆网上搜索。
VB常用控件属性
表71常用控件的重要属性、方法及事件
控件
中文名
属性
方法
事件
ADOData(ADC)
数据控件
ConnectionString
RecordSource,RecordSet
Error,WillMove
CheckBox
复选框
Caption,Style,Value
ComboBox
组合框
参见ListBox
CommandButton
命令按钮
Caption,Default,Cancel
Click
DirListBox
目录列表框
List,ListIndex,ListCount,Path
Refresh
Click
DriveListBox
磁盘列表框
参见DirListBox
FileListBox
文件列表框
Pattern,参见DirListBox
PathChange,PatternChange
Form
窗体
ActiveControl,AutoRedraw,Caption
ClipControls,Controls,CurrentX,
CurrentY,Height,Width,hWnd,
MDIChild,Visible
PopupMenu
PrintForm,
Refresh,
Show
Activate,Deactivate,
Initialize,
Load,Unload,QueryUnload
ReSize,Terminate
Frame
框架
Caption
HScrollBar
水平滚动条
Max,Min,LargeChange,SmallChange
Change,Scroll
Image
图像
Picture,Stretch,AutoSize
Click,DblClick
Label
标签
Alignment,Caption
Line
直线
DrawMode,X1,Y1,X2,Y2
ListBox
列表框
ItemData,List,ListCount,ListIndex
MultiSelect,NewIndex,Selected,
SelCount,Sorted,Text
AddItem,
RemoveItem
Clear
Click,DblClick,
ItemCheck,
Scroll
MDIFrom
MDI窗体
ActiveControl,ActiveForm,
AutoShowChlildren,Caption,
Controls,hWnd,Picture
Arrange
PopupMenu,
Show
Activate,Deactivate,
Initialize,
Load,Unload,QueryUnload
ReSize,Terminate
Menu
菜单
Caption,Enabled,Checked,Shortcut,
WindowList,NegotiatePosition
Click
OLEContainer
OLE容器
Action,AppIsRunning,AutoActivate,
Class,Container,MiscFlags,
FileNumber,SourceDoc,SourceItem
Close,Copy.
DoVerb,ectchVerb,
InsertObj,
SaveToOLE1File
Click,DblClick,
Updated
OptionButton
单选框
参见CheckBox
PictureBox
图片框
Picture,CurrentX,CurrentY
Circle,Cls,Print,
Pset,PaintPicture
Click
Paint
Shape
形状
BackColor,ForeColor,DrawMode,
FillColor,FillStyle,Shape
Refresh
TextBox
文本框
DataChanged,DataSource,DataField
Enabled,Locked,
Multiline,PasswordChar
SelStart,SelLength,SelText,Text
Change
Timer
计时器
Interval
Timer
表53部分VisualBasic函数
类别
函数
功能
转换
Int(x)
求不大于自变量x的最大整数
Fix(x)
去掉一个浮点数的小数部分,保留其整数部分
Hex$(x)
把一个十进制数转换为十六进制数
Oct$(x)
把一个十进制数转换为八进制数
Asc(x$)
返回字符串x$中第一个字符的ASCII码
Chr$(x)
把x的值转换为相应的ASCII字符
Str$(x)
把x的值转换为一个字符串
Cint(x)
把x的小数部分四舍五人,转换为整数
Ccur(x)
把x的值转换为货币类型值,小数部分最多保留四位且自动四舍五入
CDbl(x)
把x值转换为双精度数
CLng(x)
把x的小数部分四舍五人转换为长整型数
CSng(x)
把x值转换为单精度数
CVar(x)
把x值转换为变体类型值
数学
Sin(x)
返回自变量x的正弦值
Cos(x)
返回自变量x的余弦值
Tan(x)
返回自变量x的正切值
Atn(x)
返回自变量x的反正切值
Abs(x)
返回自变量x的绝对值
Sgn(x)
返回自变量x的符号,即:
当x为负数时,函数返回-1
当x为0时,函数返回0
当x为正数时,函数返回1
Sqr(x)
返回自变量x的平方根,x必须大于或等于0
Exp(x)
返回以e为底、以x为指数的值,即求e的x次方
字符串
LTrim$(字符串)
去掉字符串左边的空白字符
RTrim$(字符串)
去掉字符串右边的空白字符
Left$(字符串,n)
取字符串左部的n个字符
Right$(字符串,n)
取字符串右部的n个字符
Mid$(字符串,p,n)
从位置p开始取字符串的n个字符
Len(字符串)
测试字符串的长度
String$(n,字符串)
返回由n个字符组成的字符串
Space$(n)
返回n个空格
InStr(字符串1,字符串2)
在字符串1中查找字符串2
Ucase$(字符串)
把小写字母转换为大写字母
Lcase$(字符串)
把大写字母转换为小写字母
日期
Day(Now)
返回当前的日期
WeekDay(Now)
返回当前的星期
Month(Now)
返回当前的月份
Year(Now)
返回当前的年份
时间
Hour(Now)
返回小时(0~23)
Minute(Now)
返回分钟(0~59)
Second(Now)
返回秒(0~59)
随机数
Rnd[(x)]
产生一个0—1之间的单精度随机数
判断
IsNumeric
是否为数字
IsDate
是否为日期
第16章VisualBasic的内部函数
VisualBasic提供了大量的内部函数,利用这些函数可大大增强程序的表达和开发能力。
这些函数总体上可分为数学函数、字符操作函数、转换函数、日期/时间函数、随机函数以及财务函数等。
本节主要介绍一些常用的函数。
为便于上机实际操作,建议在窗体中绘制一命令按钮,然后在命令钮的Click事件过程中,用Print方法来打印输出函数的返回值,以验证函数的用法和返回值。
比如,若要测试函数Sqr(21)的返回值,则可在命令钮的Click事件过程中,通过以下代码来实现:
PrivateSubCommand1_Click()
PrintSqr(21)
EndSub
若要同时输出多个函数或表达式的值,仍可用Print语句来实现,各函数或表达式之间只需用逗号分隔即可。
例如:
PrintSin(3.14159/4),Sqr(36)
可以按第17章中介绍的方法来打开立即窗口。
通过立即窗口可以试验每个函数的操作。
在立即窗口中可以输入命令,命令行解释程序对输入的命令进行解释,并立即响应。
例如:
x=2500
PrintSqr(x)
50
第一行把数值2500赋给变量x,第二行打印出该变量的平方根值。
Print也可以用?
代替,它与Print等价。
例如:
?
Sqr(x)
50
下面介绍VisualBasic中的函数,读者可以在立即窗口中试验这些函数。
16.1数学函数
数学函数主要用于各种数学运算,包括三角函数、方根运算、绝对值运算以及对数与指数运算等。
函数返回值为数值型。
1.三角函数
VisualBasic提供了4个有关三角运算的函数,分别是:
Sin(x)返回自变量x的正弦值;
Cos(x)返回自变量x的余弦值;
Tan(x)返回自变量x的正切值;
Atn(x)返回自变量x的反正切值。
自变量x为数值表达式,其中Sin、Cos和Tan的自变量x应是以弧度为单位的角度,其返回值为该角度所对应的值。
Atn函数的返回值也以弧度为单位。
弧度与角度之间的换算关系是:
π=180°,π的值为:
3.14159265358979。
例如要计算并输出sin30°和cos45°的值,如下:
PrintSin(3.14159265358979/6)
0.5
PrintCos(3.14159265358979/4)
0.707106781186548
注意,Sin()和Cos()函数的参数必须是弧度数,30°也即π/6,可表达为3.14159265358979/6。
2.Int与Fix函数
函数用法:
value=Int(x)
value=Fix(x)
函数功能:
Int和Fix都是直接删除小数部分,而返回剩下的整数。
Int和Fix的不同之处在于,如果x为负数,则Int返回小于或等于x的第一个负整数,而Fix则会返回大于或等于x的第一个负整数。
例如:
PrintInt(-8.4)
-9
PrintFix(-8.4)
-8
3.Round函数
函数用法:
value=Round(表达式[,小数位数])
函数功能:
返回表达式按指定的小数位数进行四舍五入运算的结果。
若缺省小数位数,则四舍五入为整数。
当小数部分的舍入位为5时,函数会将其转换为最接近的偶数。
例如:
PrintRound(245.115,2)'有效位为奇数,故舍入,保证为偶数
245.12
PrintRound(245.145,2)'有效位已为偶数,故不舍入
245.14
PrintRound(245.116,2)'对于舍入位大于5的,均要舍入
245.12
PrintRound(245.5),Round(246.5)
246246
PrintRound(245.51),Round(246.51)
246247
4.Abs函数
函数用法:
value=Abs(x)
函数功能:
返回自变量x的绝对值。
例如:
PrintAbs(-3.14)
3.14
5.符号函数
函数用法:
value=Sgn(x)
函数功能:
返回自变量x的符号:
当x<0时,函数返回-1;当x>0时,函数返回1当x=0时,函数返回0。
6.Sqr函数
函数用法:
value=Sqr(x)
函数功能:
返回x的算术平方根。
自变量x必须大于或等于0。
例如:
PrintSqr(361)
19
7.指数与对数函数
指数函数Exp(x)返回以e为底,以x为指数的值。
而对数函数Log(x)则返回自变量x的自然对数值。
16.2字符串函数
VisualBasic提供了丰富的字符串运算函数,从而极大地提高了对字符串的处理能力。
在VisualBasic中字符串在存储时,采用了Unicode(即所谓的大字符集编码方案),每个字符均采用两个字节进行编码表示。
在这种新的处理机制下,一个英文字符或一个汉字均被视为是一个字符,占用的存储空间均为两个字节。
为了解决Unicode方式与以前的单字节处理方式(ANSI)的兼容问题,在新版VB中增加了一组字符串处理函数,这些新增加的函数均在原函数名的基础上增加了一个“B”,如LenB(),LeftB(),RightB(),MidB(),InstrB(),InputB()等。
1.UniCode与ANSI间的转换函数
为实现UniCode与ANSI之间的转换,系统提供了StrConv转换函数。
字符串由UniCode方式转换到ANSI方式后,所有的字符串处理必须用加了B的字符串函数来处理,处理完毕,在保存或显示之前,必须再度用StrConv函数将其转换为UniCode编码形式,否则将出错。
函数用法:
newstring=StrConv(待转换字符串,转换格式)
函数功能:
将字符串转换成指定编码格式的字符串。
参数说明:
“待转换字符串”可以是字符串常量,也可以是字符型变量。
“转换格式”参数用于说明转换成哪种编码格式的字符串。
其取值有vbUnicode和vbFromUnicode两种,分别代表转换为UniCode格式编码和ANSI格式编码的字符串。
例如:
DimtempstringAsString,newstringAsString
tempstring="佳能210SP"
newstring=StrConv(tempstring,vbFromUnicode)'转变成ANSI格式
PrintLenB(newstring)
9
newstring=StrConv(newstring,vbUnicode)'再度转换为Unicode格式
PrintLen(newstring)
7
2..测试字符串长度的函数
函数用法:
value=Len(字符型表达式)
value=LenB(字符型表达式)
函数功能:
测试返回字符型表达式的长度。
其中,Len()以字符个数为单位返回字符串的长度,用于UniCode编码格式的双字节处理;LenB()以字节为单位返回字符串的长度,即字节数,常用于单字节处理。
例如;
DimtestAsString,newstringAsString
test="佳能210SP"
PrintLen(test),LenB(test)'对于UniCode编码格式,二者返回值均正确
714
newstring=StrConv(test,vbFromUnicode)'转换成ANSI格式
PrintLen(newstring),LenB(newstring)'对ANSI格式,此时Len返回了错误值
49
由此可见,对ANSI编码格式的字符串处理,必须采用LenB函数,而不能采用Len。
3.产生空格的函数
函数用法:
newstring=Space(number)
函数功能;产生number个空格。
例如:
newstring="Visual"&Space
(2)&"Basic"
Printnewstring
VisualBasic'Visual与Basic之间空两个格
4.删除字符串左右空格函数
函数用法:
newstring=LTtrim(字符串)
newstring=RTrim(字符串)
newstring=Trim(字符串)
函数功能:
删除字符串左边或右边的空白字符,其中,LTrim()删除字符串左边的所有空格,RTrim()删除右边的所有空格,Trim()同时删除字符串左边和右边的所有空格。
夹在字符串中间的空格不会删除。
例如:
newstring=Space
(2)+"CanonPrinter"+Space(3)
Printnewstring
CanonPrinter
PrintLTrim(newstring),RTrim(newstring)
CanonPrinterCanonPrinter
PrintTrim(newstring)
CanonPrinter
5.字符串左右截取函数
函数用法:
newstring=Left(字符串,截取的个数)
newstring=Right(字符串,截取的个数)
函数功能:
从字符串的左边或右边开始,截取出指定个数的字符串。
其中,Left()从母串左边(串首)开始截取;Right()则从母串的右边(串尾)开始截取。
例如:
DimtempstringAsString
tempstring="AdobePhotoshop基础教程"
PrintLeft(tempstring,5),Right(tempstring,4)
Adobe基础教程
6.单字节字符串左右截取函数
函数用法:
newstring=LeftB(字符串,截取的个数)
newstring=RightB(字符串,截取的个数)
函数功能:
该组函数的功能和用法与上组函数完全相同,主要用于ANSI编码方式的字符串处理。
例如:
DimunistringAsString,AnsiStringAsString,AnsiNew1AsString,AnsiNew2AsString
unistring="AdobePremiere6.0基础教程”
AnsiString=StrConv(unistring,vbFromUnicode)
AnsiNew1=LeftB(AnsiString,5)
AnsiNew2=RightB(AnsiString,8)
PrintAnsiNew1,AnsiNew2
摁扯僚?
?
?
'产生了输出错误!
PrintStrConv(AnsiNew1,vbUnicode),StrConv(AnsiNew2,vbUnicode)
Adobe基础教程
说明;利用该组函数处理ANSI编码方式的字符串后,在输出或保存之前,还必须转换成UniCode编码方式,否则将产生错误。
7.字符串的任意截取函数
函数用法:
newstring=Mid(字符串,截取开始位置,截取个数)
newstring=MidB(字符串,截取开始位置,截取个数)
函数功能:
从字符串指定的开始位置,截取出指定个数的子串。
MidB()用于ANSI编码方式的字符串截取。
例如:
DimunistringAsString,AnsiStringAsString,AnsiTempAsString
unistring="冲破Internet的速度壁垒"
PrintMid(unistring,3,11)
Internet的速度
AnsiString=StrConv(unistring,vbFromUnicode)
AnsiTemp=MidB(AnsiString,5,14)
PrintStrConv(AnsiTemp,vbUnicode)'输出时转换成UniCode编码方式
Internet的速度
8.字符串的替换语句
语句用法:
Mid(待替换的字符串,替换开始位置[,替换的字符个数])=要替换的字符串
语句功能:
在字符串指定的替换位置,用指定的新串替换母串中相应位置的字符串。
若指定了要替换的字符个数n,则用要替换的字符串左起的n个字符来替换母串中相应位置的字符。
例如:
DimuniTempAsString
uniTemp="1234567890"
Mid(uniTemp,4,3)="笔记本电脑"
PrintuniTemp'输出替换后的结果
123笔记本7890
若语句中缺省第三项参数,则将要替换的字符串全部替换进去。
例如:
Mid(uniTemp,4)="笔记本电脑"
PrintuniTemp
123笔记本电脑90
若第3项参数指定的数目超出了实际要替换的字符个数,则以实际要替换的字符个数为准。
例如:
uniTemp="1234567890"
Mid(uniTemp,4,6)="电脑"
PrintuniTemp
123电脑67890
若要插入的字符串超出了母串的实际宽度,则超出部分将被截除,以保持被替换的母串长度不变,例如:
uniTemp="1234567890"
Mid(uniTemp,8,5)="笔记本电脑"
PrintuniTemp
1234567笔记本
9.字符重复函数
函数用法:
newstring=String(重复次数,ASCII码值)
newstring=String(重复次数,待重复字符)
函数功能:
将指定的字符重复指定的次数以形成一个新字符串。
参数说明:
函数的第2项参数可以为ASCII码值,此时用该ASCII码值对应的字符进行重复。
若第2项参数为字符串,则将字符串的首字符用来重复以产生新串。
例如:
DimS1,S2,S3
S1=String(3,87)
S2=String(3,"*")
S3=String(2,"Visual")
PrintS1,S2,S3
WWW***VV
10.字符串大小写转换函数
函数用法:
newstring=UCase(字符串)
newstnng=LCase(字符串)
函数功能,
该组函数用于对字母进行大小写转换。
其中UCase()用于将字符串中的小写字母转换成大写字母,LCase()则用于将大写转换成小写。
例如:
DimoldstringAsString,upstringAsString,lowerstringAsString
oldstring="MicroSoft"
upstring=UCase(oldstring)
lowerstring=LCase(oldstring)
Printupstring,lowerstring
MICROSOFTmicrosoft
11.字符串匹配函数
函数用法:
value=InStr([搜寻起始位置,]字符串1,字符串2[,比较方式])
value=InStrB([搜寻起始位置,]字符串1,字符串2[,比较方式])
函数功能:
在“字符串1”中搜索“字符串2”,若匹配成功,则返回“字符串2”在“字符串1”中最先出现的位置,为长整型值
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 常用 控件 属性