VB中各个关键字的意思及用法

Posted 2023-04-28

比如const dim def staic
redim static public 一个一个记不住

我刚学VB 大家知不知道哪里有VB所有关键字意思级含义的整理，谢了
直接找过来贴一下，不要网址，贴的网站跟本找不到

一般是买书学啊
像VB入门之类的书，会对一些常用的关键字作解释的
也有代码示例

初学最好手头上有几本书，大致了解了，才慢慢看一些简单的代码
理论加代码实践交替，很快就会记得那些关键字的意思了 参考技术A 多写程序，写多了自然就记住了，要靠理解 参考技术B 我有VB函数大全,写上你的邮箱吧! 参考技术C （一）类型转换类函数
1.
CType(X)
[格式]：
P=CBool(X)
'
将X转换为“布尔”（Boolean）类型
P=CByte(X)
'
将X转换为“字节”（Byte）类型
P=CCur(X)
'
将X转换为“金额”（Currency）类型
P=CDate(X)
'
将X转换为“日期”（Date）类型
P=CDbl(X)
'
将X转换为“双精度”（Double）类型
P=CInt(X)
'
将X转换为“整型”（Integer）类型
P=CLng(X)
'
将X转换为“长整型”（Long）类型
P=CSng(X)
'
将X转换为“单精度”（Single）类型
P=CStr(X)
'
将X转换为“字符串”（String）类型
P=Cvar(X)
'
将X转换为“变体型”（Variant）类型
P=CVErr(X)
'
将X转换为Error值
[
范例
]：
(1).
CStr(13)+CStr(23)'
数值转换成字符串后，用"+"号连接，
结果：1323
(2).
CInt("12")+12'
字符串转换成整型后与12相加，
结果：24
(3).
P=CInt(True)'
输出结果为-1
'
布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1,False存为0
(4).
CBool(-0.001)'
输出结果为True
'
将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True.
2.
Int(X),Fix(X)：取X的整数值
[格式]：
P=Int(X)
'
取<=X的最大整数值
P=Fix(X)
'
取X的整数部分，直接去掉小数
[范例]：
(1)
Int(-54.6)
'
结果为-55，取<=-54.6的最大整数
(2)
Fix(54.6)
'
结果为54，取整数并直接去掉小数
（二）常用数学函数
[格式]：
1.
Abs(N)
取绝对值
例：Abs(-3.5)
结果：3.5
2.
Cos(N)
余弦函数
例：Cos(0)
结果：1
3.
Exp(N)
e为底的指数函数
例：Exp(3)
结果：20.068
4.
Log(N)
以e为底的自然对数
例：Log(10)
结果：2.3
5.
Rnd[(N)]
产生随机数
例：Rnd
结果：0--1之间的数
6.
Sin(N)
正弦函数
例：Sin(0)
结果：0
7.
Sgn(N)
符号函数
'
说明：取正负号。Y=Sgn(X)
既
X>0
则Y=1；X=0
则Y=0；X<0
则Y=
-1
8.
Sqr(N)
平方根
例：Sqr(9)
结果：3
9.
Tan(N)
正切函数
例：Tan(0)
结果：0
10.Atn(N)
反切函数
例：Atn(0)
结果：0
[注意]：在三角函数中，以弧度表示。
(一)字符串类函数：
1.
ASC(X)，Chr(X)：转换字符字符码
[格式]：
P=Asc(X)
返回字符串X的第一个字符的字符码
P=Chr(X)
返回字符码等于X的字符
[范例]：
(1)P=Chr(65)
‘
输出字符A,因为A的ASCII码等于65
(2)P=Asc(“A”)
‘
输出65
2.
Len(X)：
计算字符串X的长度
[格式]：
P=Len(X)
[说明]：
空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2
Bytes，但也算一个字符。
[范例]：
(1)
令X=””
(空字符串)
Len(X)
输出结果为0
(2)
令X=”abcd”
Len(X)
输出结果为4
(3)
令X=”VB教程”
Len(X)
输出结果为4
3.
Mid(X)函数：读取字符串X中间的字符
[格式]：
P=Mid(X,n)
由X的第n个字符读起，读取后面的所有字符。
P=Mid(X,n,m)
由X的第n个字符读起，读取后面的m个字符。
[范例]：
(1)
X=”abcdefg”
P=Mid(X,5)
结果为：P=”efg”
(2)
X=”abcdefg”
P=Mid(X,2,4)
结果为P=”bcde”
4.
Replace:
将字符串中的某些特定字符串替换为其他字符串
[格式]：
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。
[范例]：
X=”VB
is
very
good”
P=Replace(X,good,nice)
输出结果为：P=”VB
is
very
nice”
5.
StrReverse：反转字符串
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
（1）X=”abc”
P=StrReverse(X)
输出结果：P=”cba”
6.
Ucase(X)，Lcase(X)：转换英文字母的大小写
[格式]：
P=Lcase(X)
‘
将X字符串中的大写字母转换成小写
P=Ucase(X)
‘
将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。
[范例]：
（1）
令
X=”VB
and
VC”
则Lcase(X)的结果为”vb
and
vc”，Ucase(X)的结果为”VB
AND
VC”
7.
InStr函数：寻找字符串
[格式]：
P=InStr(X,Y)
从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
（1）
若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
（2）
InStr(X,Y)相当于InStr(1,X,Y)。
（3）
若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
（4）
若Y为空字符串，则返回0。
日期时间类函数：
1.
Year(X)，Month(X)，Day(X)：取出年，月，日
[格式]：
P=Year(X)
取出X“年”部分的数值
P=Month(X)
取出X“月”部分的数值
P=Day(X)
取出X“日”部分的数值
[说明]：Year返回的是公元年，若X里只有时间，没有日期，则日期视为#1899/12/30#
2.
Hour，Minute，Second函数：取出时，分，或秒
[格式]：
P=Hour(X)
取出X“时”部分的数值
P=Minute(X)
取出X“分”部分的数值
P=Second(X)
取出X“秒”部分的数值
[说明]：Hour的返回值是0---23之间
[范例]：
X=10:34:23
P=Hour(X)
Q=Minute(X)
R=Second(X)
则输出结果：P=10，Q=34，R=23
3.
DateSerial函数：合并年，月，日成为日期
[格式]：DateSerial(Y,M,D)
其中Y是年份，M为月份，D为日期
[说明]：
（1）
M值若大于12，则月份从12月起向后推算M-12个月；若小于1，则月份从1月起向后推算1-M个月。
（2）
若日期D大于当月的日数，则日期从当月的日数起，向后推算D-当月日数；若小于1，则日期从1日起向前推算1-D日。
[范例]：
P=DateSerial(2000,02,02)
则结果为P=2000/02/02
4．TimeSerial函数：合并时，分，秒成为时间
[格式]：P=TimeSerial(H,M,S)
其中H为小时数，M为分钟数，S为秒数
[说明]：推算原理同上面的DateSerial
[范例]：
P=TimeSerial(6,32,45)
结果为：P=6:32:45
5．Date,Time,Now函数：读取系统的日期时间
[格式]：
P=Date()
P=Time()
P=Now()
[说明]：这三个函数都无参数
[范例]：
若当前时间为2003年8月29日晚上19点26分45秒，则
P=Now()
结果为：P=2003-08-29
19:26:45
6．MonthName：返回月份名称
[格式]：P=MonthName(X)
[说明]：X参数可传入1---12，则返回值为“一月”、“二月”……，但是在英文Windows环境下，返回的是”January”,”February”……
[范例]：
P=MonthName(1)
则P=“一月”
7．WeekdayName：返回星期名称
[格式]：P=WeekdayName(X)
[说明]：X参数可传入1—7，则返回值为“星期日”，“星期一”……，但是在英文windows环境下，返回的是”Sunday”,”Monday”……
[范例]：
P=WeekdayName(1)
结果为：P=”星期日” 参考技术D （一）类型转换类函数
1. CType(X)
[格式]：
P=CBool(X) ' 将X转换为“布尔”（Boolean）类型
P=CByte(X) ' 将X转换为“字节”（Byte）类型
P=CCur(X) ' 将X转换为“金额”（Currency）类型
P=CDate(X) ' 将X转换为“日期”（Date）类型
P=CDbl(X) ' 将X转换为“双精度”（Double）类型
P=CInt(X) ' 将X转换为“整型”（Integer）类型
P=CLng(X) ' 将X转换为“长整型”（Long）类型
P=CSng(X) ' 将X转换为“单精度”（Single）类型
P=CStr(X) ' 将X转换为“字符串”（String）类型
P=Cvar(X) ' 将X转换为“变体型”（Variant）类型
P=CVErr(X) ' 将X转换为Error值

