#2
Function BOYUT()
On Error GoTo BOYUT_Err
DoCmd.MoveSize , , 8222, 6521
BOYUT_Exit:
Exit Function
BOYUT_Err:
MsgBox Error$
Resume BOYUT_Exit
End FunctionFunction kapadisk()
On Error GoTo kapadisk_Err
DoCmd.Close acForm, "Lisans_00"
DoCmd.OpenForm "Lisans_02", acNormal, "", "", , acNormal
kapadisk_Exit:
Exit Function
kapadisk_Err:
MsgBox Error$
Resume kapadisk_Exit
End Function| Bu Konudaki Yorumlar |
|
lisanslama örneğindeki makroları kaldırma - Yazar: ozguryasin - 04/09/2010, 00:30
Cvp: lisanslama örneğindeki makroları kaldırma - Yazar: ercansahin - 04/09/2010, 00:38
Cvp: lisanslama örneğindeki makroları kaldırma - Yazar: Kur@l - 04/09/2010, 00:52
Cvp: lisanslama örneğindeki makroları kaldırma - Yazar: ercansahin - 04/09/2010, 01:07
Cvp: lisanslama örneğindeki makroları kaldırma - Yazar: ozguryasin - 04/09/2010, 03:03
Cvp: lisanslama örneğindeki makroları kaldırma - Yazar: ercansahin - 04/09/2010, 23:39
|
