学生-代码模块理解

‘定义全局变量知道已登录信息

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语句拆分为一个数据

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

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

$ 表示返回类型 为字符型

Instr函数:返回字符或字符串在另一个字符串中第一次出现的位置查找SQL语句第一个单词,能找到就继续执行。找不到就执行else

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

这是单个退出点

	Set rst = Nothing '清空数据集对象
	Set cnn = Nothing '中断连接
Exit Function

当执行正确的时候就直接退出了Exit Function,如果出错了才执行错误处理语句。单个退出点的作用就是确保出错时才执行错误处理语句。

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章