[ 范例 ]：
(1). CStr(13)+CStr(23)' 数值转换成字符串后，用"+"号连接， 结果：1323
(2). CInt("12")+12' 字符串转换成整型后与12相加， 结果：24
(3). P=CInt(True)' 输出结果为-1
' 布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1,False存为0
(4). CBool(-0.001)' 输出结果为True
' 将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True.

2. Int(X),Fix(X)：取X的整数值
[格式]：
P=Int(X) ' 取<=X的最大整数值
P=Fix(X) ' 取X的整数部分，直接去掉小数

[范例]：
(1) Int(-54.6) ' 结果为-55，取<=-54.6的最大整数
(2) Fix(54.6) ' 结果为54，取整数并直接去掉小数

（二）常用数学函数
[格式]：
1. Abs(N) 取绝对值
例：Abs(-3.5) 结果：3.5

2. Cos(N) 余弦函数
例：Cos(0) 结果：1

3. Exp(N) e为底的指数函数
例：Exp(3) 结果：20.068

4. Log(N) 以e为底的自然对数
例：Log(10) 结果：2.3

5. Rnd[(N)] 产生随机数
例：Rnd 结果：0--1之间的数

6. Sin(N) 正弦函数
例：Sin(0) 结果：0

7. Sgn(N) 符号函数
' 说明：取正负号。Y=Sgn(X) 既 X>0 则Y=1；X=0 则Y=0；X<0 则Y= -1

