vb语言基础常见语句（VB常用语言）

本文目录

• VB常用语言
• VB基础语句的及汉语对照
• VB中的循环语句有哪些
• VB语句函数大全
• VBA编程语言的三种基本语句结构分别是什么
• VB基本结构的三种语句
• vb6语言以及基本语句
• VB语言的基本语句有哪些
• VB中 “abc“<>“abc“&“123“的值是
• VB基本语句

VB常用语言

项目(Project)：是用户创建的文件集合，这个集合包括用户的Windows 应用程序。
　　控件(Control)：是Toolbox窗口中用户置于窗体上的工具，用于配合用户控制程序流程。
　　代码(Code)：是所写的编程语句的另一个名字。像素(Pixel)：代表图形元素，表示监视器上最小的可寻址的图形点。
　　全局变量(Global Variable)：就是在整个模块内或整个应用程序内均可使用的变量。
　　函数(Function)：是一个例程，接受零个、一个或多个参数并根据这些参数返回一个结果。
　　死循环(Infinite Loop)：是一个永不终止的循环。
　　语法错误(Syntax Error)：是由于拼错一条命令或使用不正确的语法引起的一种错误。
　　消息框(Message Box)：是为向用户提供信息而显示的对话框。
　　循环(Loop)：就是一组重复执行的程序指令集。
　　赋值语句(Assignment Statement)：是用来给控件、变量或其他对象赋值的程序语句。
　　结构化程序设计(Structured Programming)：是一种程序设计方法，用它来把长程序分成几个小过程，尽可能分得详细一些。
　　调用过程(Calling Procedure)：是触发其他过程执行的过程。
　　被调用过程(Called Procedure)：是由其他过程调用的过程。
　　标准函数过程(Standard Function Procedure)：是一个独立的非事件过程，当被其他过程调用时，它完成一定的工作并返回一个值给调用者。
　　标准子程序过程(Standard Subroutine Procedure)：是一个独立的非事件过程，当被其他程序调用时，它完成一定的工作。
　　引用传递(By Reference)：是一种传递值并允许被调用过程修改这些值的方法。它也叫做通过地址传递(By Address)。
　　值传递(By Value)：是一种传递值并保护调用过程的传递数据，因而被调用过程不能改变此数据的方法。
　　掩码(Edit Mask)：是一个格式字符串，例如“#，###，##”，它指定怎样显示数字和字符串数据。

VB基础语句的及汉语对照

