学生信息管理系统总结（二）

内部知识点的理解和一些含义解释：[/b]Trim( ): 删除字符串首尾的空白（可以首尾一起，也可以指定首或尾，取决于控制参数），但会保留字符串内部作为词与词之间分隔的空格。[/b]语 法:Trim ( string )[/b]各种 trim 函数的语法如下：[/b]1.[/b]LTRIM(字串):将字串左边的空格移除。[/b]2.[/b]RTRIM(字串): 将字串右边的空格移除。[/b]3.[/b]TRIM(字串): 将字串首尾两端的空格移除,作用等于RTRIM和LTRIM两个函数共同的结果。[/b]4.[/b]ALLTRIM(字串)：将字串左右边两边的空格移除。[/b]__________________________________________________[/b]BOF和EOF：[/b]BOF 指示当前记录位置位于 Recordset 对象的第一个记录之前。EOF 指示当前记录位置位于 Recordset 对象的最后一个记录之后。

查询到的解决上图问题的解决方案：1. if（mrc.BOF And mrc.EOF）then Msgbox"无数据"，vbOKOnly+vbExclamation,"温馨提示：" Else mrc.MoveFirst End If Exit Sub2.on error resume next rss.movefirst if err=3021 then response.write "无数据！" end if———————————————————————————————日期问题：[/b]在程序中有添加学籍信息一项，常识都知道入校日期当然得晚于出生日期啦，所以可能需要这样啦[/b]If DateDiff("d",txtBornDate,txtRuDate)<0 then[/b] Msgbox"日期设置不合理"，vbOKOnly+vbExclamation,"温馨提示："[/b] txtRuDate.Text=""[/b]End If[/b]________________________________________________________[/b]StatusBar控件：StatusBar1是状态栏控件的名称；Panels(1).Text表示状态栏上第1个空格所显示的文本内容，Panels（1）代表状态栏控件的第一个窗格；Format(Date, "\yyyy年mm月dd日\")这是调用格式函数Format，设置文本格式，Format函数可以将信息设置成你所需要的显示形式（格式）。[/b]

改正办法：[/b]1.删除sbStatusBar.Panels(1).Text = "添加用户"或者将它注释掉[/b]2.新建form取名sbStatusBar，然后在这个窗体上新建个文本框取名Panels，并且文本框属性index为1就可以了。[/b]———————————————————————————————[/b]参数不可选问题：[/b]参数的数量和类型必须符合预期。此错误的原因和解决方案如下：1. 参数数量不正确。请提供所有必要的参数。例如，Left 函数需要两个参数；第一个表示要操作的字符串，第二个表示要从字符串左侧返回的字符数。由于两个参数都不是可选参数，因此必须同时提供。2.省略的参数不是可选参数。只有在过程声明中将参数声明为 Optional 时，才能在对用户定义的过程的调用中省略该参数。请在调用中提供参数，或在定义中将该参数声明为 Optional参数。_______________________________________________________[/b]窗体大小设置：[/b]窗体有个borderStyle属性 设置成3就是固定不变的了[/b]电话位数设置：1.还记得窗体那里有个max和min设置吗？2.修改数据库里的属性将char（10）修改为char（11）就可以将10位电话号码修改为11位电话号码。[/b]TEXT文本被选中设置：[/b]很多时候，截面上有很多文本框，我们希望实现每一次文本框得到焦点时，全部内容都处于被选中的状态。我现在知道的方法是： [/b]
[/b]Private Sub Text_GotFocus()[/b]
Text.SelStart = 0
Text.SelLength = Len(Text.Text)
End Sub[/b]
[/b]如果界面上有20个文本框，这段代码就要被写20次。很容易有遗漏或者由于反复拷贝造成错误。有没有什么好的办法，可以在一个函数里对文本框设置这个功能。比如说，有没有一个函数可以实现[/b]

SetControlStyle(Text.hWnd, AutoSelectContent)[/b]ExecuteSQL[/b]Set mrc = ExecuteSQL(txtSQL, MsgText)经过查询发现是这样的。ExecuteSQL是个函数，它可以直接执行sql的语句，txtSQL就是咱们用来执行的sql语句，而MsgText就是个弹出框，告诉咱们到底成功了没。[/b]$ [/b]If str2$ = vbOK ，$代表string，因为msgbox返回的是数值，ok返回的是"1"cancel返回的是"2"。[/b]