8. Sqr(N) 平方根
例：Sqr(9) 结果：3

9. Tan(N) 正切函数
例：Tan(0) 结果：0

10.Atn(N) 反切函数
例：Atn(0) 结果：0

[注意]：在三角函数中，以弧度表示。

(一)字符串类函数：

1. ASC(X)，Chr(X)：转换字符字符码

[格式]：
P=Asc(X) 返回字符串X的第一个字符的字符码
P=Chr(X) 返回字符码等于X的字符

[范例]：
(1)P=Chr(65)
‘ 输出字符A,因为A的ASCII码等于65
(2)P=Asc(“A”)
‘ 输出65

2. Len(X)： 计算字符串X的长度
[格式]：
P=Len(X)
[说明]：
空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。

[范例]：
(1) 令X=”” (空字符串)
Len(X) 输出结果为0
(2) 令X=”abcd”
Len(X) 输出结果为4
(3) 令X=”VB教程”
Len(X) 输出结果为4

3. Mid(X)函数：读取字符串X中间的字符
[格式]：
P=Mid(X,n)
由X的第n个字符读起，读取后面的所有字符。
P=Mid(X,n,m)
由X的第n个字符读起，读取后面的m个字符。

[范例]：
(1) X=”abcdefg”
P=Mid(X,5)
结果为：P=”efg”
(2) X=”abcdefg”
P=Mid(X,2,4)
结果为P=”bcde”

4. Replace: 将字符串中的某些特定字符串替换为其他字符串
[格式]：
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。

[范例]：
X=”VB is very good”
P=Replace(X,good,nice)
输出结果为：P=”VB is very nice”

5. StrReverse：反转字符串
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
（1）X=”abc”
P=StrReverse(X)
输出结果：P=”cba”

6. Ucase(X)，Lcase(X)：转换英文字母的大小写
[格式]：
P=Lcase(X)
‘ 将X字符串中的大写字母转换成小写
P=Ucase(X)
‘ 将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。

