本文共 3911 字，大约阅读时间需要 13 分钟。
最近一直在学生信息管理系统徘徊不前，不敢进入机房。分析其主要原因是之前的知识学的有点Low，不敢前进，怕进到机房也是停着，所以一直徘徊在这里。因此最近总结了很多VB中的基础知识。比如：常用的函数（因为每次都能在代码中看到，但是就是不理解是什么含义，更不知道怎么使用）；一些优化学生系统的代码段等。
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. StrReverse：反转字符串
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
（1）X=”abc”
P=StrReverse(X)
输出结果：P=”cba”
5. Ucase(X)，Lcase(X)：转换英文字母的大小写
[格式]：
P=Lcase(X)
‘将X字符串中的大写字母转换成小写
P=Ucase(X)
‘将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。
[范例]：
令 X=”VB and VC”
则Lcase(X)的结果为”vb and vc”，Ucase(X)的结果为”VB AND VC”
6. 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。
7.下面重点说下msgbox函数，它很重要，也经常的用到。MsgBox是vb中的一个函数，功能是弹出一个对话框，等待用户单击按钮，并返回一个Integer值的表示用户单击了哪一个按钮
语法：
MsgBox (Prompt[,Buttons] [,Title] [,Helpfile,Context])
参数（MsgBox函数参数）
| 部分 | 描述 |
| Prompt | 必选。字符串表达式，显示在对话框中的消息。Prompt的最大长度大约为 1024个字符，由所用字符的字节大小决定。如果Prompt的内容超过一行，则可以在每一行之间用回车符（Chr(13)）、换行符（Chr(10)）或是回车与换行符的组合（Chr(13) & Chr(10)，即vbCrLf）将各行分隔开来。 |
| Buttons | 可选。数值表达式，是一些数值的总和，指定所显示的按钮的数目及形式、使用的图标样式（及声音），缺省按钮以及消息框的强制性等。如果省略，则其缺省值为0。具体数值见“参数设置值”表格。 |
| Title | 可选。字符串表达式，在对话框标题栏中显示的内容。如果省略Title，则将应用程序标题（App.Title）放在标题栏中。 |
| Helpfile | 可选。字符串表达式，用来向对话框提供上下文相关帮助的帮助文件。如果提供了Helpfile，则也必须提供Context。 |
| Context | 可选。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context，则也必须提供Helpfile。 |
参数设置值（Buttons参数设置值）
| 常数 | 值 | 描述 |
| 对话框中显示的按钮的类型与数目 |
|
|
| vbOKOnly | 0 | 只显示“确定”按钮。（缺省） |
| vbOKCancel | 1 | 显示“确定”和“取消”按钮。 |
| vbAbortRetryIgnore | 2 | 显示“终止”、“重试”和“忽略”按钮。 |
| vbYesNoCancel | 3 | 显示“是”、“否”和“取消”按钮。 |
| vbYesNo | 4 | 显示“是”和“否”按钮。 |
| vbRetryCancel | 5 | 显示“重试”和“取消”按钮。 |
| 图标的样式（根据系统设置，可能伴有声音） |
|
|
| vbCritical | 16 | 显示“错误信息”图标。 |
| vbQuestion | 32 | 显示“询问信息”图标。 |
| vbExclamation | 48 | 显示“警告消息”图标。 |
| vbInformation | 64 | 显示“通知消息”图标。 |
| 默认按钮 |
|
|
| vbDefaultButton1 | 0 | 第一个按钮是默认按钮。（缺省） |
| vbDefaultButton2 | 256 | 第二个按钮是默认按钮。 |
| vbDefaultButton3 | 512 | 第三个按钮是默认按钮。 |
| vbDefaultButton4 | 768 | 第四个按钮是默认按钮。 |
| 对话框的强制返回性 |
|
|
| vbApplicationModal | 0 | 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。 |
| vbSystemModal | 4096 | 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。 |
| 对话框特殊设置 |
|
|
| vbMsgBoxHelpButton | 16384 | 将帮助按钮添加到消息框。 |
| vbMsgBoxSetForeground | 65536 | 指定消息框窗口作为前景窗口。 |
| vbMsgBoxRight | 524288 | 文本为右对齐。 |
| vbMsgBoxRtlReading | 1048576 | 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示。 |
这些常数都是Visual Basic for Applications（VBA）指定的。所以，可以在程序代码中使用这些常数名称，而不使用实际数值。
MsgBox函数返回值
| 常数 | 值 | 描述 |
| vbOK | 1 | 单击了“确定”按钮。 |
| vbCancel | 2 | 单击了“取消”按钮。 |
| vbAbort | 3 | 单击了“终止”按钮。 |
| vbRetry | 4 | 单击了“重试”按钮。 |
| vbIgnore | 5 | 单击了“忽略”按钮。 |
| vbYes | 6 | 单击了“是”按钮。 |
| vbNo | 7 | 单击了“否”按钮。 |
1、调整文本框空格的代码：（就是文本框中还没有输入任何字符的时候，单击空格键产生的空格的情况）
Private Subtxtname_Click() Dim s As String s = txtName.Text s = Replace(s, " ", "") txtName.Text = sEnd Sub
2、只能输入汉字：（这个主要是应用到文本框中只能输入汉字的情况）
Private SubtxtDirector_KeyPress(KeyAscii As Integer) If KeyAscii > 0 And KeyAscii <> 13And KeyAscii <> 8 Then KeyAscii = 0End Sub
3、限制特殊的字符：（其实在百度上可以搜到很多类似的代码，但是他们有很多情况限制不住，我这个可以限制住，但是也会有很多的其他缺陷）
Private SubtxtClassroom_KeyPress(KeyAscii As Integer) If ((KeyAscii >= 48 And KeyAscii <=57) Or (KeyAscii >= 65 And KeyAscii <= 90) Or _ (KeyAscii >= 97 And KeyAscii <=122) Or (KeyAscii = 8)) = flase Then KeyAscii = 0End Sub
EOF：为End OfFile的缩写，在操作系统中表示资料源无更多的资料可读取；在C语言中，或更精确地说成C标准函数库中表示文件结束符（end offile）。在while循环中以EOF作为文件结束标志，这种以EOF作为文件结束标志的文件，必须是文本文件。在文本文件中，数据都是以字符的ASCII代码值的形式存放。我们知道，ASCII代码值的范围是0~127，不可能出现-1，因此可以用EOF作为文件结束标志。
BOF：Beginning offortune一个好运的开始，
在电脑的术语缩写通常为BOF，在作业系统决定资料源无更多的资料可读取。资料源通常称为档案或串流。bof用于指在第一条记录的前面，当记录集为空是，bof和eof都为true。
学习本来就是一个循序渐进的过程，一点一点的积累，一点一点的学习，一点一点的总结，总有一天你可以摸到它的全貌。
转载地址：http://fhlgz.baihongyu.com/