是说那些常数值吗？
去我百度空间也有些关于内部函数和API函数的资料，希望对你有帮助
Calendar 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbCalGreg 0 指出使用的是阳历。
vbCalHijri 1 指出使用的是伊斯兰历法。
--------------------------------------------------------------------------------
Color 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbBlack 0x0 黑色
vbRed 0xFF 红色
vbGreen 0xFF00 绿色
vbYellow 0xFFFF 黄色
vbBlue 0xFF0000 蓝色
vbMagenta 0xFF00FF 紫红色
vbCyan 0xFFFF00 青色
vbWhite 0xFFFFFF 白色
--------------------------------------------------------------------------------
Comparison常数
下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：
常数 值 描述
VbUseCompareOption -1 使用Option Compare语句的设置进行比较。
VbBinaryCompare 0 进行二进制的比较。
VbTextCompare 1 进行文字的比较。
vbDatabaseCompare 2 用于 Microsoft Access(仅限于Windows)，进行以数据库所含信息为基础的比较。
--------------------------------------------------------------------------------
Compiler 常数
Visual Basic for Applications 定义了一些不能与 #If...Then...#Else 指令一起使用的常数。这些常数除了其范围是全局的；也就是说，除了可在工程中到处应用，在功能上与 #If...Then...#Else 指令定义的常数相同。
在 16 位开发平台上，编译常数定义如下：
常数 值 描述
Win16 True 指出开发环境是 16 位。
Win32 False 指出开发环境不是 32 位。
在 32 位开发平台上，编译常数定义如下：
常数 值 描述
Win16 False 指出开发环境不是 16 位。
Win32 True 指出开发环境是 32 位。
--------------------------------------------------------------------------------
Date 常数
可在代码中的任何地方用下列常数代替实际值：
参数值
firstdayofweek 参数具有以下这些值：
常数 值 描述
vbUseSystem 0 使用 NLS API 设置。
vbSunday 1 星期日（缺省）
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
firstdayofyear 参数具有以下这些值：
常数 值 描述
vbUseSystem 0 使用 NLS API 设置。
VbUseSystemDayOfWeek 0 使用系统设置中为星期的第一天指定的星期数。
VbFirstJan1 1 由 1 月 1 日所在的那个星期开始（缺省）。
vbFirstFourDays 2 由新的一年中第一个至少有 4 天的星期开始。
vbFirstFullWeek 3 由一年中第一个完整的星期开始。
返回值
常数 值 描述
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
--------------------------------------------------------------------------------
日期格式常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数 。
常数 值 描述
vbGeneralDate 0 显示日期和/或时间。对于一个实数，显示日期和时间。如果没有小数部分，则仅显示日期。如果没有整数部分，则仅显示时间。日期和时间的显示由系统设置值确定。
vbLongDate 1 用计算机区域设置值指定的长日期格式显示日期。
vbShortDate 2 用计算机区域设置值指定的短日期格式显示日期。
vbLongTime 3 用计算机区域设置值指定的长时间格式显示时间。
vbShortTime 4 用计算机区域设置值指定的短时间格式显示时间
Dir、GetAttr 和 SetAttr 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbNormal 0 正常的（Dir 和 SetAttr 的缺省值）
vbReadOnly 1 只读的
vbHidden 2 隐藏的
vbSystem 4 系统文件
vbVolume 8 卷标
vbDirectory 16 目录或文件夹
vbArchive 32 文件自上一次备份后已经改变
--------------------------------------------------------------------------------
驱动器类型常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
常数 值 描述
Unknown 0 不能确定驱动器类型。
Removable 1 驱动器具有可删除介质。包括所有软盘驱动器和许多其它种类的存储设备。
Fixed 2 驱动器具有固定介质（不可删除的）。包括可删除硬盘在内的所有硬盘驱动器。
Remote 3 网络驱动器。包括在网络上任何地方都可以共享的驱动器。
CDROM 4 驱动器是一个CD-ROM。包括只读的CD-ROM和可读写的CD-ROM。
RAMDisk 5 驱动器是本地计算机上的一块随机存取内存（RAM），它工作起来就象是磁盘驱动器一样。
--------------------------------------------------------------------------------
文件属性常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
常数 值 描述
Normal 0 普通文件。没有设置属性。
ReadOnly 1 只读文件。属性是可读/写。
Hidden 2 隐藏文件。属性是可读/写。
System 4 系统文件。属性是可读/写。
Volume 8 磁盘驱动器卷标。属性是只读。
Directory 16 文件夹或目录。属性是只读。
Archive 32 自上次备份后已经改变的文件。属性是可读/写。
Alias 64 链接或快捷方式。属性是只读。
Compressed 128 压缩文件。属性是只读。
--------------------------------------------------------------------------------
文件输入/输出常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
常数 值 描述
ForReading 1 打开文件用于只读操作。不能对文件进行写操作。
ForWriting 2 打开文件用于写操作。如果存在具有相同文件名的文件，文件原有的内容被覆盖。
ForAppending 8 打开文件并向文件的结尾写入。
--------------------------------------------------------------------------------
Dir、GetAttr 和 SetAttr 常数?
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbNormal 0 正常的（Dir 和 SetAttr 的缺省值）
vbReadOnly 1 只读的
vbHidden 2 隐藏的
vbSystem 4 系统文件
vbVolume 8 卷标
vbDirectory 16 目录或文件夹
vbArchive 32 文件自上一次备份后已经改变
--------------------------------------------------------------------------------
IMEStatus 常数
可在代码中的任何地方用下列常数代替实际值。
日文国别的常数如下所示：
常数 值 描述
vbIMEModeNoControl 0 没有安装 IME（缺省）
vbIMEModeOn 1 打开 IME
vbIMEModeOff 2 关闭 IME
vbIMEModeDisable 3 无效的 IME
vbIMEModeHiragana 4 完整宽度 Hiragana 模式
vbIMEModeKatakana 5 完整宽度 Katakana 模式
vbIMEModeKatakanaHalf 6 半宽度 Katakana 模式
vbIMEModeAlphaFull 7 完整宽度 Alphanumeric 模式
vbIMEModeAlpha 8 半宽度 Alphanumeric 模式
韩国地区的常数如下所示：
常数值描述
vbIMEModeAlphaFull7完整宽度 Alphanumeric 模式
vbIMEModeAlpha8半宽度 Alphanumeric 模式
vbIMEModeHangulFull9完整宽度 Hangul 模式
vbIMEModeHangul10半宽度 Hangul 模式
中文地区的常数值如下：
常数值描述
vbIMEModeNoControl0没有安装 IME （缺省）
vbIMEModeOn1IME 打开
vbIMEModeOff2IME off
--------------------------------------------------------------------------------
Keycode 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbKeyLButton 0x1 鼠标左键
vbKeyRButton 0x2 鼠标右键
vbKeyCancel 0x3 CANCEL 键
vbKeyMButton 0x4 鼠标中键
vbKeyBack 0x8 BACKSPACE 键
vbKeyTab 0x9 TAB 键
vbKeyClear 0xC CLEAR 键
vbKeyReturn 0xD ENTER 键
vbKeyShift 0x10 SHIFT 键
vbKeyControl 0x11 CTRL 键
vbKeyMenu 0x12 MENU 键
vbKeyPause 0x13 PAUSE 键
vbKeyCapital 0x14 CAPS LOCK 键
vbKeyEscape 0x1B ESC 键
vbKeySpace 0x20 SPACEBAR 键
vbKeyPageUp 0x21 PAGE UP 键
vbKeyPageDown 0x22 PAGE DOWN 键
vbKeyEnd 0x23 END 键
vbKeyHome 0x24 HOME 键
vbKeyLeft 0x25 LEFT ARROW 键
vbKeyUp 0x26 UP ARROW 键
vbKeyRight 0x27 RIGHT ARROW 键
vbKeyDown 0x28 DOWN ARROW 键
vbKeySelect 0x29 SELECT 键
vbKeyPrint 0x2A PRINT SCREEN 键
vbKeyExecute 0x2B EXECUTE 键
vbKeySnapshot 0x2C SNAPSHOT 键
vbKeyInsert 0x2D INSERT 键
vbKeyDelete 0x2E DELETE 键
vbKeyHelp 0x2F HELP 键
vbKeyNumlock 0x90 NUM LOCK 键
A 至 Z 键与 A – Z 字母的 ASCII 码相同：
常数 值 描述
vbKeyA 65 A 键
vbKeyB 66 B 键
vbKeyC 67 C 键
vbKeyD 68 D 键
vbKeyE 69 E 键
vbKeyF 70 F 键
vbKeyG 71 G 键
vbKeyH 72 H 键
vbKeyI 73 I 键
vbKeyJ 74 J 键
vbKeyK 75 K 键
vbKeyL 76 L 键
vbKeyM 77 M 键
vbKeyN 78 N 键
vbKeyO 79 O 键
vbKeyP 80 P 键
vbKeyQ 81 Q 键
vbKeyR 82 R 键
vbKeyS 83 S 键
vbKeyT 84 T 键
vbKeyU 85 U 键
vbKeyV 86 V 键
vbKeyW 87 W 键
vbKeyX 88 X 键
vbKeyY 89 Y 键
vbKeyZ 90 Z 键
0 至 9 键与数字 0 – 9 的 ASCII 码相同：
常数 值 描述
vbKey0 48 0 键
vbKey1 49 1 键
vbKey2 50 2 键
vbKey3 51 3 键
vbKey4 52 4 键
vbKey5 53 5 键
vbKey6 54 6 键
vbKey7 55 7 键
vbKey8 56 8 键
vbKey9 57 9 键
下列常数代表数字键盘上的键：
常数 值 描述
vbKeyNumpad0 0x60 0 键
vbKeyNumpad1 0x61 1 键
vbKeyNumpad2 0x62 2 键
vbKeyNumpad3 0x63 3 键
vbKeyNumpad4 0x64 4 键
vbKeyNumpad5 0x65 5 键
vbKeyNumpad6 0x66 6 键
vbKeyNumpad7 0x67 7 键
vbKeyNumpad8 0x68 8 键
vbKeyNumpad9 0x69 9 键
vbKeyMultiply 0x6A MULTIPLICATION SIGN (*) 键
vbKeyAdd 0x6B PLUS SIGN (+) 键
vbKeySeparator 0x6C ENTER 键
vbKeySubtract 0x6D MINUS SIGN (-) 键
vbKeyDecimal 0x6E DECIMAL POINT (.) 键
vbKeyDivide 0x6F DIVISION SIGN (/) 键
下列常数代表功能键：
常数 值 描述
vbKeyF1 0x70 F1 键
vbKeyF2 0x71 F2 键
vbKeyF3 0x72 F3 键
vbKeyF4 0x73 F4 键
vbKeyF5 0x74 F5 键
vbKeyF6 0x75 F6 键
vbKeyF7 0x76 F7 键
vbKeyF8 0x77 F8 键
vbKeyF9 0x78 F9 键
vbKeyF10 0x79 F10 键
vbKeyF11 0x7A F11 键
vbKeyF12 0x7B F12 键
vbKeyF13 0x7C F13 键
vbKeyF14 0x7D F14 键
vbKeyF15 0x7E F15 键
vbKeyF16 0x7F F16 键
--------------------------------------------------------------------------------
Miscellaneous 常数
下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：
常数 等于 描述
vbCrLf Chr(13) + Chr(10) 回车符与换行符结合
vbCr Chr(13) 回车符
vbLf Chr(10) 换行符
vbNewLine Chr(13) + Chr(10) 平台指定的新行字符；适用于当前平台
vbNullChar Chr(0) 值为 0 的字符
vbNullString 值为 0 的字符串 用来调用外部过程；与长度为零的字符串 ("") 不同
vbObjectError -2147221504 用户定义的错误号应当大于该值，例如：
Err.Raise Number = vbObjectError + 1000
vbTab Chr(9) Tab 字。
vbBack Chr(8) 退格字符
vbFormFeed Chr(12) 在 Microsoft Windows 中没有作用
vbVerticalTab Chr(11) 在 Microsoft Windows 中没有作用
MsgBox 常数
可在代码中的任何地方使用下列常数代替实际值：
MsgBox 参数
常数 值 描述
vbOKOnly 0 只有 OK 按钮（缺省值）
vbOKCancel 1 OK 和 Cancel 按钮
vbAbortRetryIgnore 2 Abort、Retry，和 Ignore 按钮
vbYesNoCancel 3 Yes、No，和 Cancel 按钮
vbYesNo 4 Yes 和 No 按钮
vbRetryCancel 5 Retry 和 Cancel 按钮
vbCritical 16 关键消息
vbQuestion 32 警告询问
vbExclamation 48 警告消息
vbInformation 64 通知消息
vbDefaultButton1 0 第一个按钮是缺省的（缺省值）
vbDefaultButton2 256 第二个按钮是缺省的
vbDefaultButton3 512 第三个按钮是缺省的
vbDefaultButton4 768 第四个按钮是缺省的
vbApplicationModal 0 应用程序形态的消息框（缺省值）
vbSystemModal 4096 系统强制返回的消息框
vbMsgBoxHelpButton 16384 添加Help按钮到消息框
VbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口
vbMsgBoxRight 524288 文本是右对齐的
vbMsgBoxRtlReading 1048576 指定在希伯来语和阿拉伯语系统中，文本应当显示为从右到左读
MsgBox 返回值
常数 值 描述
vbOK 1 按下 OK 按钮
vbCancel 2 按下 Cancel 按钮
vbAbort 3 按下 Abort 按钮
vbRetry 4 按下 Retry 按钮
vbIgnore 5 按下 Ignore 按钮
vbYes 6 按下 Yes 按钮
vbNo 7 按下 No 按钮
--------------------------------------------------------------------------------
QueryClose常数
下列常数可以用于代码中的任何位置以代替实际值：
常数 值 描述
vbFormControlMenu 0 用户从窗体上的Control 菜单选择Close 命令。
vbFormCode 1 Unload 语句被从代码中调用。
vbAppWindows 2 当前 Microsoft Windows 操作环境会话结束。
vbAppTaskManager 3 Windows Task Manager 正在关闭应用程序。
--------------------------------------------------------------------------------
Dir、GetAttr 和 SetAttr 常数?
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbNormal 0 正常的（Dir 和 SetAttr 的缺省值）
vbReadOnly 1 只读的
vbHidden 2 隐藏的
vbSystem 4 系统文件
vbVolume 8 卷标
vbDirectory 16 目录或文件夹
vbArchive 32 文件自上一次备份后已经改变
--------------------------------------------------------------------------------
Shell 常数
可在代码中的任何地方使用下列常数代替实际值：
常数 值 描述
vbHide 0 窗口是隐藏的，并且焦点被传递给隐藏窗口。
vbNormalFocus 1 窗口拥有焦点，并且恢复到原来的大小与位置。
vbMinimizedFocus 2 窗口缩小为图符并拥有焦点。
vbMaximizedFocus 3 窗口最大化并拥有焦点。
vbNormalNoFocus 4 窗口被恢复到最近一次的大小与位置。当前活动窗口仍为活动窗口。
vbMinimizeNoFocus 6 窗口缩小为图符。当前活动窗口仍为活动窗口。
--------------------------------------------------------------------------------
特殊文件夹常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
常数 值 描述
WindowsFolder 0 Windows文件夹包含由Windows操作系统安装的文件。
SystemFolder 1 System（系统）文件夹包含库、字体和设备驱动程序。
TemporaryFolder 2 Temp（临时）文件夹用于存储临时文件。它的路径可在TMP环境变量中找到。
--------------------------------------------------------------------------------
StrConv 常数
可在代码中的任何地方使用下列常数代替实际值
Constant 值 描述
vbUpperCase 1 将字符串转换成大写字符。
vbLowerCase 2 将字符串转换成小写字符。
vbProperCase 3 将字符串中每个词的第一个字母转换成大写。
vbWide 4 将字符串中的窄（单字节）字符转换成宽（双字节）字符。适用于远东地区。
vbNarrow 8 将字符串中的宽（双字节）字符转换成窄（单字节）字符。适用于远东地区。
vbKatakana 16 将字符串中的 Hiragana 字符转换成 Katakana 字符；只适用于日文地区。
vbHiragana 32 将字符串中的 Katakana 字符转换成 Hiragana 字符；只适用于日文地区。
vbUnicode 64 利用缺省的系统代码页将字符串转换成 Unicode。
vbFromUnicode 128 将字符串由 Unicode 转换成缺省的系统代码页。
--------------------------------------------------------------------------------
System Color 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbScrollBars 0x80000000 滚动条颜色
vbDesktop 0x80000001 桌面颜色
vbActiveTitleBar 0x80000002 活动窗口的标题栏颜色
vbInactiveTitleBar 0x80000003 非活动窗口的标题栏颜色
vbMenuBar 0x80000004 菜单背景色
vbWindowBackground 0x80000005 窗口背景色
vbWindowFrame 0x80000006 窗口框架颜色
vbMenuText 0x80000007 菜单文本颜色
vbWindowText 0x80000008 窗口文本颜色
vbTitleBarText 0x80000009 标题、调整框和滚动箭头的文本颜色
vbActiveBorder 0x8000000A 活动窗口边框颜色
vbInactiveBorder 0x8000000B 非活动窗口边框颜色
vbApplicationWorkspace 0x8000000C 多文档界面 (MDI) 应用程序的背景色
vbHighlight 0x8000000D 控件中选中项目的背景色
vbHighlightText 0x8000000E 控件中选中项目的文本颜色
vbButtonFace 0x8000000F 命令按钮表面阴影颜色
vbButtonShadow 0x80000010 命令按钮边缘阴影颜色
vbGrayText 0x80000011 灰色（无效）文本
vbButtonText 0x80000012 下压按钮文本颜色
vbInactiveCaptionText 0x80000013 非活动标题文本颜色
vb3DHighlight 0x80000014 3-D 显示元素的突出显示颜色
vb3DDKShadow 0x80000015 3-D 显示元素的最深阴影颜色
vb3DLight 0x80000016 vb3Dhighlight 之外最亮的 3-D 颜色
vbInfoText 0x80000017 工具提示文本颜色
vbInfoBackground 0x80000018 工具提示背景色
--------------------------------------------------------------------------------
三态常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
常数 值 描述
TristateTrue –1 True
TristateFalse 0 False
TristateUseDefault –2 使用缺省设置值。
--------------------------------------------------------------------------------
VarType 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbEmpty 0 未初始化（缺省值）
vbNull 1 不含任何有效数据
vbInteger 2 Integer
vbLong 3 长整数
vbSingle 4 单精度浮点数
vbDouble 5 双精度浮点数
vbCurrency 6 Currency
vbDate 7 Date
vbString 8 String
vbObject 9 对象
vbError 10 错误
vbBoolean 11 布尔
vbVariant 12 Variant（只用于变体的数组类型）
vbDataObject 13 数据访问对象
vbDecimal 14 Decimal
vbByte 17 Byte
vbUserDefinedType 36 包含用户定义类型的变量
vbArray 8192 数组

