《报销教程》学习小结

时　间:2007-12-07 12:54:31
作　者:suve   ID：364  城市：武汉
摘　要:《报销教程》学习小结
正　文:

一、不明白的代码或过程：
1.Dao.Recordset
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("tblCodeyg", dbOpenDynaset)
 rst.AddNew
 rst("ygId") = acchelp_autoid("Y", 2, "tblCodeyg", "ygId")
 rst("ygxm") = Me.ygxm
 rst.Update
 rst.Close
 Set rst = Nothing

    关于表和记录操作之类的命令总不理解，可以抄用，但不明白。就像小孩说话，可以说出来，但不知道什么意思，所以就不分场合，乱用。孩子可以童言无忌，程序却总是蹦错误出来，到你改到屈服为止。

Me.RecordSource = "Select * FROM tblCodeyg Where ygId  = '" & selectstr & "'"
 g_CurrentSelectStrID = selectstr  这个东西看起来怪怪的，不明白

2. Acchelp_StrDataIsExist( , , ) 自定义函数？
3.窗体属性成为当前事件=selectrecord()
4.ToolbarFrm_ButtonClick(ByVal Button As Object)
5.Forms!usysfrmMain!frmChild.SourceObject = "frmyg_child"     
DoCmd.Echo True
6  '触发子窗体计时器事件
    Forms!usysfrmMain!frmChild.Form.TimerInterval = 300
    DoCmd.Close acForm, "frmyg_child_Edit"
    End Sub
    Acchelp_FindstrRecord (g_CurrentSelectStrID)
    '计时器执行一次后不再执行
    Me.TimerInterval = 0

7.引用的作用
无论如何，继续下一步学习，小学一年级不必记得书上所有的字。