[范例]：
（1） 令 X=”VB and VC”
则Lcase(X)的结果为”vb and vc”，Ucase(X)的结果为”VB AND VC”

7. InStr函数：寻找字符串
[格式]：
P=InStr(X,Y)
从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
（1） 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
（2） InStr(X,Y)相当于InStr(1,X,Y)。
（3） 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
（4） 若Y为空字符串，则返回0。

日期时间类函数：
1. Year(X)，Month(X)，Day(X)：取出年，月，日
[格式]：
P=Year(X)
取出X“年”部分的数值
P=Month(X)
取出X“月”部分的数值
P=Day(X)
取出X“日”部分的数值
[说明]：Year返回的是公元年，若X里只有时间，没有日期，则日期视为#1899/12/30#

2. Hour，Minute，Second函数：取出时，分，或秒
[格式]：
P=Hour(X)
取出X“时”部分的数值
P=Minute(X)
取出X“分”部分的数值
P=Second(X)
取出X“秒”部分的数值
[说明]：Hour的返回值是0---23之间

[范例]：
X=10:34:23
P=Hour(X)
Q=Minute(X)
R=Second(X)
则输出结果：P=10，Q=34，R=23

3. DateSerial函数：合并年，月，日成为日期
[格式]：DateSerial(Y,M,D)
其中Y是年份，M为月份，D为日期
[说明]：
（1） M值若大于12，则月份从12月起向后推算M-12个月；若小于1，则月份从1月起向后推算1-M个月。
（2） 若日期D大于当月的日数，则日期从当月的日数起，向后推算D-当月日数；若小于1，则日期从1日起向前推算1-D日。
[范例]：
P=DateSerial(2000,02,02)
则结果为P=2000/02/02

4．TimeSerial函数：合并时，分，秒成为时间
[格式]：P=TimeSerial(H,M,S)
其中H为小时数，M为分钟数，S为秒数
[说明]：推算原理同上面的DateSerial
[范例]：
P=TimeSerial(6,32,45)
结果为：P=6:32:45

5．Date,Time,Now函数：读取系统的日期时间
[格式]：
P=Date()
P=Time()
P=Now()
[说明]：这三个函数都无参数
[范例]：
若当前时间为2003年8月29日晚上19点26分45秒，则
P=Now()
结果为：P=2003-08-29 19:26:45

6．MonthName：返回月份名称
[格式]：P=MonthName(X)
[说明]：X参数可传入1---12，则返回值为“一月”、“二月”……，但是在英文Windows环境下，返回的是”January”,”February”……
[范例]：
P=MonthName(1)
则P=“一月”

7．WeekdayName：返回星期名称
[格式]：P=WeekdayName(X)
[说明]：X参数可传入1—7，则返回值为“星期日”，“星期一”……，但是在英文windows环境下，返回的是”Sunday”,”Monday”……
[范例]：
P=WeekdayName(1)
结果为：P=”星期日”本回答被提问者采纳

VB中const用法

为什么可以这样用Const SPIF_UPDATEINIFILE = &H1？？SPIF_UPDATEINIFILE本身不就是vb的一个常数吗（api函数 SystemParametersInfo的参数fuWinIni的一个可取常量），怎么还可以给他赋值呢？？这个貌似跟const pi =3.14159不同啊，求高人指点啊。。。。

const类似于常用的dim函数，b中const源于constant，意思为不变常量。用const声明的是固定的整数，字符串。为了在一行中声明若干个常数，可以使用逗号将每个常数赋值分开。用这种方法声明常数时，如果使用了 Public 或 Private 关键字，则该关键字对该行中所有常数都有效。

在给常量赋值的表达式中，不能使用变量，用户自定义的函数，或 Visual Basic 的内部函数（如 Chr）。

注意 常数可以使程序更具可读性，以及易于修改。在程序运行时，常数不会象变量那样无意中被改变。

如果在声明常数时没有显式地使用 As type 子句，则该常数的数据类型是最适合其表达式的数据类型。

在 Sub、Function 或 Property 过程中声明的常数都是该过程的局部常数。在过程外声明的常数，在包含该声明的模块中被定义。在可以使用表达式的地方，都可以使用常数。