VB中的循环语句有哪些

1、do while...loop：当条件为True时循环,，在进入循环之前检查条件。
2、do...loop while:当条件为True循环，在循环至少运行一次后检查条件。
3、do until...loop:当条件为false循环，在进入循环之前检查条件。
4、do.. loop until:当条件为false循环，在循环至少运行一次后检查条件。
5、While...Wend: 当条件为Ture时循环。
6、for....next:指定循环次数，使用计数器重复运行语句。
7、for Each...next:对于集合中的每项或数组中的元素，重复执行每个语句。
8、for Each...in:从一个集合中取出每一个元素。
9、循环嵌套：就是在一个大循环内可以包含一个小循环。
10、强行退出循环就知道这么多，呵呵11

VB语句函数大全

(一)类型转换类函数
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="星期日"
函数名称 函数功能
Cbool(string) 转换为布尔值
Cbyte(string) 转换为字节类型的值
Ccur(string) 转换为货币类值
Cdate(string) 转换为日前类型的值
Cdbl(string) 转换为双精度值
Cint(string) 转换为整数值
Clng(string) 转换为长整型的值
Csng(string) 转换为单精度的值
Cstr(var) 转换为字符串值
Str(var) 数值转换为字符串
Val(string) 字符串转换为数值
***************************************
Abs(nmb) 返回数子的绝对值
Atn(nmb) 返回一个数的反正切
Cos(nmb) 返回一个角度的余炫值
Exp(nmb) 返回自然指数的次方值
Int(nmb) 返回数字的整形（进位）部份 8.4--》9
Fix(nmb) 返回数字的整形（舍去）部份 8.4--》8
Formatpercent(表达式) 返回百分比
Hex(nmb) 返回数据的16进制数
Log(nmb) 返回自然对数
Oct(nmb) 返回数字的8进制数
Rnd 返回大于“0”而小于“1”的随机数
Sgn(nmb) 判断一个数字的正负号
Sin(nmb) 返回角度的正铉值
Sqr(nmb) 返回数字的二次方根
Tan(nmb) 返回一个数的正切值
Asc(string) 返回ASCII字符串
Chr(charcode) 根据字符代码返回字符
Instr(string,searchstr) 返回被搜索字符串的第一个字符位置，string是字符串，searchstr是被搜索的字符串
InstrRev(string,searchstr) 同上，只是从右面开始搜索
Lcase(var) 把字符串变为小写
Left(string,nmb) 从string中返回从左面开始的nmb个字符串
Len(string) 返回字符串的长度
Ltrim(string) 截去字符串左边的空格
Filter(inputstrings,value) 返回字符串数组的字集，Inputstrings是字符串组，value是在数组中寻找的字符
Rtrim(string) 截去字符串右边的空格
Trim(string) 截去字符串前后空格
Mid(string,start,len) 在string中返回从start位置开始的len个字符
Replace(string,find,withstr) 在字符串string中，用withstr来替换find字符串
Right(string,nmb) 从string中返回从右面开始的nmb个字符串
Space(nmb) 返回指定空格的字符串
StrComp(string1,string2) 比较两个字符串
Ucase(string) 把字符串变为大写
****************************************
Date() 返回当前系统日期
DateAdd(interval,nmb,date) 用一个基础时间返回指定增加了时间间隔的日期，interval是间隔类型，yyyy－年，m－月，d－日，h－小时，n－分。
DateDiff(interval,nmb1,nmb2) 返回两个时间间隔，interval的意思同上
Datevalue(date) 发挥Date中的日期部份
Day(date) 返回天数
FormatDatetime(date) 返回格式化为日期的表达式
Hour(time) 返回时间的小时数
Minute(time) 返回时间的分钟数
Month(date) 返回日期中的月份
Now() 返回系统的日期和时间
Second(time) 返回时间中的秒数
Time() 返回系统的当前时间
Weekday(date) 返回星期几
WeekdayName(date) 返回星期几的中文名
Year(date) 返回年份
IsArray(var) 判断一个变量是否是数组
IsDate(var) 判断一个变量是否是日期
IsNull(var) 判断一个变量是否为空
IsNumeric 判断表达式是否包含数值
IsObject(var) 判断一个变量是否是对象
TypeName(var) 返回变量的数据类型
************************************
Array(list) 返回数组
CreateObject(class) 创建一个对象
GetObject(pathfilename) 得到文件对象
Inputbox(prompt) 提供一个可供输入数据的对话框
LBound(arrayP) 返回数组的最小索引
Msgbox(string) 输出一个消息框
Split(liststr) 从一个列表字符串中返回一个一维数组
Ubound(array) 返回数组的最大索引

