Visual Basic DoCmd, , . .
1. , .
2. → → (Database Tools → Macro → Convert Macros to Visual Basic). , → → (Database Tools → Macro → Convert Form's Macros to Visual Basic).
(. 17.9).
. 17.9. , Access FindHayEater
3. , , (Add error handling to generated functions) .
.
4. VB, , (Include macro comments).
, .
5. (Convert).
Access , - [] (Converted Macro-[YourMacroName]). Access . (. . " " 15), Access .
Access Visual Basic, .
15 ( . " " 15), AnimalTypes:
Function FindHayEater ()
On Error GoTo FindHayEater_Err
DoCmd.OpenForm "AnimalTypes", acNormal, " ", " ",, acNormal
DoCmd.GoToControl "Diet"
DoCmd.FindRecord "=""hay""", acAnywhere, False,, _
False, acCurrent, False
FindHayEater_Exit: Exit Function
FindHayEater_Err:
MsgBox Error$
Resume FindHayEater_Exit End Function
, DoCmd DoCmd. OpenForm , GoToControl Diet , , , "hay". , (""). Visual Basic ( , ). , , . , .
, FindHayEater__Err, .
, Access , . , . . . (-, Access , .)