CONST定义的是常量，也就是说这个值在整个程序运行过程中不能被修改，首先增加了安全性
其次，比如定义常量PI（圆周率）为3.14，而事后希望改为3.1415。那么就直接修改定义处的值就可以了复次，常量的作用还有避免书写错误和易于修改。

扩展资料：

const修饰的量为一个常量即不能被修改的量。但在C语言（C89）中的const可以不初始化但后续也就无法对其赋值，所以尽管不初始化不会出错。但要使用const修饰的量就需要对其进行初始化。

const修饰的量为一个常量，可以做左值且不能修改它的值。只有当给const修饰量的值不明确的时候会退化成一个常变量。

在一个C++工程中的多个.cpp文件中要用到某一个.cpp文件中const修饰的量是无法访问的，这是由于常量的符号类型为local的，只在当前文件可见，其余文件无法访问。如若想要访问这个const修饰的量，需在定义处加上extern。

参考技术A

用法

为了在一行中声明若干个常数，可以使用逗号将每个常数赋值分开。用这种方法声明常数时，如果使用了 Public 或 Private 关键字，则该关键字对该行中所有常数都有效。

在给常量赋值的表达式中，不能使用变量，用户自定义的函数，或 Visual Basic 的内部函数（如 Chr）。

注意 常数可以使程序更具可读性，以及易于修改。在程序运行时，常数不会象变量那样无意中被改变。

如果在声明常数时没有显式地使用 As type 子句，则该常数的数据类型是最适合其表达式的数据类型。

在 Sub、Function 或 Property 过程中声明的常数都是该过程的局部常数。在过程外声明的常数，在包含该声明的模块中被定义。在可以使用表达式的地方，都可以使用常数。

扩展资料：

语句示例

该示例使用 Const 语句来声明用于代替文字值的常数。Public常数在标准模块的通用部分声明，而不是在类模块中声明。Private 常数可以在任何模块类型的通用部分声明。

缺省情况下常数是私有的。

ConstMyVar=459'声明公用常数。

PublicConstMyString="HELP"'声明私有的整数常数。

PrivateConstMyIntAsInteger=5'在一行中声明多个常数。

ConstMyStr="Hello",MyDoubleAsDouble=3.4567

参考技术B

Const 语句

声明用于代替文字量的常数。

Const 语句示例

该示例使用 Const 语句来声明用于代替文字值的常数。Public
常数在标准模块的通用部分声明，而不是在类模块中声明。Private 常数可以在任何模块类型的通用部分声明。

'缺省情况下常数是私有的。
Const MyVar = 459

'声明公用常数。
Public Const MyString = "HELP"

'声明私有的整数常数。
Private Const MyInt As Integer = 5

'在一行中声明多个常数。
Const MyStr = "Hello", MyDouble As Double = 3.4567

参考技术C const是定义常数，例如：const pi =3.14159，那么你在代码中输入pi就相当于输入3.14159。就是用一个类似变量的东西代替数值提高可读性，但要注意，它不是变量。SPIF_UPDATEINIFILE并不是VB里面的常数，要使用的话必须定义常数。VC有微软提供的支持库，所以可以直接使用。追问

那为什么让它等于&H1呢？？

追答

这并不是必须的，人为定义的，你也可以不定义SPIF_UPDATEINIFILE常数，直接在程序里使用&H1，不同的参数传入函数后有不同的结果，而&H1对应的就是“把新的系统参数的设置内容写入用户配置文件”，这是API文档的说明，而让代码可读性更强的话就用Const SPIF_UPDATEINIFILE = &H1，当然，SPIF_UPDATEINIFILE这个名字不是必须的，可以自己改。如果你尝试让它等于&H2，那么Const SPIF_UPDATEINIFILE = &H2这句是没错，但是按照使用的习惯来说，当你传给函数这个参数的时候会发生意想不到的后果，就像把一个单词Apple翻译成香蕉一样。

追问

貌似有点懂了，多谢高手。。。。

本回答被提问者采纳