VBA编程语言的三种基本语句结构分别是什么

VB判断题程序代码的基本结构有三种，分别是顺序结构、选择结构(分支结构)、循环结构；顺序结构：自顶向下，从左向右。选择结构：具有判断能力的结构，有IF，SELSET这两大语句。

VBA编程语言的三种基本语句结构识别方法：

1、首先在电脑上打开Excel表格，点击【开发工具】，【Visual Basic】。

2、在VBA工程项目里面双击“Sheet2（Sheet2）”打开代码输入窗口。

3、在代码窗口里面输入以下VBA程序代码：Private Sub Worksheet_SelectionChange(ByVal Target As Range) ’工作表选定区域发生改变时执行，On Error Resume Next   ’VBA忽略之后的语句错误。

4、在Sheet2表格上面的A3:A1000单元格输入查找值时，同一行的显示范围里面的单元格就会显示出相应的结果。

5、如果后续要继续使用该VBA程序，可以将表格另存为启用宏的工作薄。

VB基本结构的三种语句

　　1、VB判断题程序代码的基本结构有三种，分别是顺序结构、选择结构(分支结构)、循环结构；
　　2、顺序结构:自顶向下，从左向右
选择结构：具有判断能力的结构，有IF，SELSET这两大语句
循环结构：可以一直重复执行一段代码的结构，有DO，FOR等语句
结构很重要的，是该要好好明白一下的，不过基本的，书上一定有更详细的，就不多说了。反正结构决定的语句执行的特征。

