博客
关于我
学生信息管理系统(VB 干货篇三)
阅读量:741 次
发布时间:2019-03-21

本文共 2558 字,大约阅读时间需要 8 分钟。

<div>引言</div>

最近一直在学生信息管理系统徘徊不前,不敢进入机房。分析其主要原因是之前的知识学的有点Low,不敢前进,怕进到机房也是停着,所以一直徘徊在这里。因此最近总结了很多VB中的基础知识。比如:常用的函数(因为每次都能在代码中看到,但是就是不理解是什么含义,更不知道怎么使用);一些优化学生系统的代码段等。
正文
一、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)
结果为:"efg"
(2) X="abcdefg"
P=Mid(X,2,4)
结果为:"bcde"
4. StrReverse:反转字符串
[格式]: P=StrReverse(X)
[说明]: 返回X参数反转后的字符串
[范例]: (1)X="abc"
P=StrReverse(X)
输出结果:"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值的表示用户单licked哪一个按钮
语法: MsgBox(Prompt[,Buttons], [Title], [Helpfile, Context])
[参数]:
Prompt: 必选。字符串表达式,在对话框中的消息。Prompt的最大长度约为1024个字符,由所用字符的字节大小决定。如果Prompt包含多行,可以通过回车符、换行符或两者的组合(如Chr(13) & Chr(10),即vbCrLf)将各行分隔开。
Buttons: 可选。数值表达式,指定对话框中的按钮数量及形式、图标样式(及声音)。缺省按钮及消息框的强制性等。如果省略,缺省值为0。
Title: 可选。字符串表达式,对话框标题栏中的内容。如果省略,应用程序标题(App.Title)显示在标题栏中。
Helpfile: 可选。字符串表达式,提供对话框的上下文相关帮助的帮助文件。如果提供了Helpfile,Context也必须提供。
Context: 可选。数值表达式,由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context,Helpfile也必须提供。
MsgBox函数返回值: 请参见以下表格
二、优化学生系统中常用的代码段
1. 调整文本框空格的代码
Private Sub txtname_Click()
Dim s As String
s = txtName.Text
s = Replace(s, " ", "")
txtName.Text = s
End Sub
2. 只能输入汉字的代码
Private Sub txtDirector_KeyPress(KeyAscii As Integer)
If KeyAscii > 0 And KeyAscii < 13 And KeyAscii > 8 Then KeyAscii = 0
End Sub
3.限制特殊字符的代码
Private Sub txtClassroom_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)) = false Then KeyAscii = 0
End Sub
三、其他常用代码示例
EOF:End of File的缩写。在C语言中或其他精确的标准函数库中表示文件结束符。在while循环中,以EOF作为文件结束标志。这种以EOF作为文件结束标志的文件必须是文本文件。在文本文件中,数据是以字符的ASCII代码值形式存储的。由于ASCII代码值的范围是0~127,不会出现-1,因此可以用EOF作为文件结束标志。
BOF:Beginning of File,一个好运的开始。在作业系统中,BOF用于表示资料源的第一条记录之前的内容,通常用于记录集为空的情况。
总结
学习本来就是一个循序渐进的过程,点点积累,点点总结,一天一天地细细入微,你最终会完全掌握它。

转载地址:http://fhlgz.baihongyu.com/

你可能感兴趣的文章
MQTT介绍及与其他协议的比较
查看>>
MQTT工作笔记0007---剩余长度
查看>>
MQTT工作笔记0008---服务质量
查看>>
MQTT工作笔记0009---订阅主题和订阅确认
查看>>
Mqtt搭建代理服务器进行通信-浅析
查看>>
MS COCO数据集介绍
查看>>
MS Edge浏览器“STATUS_INVALID_IMAGE_HASH“兼容性问题
查看>>
ms sql server 2008 sp2更新异常
查看>>
MS SQL查询库、表、列数据结构信息汇总
查看>>
MS UC 2013-0-Prepare Tool
查看>>
MSBuild 教程(2)
查看>>
msbuild发布web应用程序
查看>>
MSB与LSB
查看>>
MSCRM调用外部JS文件
查看>>
MSCRM调用外部JS文件
查看>>
MSEdgeDriver (Chromium) 不适用于版本 >= 79.0.313 (Canary)
查看>>
MsEdgeTTS开源项目使用教程
查看>>
msf
查看>>
MSP430F149学习之路——SPI
查看>>
msp430入门编程45
查看>>