学生--代码模块理解

学生验收也有一段时间了，在验收的过程中提到了模块中的代码。当时优化的时候没有好好研究。下面就来剖析一下为什么要用到它，它是什么意思。希望可以帮助同学们。

'定义全局变量知道已经登录的信息

Public username As String

这是类型变量

Public fmainform As FrmMain      

'传递参数SQL传递查询语句，MsgString传递查询信息。自身以一个数据集对象的形式返回

Public Function executeSQL(ByVal SQL As String, msgstring As String) As ADODB.Recordset

异常处理

On error goto executeSQL_error 

'用Split函数产生一个包含各个子串的数组 

Split 函数返回一个下标从0开始的一位数组   本身split也有分开的意思

把SQL语句拆分为一个数据

例如：

SQL ="select*from user_info"                
'split(SQL)                 
'stokens(0)=select  
stokens(1)=*   
stokens(2)= from 
stoken(3)=user_info                 

'判断字符串中是否含有制定内容

If InStr("INSERT,DELETE,UPDATE", UCase$(sTokens(0))) Then

$    表示返回类型 为字符型

Instr函数：返回字符或字符串在另一个字符串中第一次出现的位置

查找SQL语句第一个单词，能找到就继续执行。找不到就执行else

ucase是小写转大写的类型

 msgstring = sTokens(0) & " query successful"

 msgstring 不是返回值，传递方式采用传址，与实参地址相同