vb6语言以及基本语句

VB 就是 Visual Basic 的意思，是一种常用的编程开发工具。它的基础是编程语言Basic ，Visual Basic 简单点来说就是微软为了更好的让人们学习编程，应用上 Basic 开发语言的一套工具，简称就是 VB。VB 的面世使原本极其复杂困难的编程、软件开发的工作变得简单。最初的编程工作都是依靠全套的代码去进行的，工程量极大。Microsoft 就是看准了这个人们渴求快速发展软件开发行业的商机，利用自己的技术实力研发出 VB 这么一套完善的编程工具。VB 把过往的纯代码编程过度到可视化编程，将一些经常要使用到的功能以一个个的控件的形式出现，例如 Label（标签）、TextBox（文本框）等等的。他们在以前的编程工作中需要在使用时重复多次的输入同样的代码去实现这个功能，而这些代码却不是小工程，耗费了很大的人力物力和很多的时间。所以有了 VB 之后，编程的工作也就可以普及啦，可以免去了机械的重复的代码的输入，又可以一面核心功能一面进行界面优化美化，一劳多得啊。
VB 是 Basic 语言软件开发者的首选编译器，是学习 Basic 语言编程必须要接触而且是经常接触的一款整合型技术编译器。
语言特性
VB的中心思想就是要便于程序员使用，无论是新手或者专家。VB使用了可以简单建立应用程序的GUI系统，但是又可以开发相当复杂的程序。VB的程序是一种基于窗体的可视化组件安排的联合，并且增加代码来指定组建的属性和方法。因为默认的属性和方法已经有一部分定义在了组件内，所以程序员不用写多少代码就可以完成一个简单的程序。过去的版本里面VB程序的性能问题一直被放在了桌面上，但是随着计算机速度的飞速增加，关于性能的争论已经越来越少。
窗体控件的增加和改变可以用拖放技术实现。一个排列满控件的工具箱用来显示可用控件（比如文本框或者按钮）。每个控件都有自己的属性和事件。默认的属性值会在控件创建的时候提供，但是程序员也可以进行更改。很多的属性值可以在运行时候随着用户的动作和修改进行改动，这样就形成了一个动态的程序。举个例子来说：窗体的大小改变事件中加入了可以改变控件位置的代码，在运行时候每当用户更改窗口大小，控件也会随之改变位置。在文本框中的文字改变事件中加入相应的代码，程序就能够在文字输入的时候自动翻译或者阻止某些字符的输入。
VB的程序可以包含一个或多个窗体，或者是一个主窗体和多个子窗体，类似于操作系统的样子。有很少功能的对话框窗口（比如没有最大化和最小化按钮的窗体）可以用来提供弹出功能。
VB的组件既可以拥有用户界面，也可以没有。这样一来服务器端程序就可以处理增加的模块。
VB使用引用计数的方法来进行垃圾收集，这个方法中包含有大量的对象，提供基本的面向对象支持。因为越来越多组建的出现，程序员可以选用自己需要的扩展库。和有些语言不一样，VB对大小写不敏感，但是能自动转换关键词到标准的大小写状态，以及强制使得符号表入口的实体的变量名称遵循书写规则。默认情况下字符串的比较是对大小写敏感的，但是可以关闭这个功能。
VB使得大量的外界控件有了自己的生存空间。大量的第三方控件针对VB提供。VB也提供了建立、使用和重用这些控件的方法，但是由于语言问题，从一个应用程序创建另外一个并不简单。
术语
在讨论 Visual Basic（不包含 .NET）时，经常可以听到以下这些术语，因此掌握这些术语的基本理解对初学者十分有帮助。
控件：简单的说，控件就是构成或者说建造 Visual Basic 应用程序的图形化工具，包括窗体、按钮、复选框、列表框、数据控件、表格控件和图片控件等等……
事件：由用户或操作系统引发的动作，例如击键、单击鼠标（Click）、双击鼠标（DblClick）、一段时间的限制，或从端口接收数据。
方法：嵌入在对象定义中的程序代码，它定义对象怎样处理信息并响应某事件。例如，数据库对象有打开记录集并从一个记录移动到另一个记录的方法程序的基本元素，它含有定义其特征的属性，定义其任务和识别它可以响应的事件的方法。控件和窗体是Visual Basic中所有对象的示例。
物件：一个控件、窗体等都可被看作一个物件。
过程：为完成某些特定的任务而编写的代码段，过程通常用于响应特定的事件，也可以当作应用程序的用户自定义函数来使用。
属性：属性是组成用户界面的各对象的性质的具体描述。例如上述“物件”中所提到的尺寸、位置、颜色、宽度、高度等等都称为控件的属性。属性决定物件的外观，有时也决定物件的行为。物件的属性绝大部分是VB中已经事先定义好的，但也有的属性是需要在应用过程中才去定义的。属性即可为物件提供数据，也能从物件取回信息。
·窗体的常用属性
现在，我列举出了一些窗体的常用属性，请你对它们先进行一下感性认识。
名称是窗体的标识名，代码中称它为Name。
BackColor：设置窗体背景颜色。
BorderStyle：设置窗体的边框风格。
要请注意的是，属性值为1 - Fixed Single 与 3 - Fixed Dialog 时，窗体外观相同，但功能却不同。
当属性为1 - Fixed Single 时，MaxButton与MinButton这两个属性可以起作用。MaxButton为True时窗体上具有了最大化按钮。MinButton为True时最小化按钮也有效了。
而当属性为3 - Fixed Dialog时，MaxButton与MinButton属性不起作用。此时MaxButton与MinButton为True，但最大化、最小化按钮均为出现。
Caption：设置窗体标题栏上的文字。
ControlBox：设置窗体标题栏上是否具有控制菜单栏及按钮。
Enabled：决定运行时窗体是否响应用户事件。在程序运行时可以看到改变 Enabled属性的效果。此时Enabled已设为False，所以点击按钮不会有反应。
Height：设置窗体的高度。
Width：设置窗体的宽度。
Left：设置程序运行时窗体的水平位置
Top：设置程序运行时窗体的垂直位置
Visible：设置程序运行时窗体是否可见。当Visible为False时，窗体是不可见的。将值改为为True。运行时窗体就是可见的了。
WindowsState：设置程序运行中窗体的最小化、最大化和原形这三种状态。程序运行时的最小化状态。
Icon：设置窗体标题栏上的图标。
Picture：给窗体配上漂亮的位图。
最后要说明的是：窗体的Name和Caption属性，虽然缺省值相同，都是Form1，但实际意义却不一样。Caption指的窗体标题栏上的文字，Name指这个窗体的对象名,千万不能混淆。

VB语言的基本语句有哪些

If...Then判断语句

If..Then判断语句属于一种单行假设判断语句，它会按照用户所给定的比较或逻辑表达式。

进行判断。当判断结果为“True”也就是真时，则执行Then后的程序代码块，否则跳过该块的执行步骤。

使用语法的方法如下：

If 判断式 Then 执行语句

或

If 判断式 Then

执行语句1

执行语句2

End If

其实上述的两种语法并不相同的，主要差异在于第一种写法是使用在处理程序部分的源代码较短，

无需分段的时候：

If a 》 b Then Print "a 》 b"

而当处理程序部分需要分段时，则必须使用第二种写法将执行语句包括在"If...Then...End If"范围中：

If a 》 b Then

c = a + b

Print "a + b = "& c

End If

而If...Then...Else...End If语句则可以将不符合条件式的情况，交给Else后所接的程序代码来处理：

例如：

If a 《 b Then

c = a + b

Else

c = a - b

End If

Print c

在上面程序片段中，变量C的数值会由条件式”a《b“成立与否而有不同的输出结果。

至于ElseIf的语法也是和If搭配来使用，它主要是用来进行多重逻辑判断。

If...ElseIf...Else...End If使用语法的方法如下：

If 判断式1 Then          //当判断式1成立时，执行以下语句

程序语句 甲

ElseIf 判断式2 Then      //当判断式1不成立，但判断式2成立时执行以下语句

程序语句乙

ElseIf 判断式3           //当判断式1和2都不程序，但判断式3成立时执行以下语句

程序语句 丙

Else                    //当上面所有判断式都不成立时，执行下面的语句

程序语句 丁 

End If

★Select Case判断语句

Select Case流程控制语句可以根据判断式的返回值来执行不同程序代码片段。

Select Case语法如下：

Select Case 参数

Case 条件1       //当判断式满足条件1时就执行以下的语句

程序语句1

程序语句2

Case 条件2       //当判断式满足条件2时就执行以下的语句

程序语句1

程序语句2

Case Else        //当判断式无满足任何条件时就执行Case Else标签后的语句

程序语句1

End Select

由于Select Case仅能传入一个参数，也就是说它无法执行“比较”与“判断”的操作，并且Case

仅能是数值而不能是表达式。

以下这个是个错误程序的片段：

Select Case A 》 B   //错误！！！仅能传送一个参数

或是

Select Case A

Case A 《 C      //错误！！！Case只能接受数值

★循环语句

当程序需要执行重复性工作时，可以使用循环控制语句连续执行某段程序代码，直到满足特定条件为

止。

VB提供了Fot...Next、While...Wend与Do...Liio三种循环控制语法。

For...Next循环语句

For...Next属于先测试循环控制语句，属于基本的循环控制语法。它按照用户所赋予的初值、终值

与步长表达式来重复执行某一特定程序区段。在每次执行前，系统会先检查目前初值状态是否符合

终值条件，如果不符合终值条件的话则执行增量运算后，再执行循环语句：反之如符合终值条件，则

跳出循环。

For 循环语法如下：

For 初值 to 终值 Step 步长

程序语句

Next

VB中 “abc“<>“abc“&“123“的值是

VB中 "abc"《》"abc"&"123"的值是Ture。

VB中《》符号的意思是不等于，&符号是字符拼接符号。"abc"&"123" = “abc123”，字符串“abc”不等于字符串“abc123”，所以返回的结果就是Ture。

扩展资料：

vb语言基础常见语句：

1、赋值语句

变量的赋值

格式：［Let］ 《变量》 ＝ 《表达式》。

功能：先计算赋值号右边表达式的值，然后将值赋值给变量。

2、Print语句

格式：［《对象名》。］Print［《表达式表》］［，|；］。

功能：在指定的对象上输出《表达式表》中各元素的值。

3、注释语句

Vb中添加注释语句的方法为在字符“’”（即单引号）后加注释内容或采用Rem 注释内容的形式。

4、结束语句

语法格式：end。

功能：强制程序结束运行。

VB基本语句

vb分为顺序结构、条件结构、循环结构:
if
条件
Then
语句1
else
语句2
end
if
for
i
=
1
to
10
语句1
‘重复执行10次
next
i
do
语句1
loop
until
条件
’当条件满足时退出循环，否则用远执行下去
while
条件
语句1
wend
’当条件满足时执行循环