Kalau main window kecil sendiri sesuai size form, saya belum tahu, tapi kalau
main window nya ilang alias nggak keliatan saat buka form tsb, Mas Narupi bisa
melakukan beberapa langkah sbb:
Pastikan properties "Pop up" dan "Modal" dari form tersebut diset menjadi True
(Yes). Kemudian pada properties VBA form tsb, tambahkan procedure sbb:
Option Compare Database
Option Explicit
Private Declare Function ShowWindow Lib "user32" ( _
ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
Private Sub Form_Open(Cancel As Integer)
On Error GoTo nol
Dim lngReturn As Long
lngReturn = ShowWindow(Application.hWndAccessApp, 0)
nol:
End Sub
Private Sub Form_Close()
On Error GoTo nol
Dim lngReturn As Long
lngReturn = ShowWindow(Application.hWndAccessApp, 3)
nol:
End Sub
Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi.
http://opi.110mb.com/
----- Original Message -----
From: [EMAIL PROTECTED]
To: [email protected]
Sent: Monday, July 30, 2007 2:18 PM
Subject: [belajar-access] Restore down
> Dear pakar access.
> Saya member baru nih dan langsung saja saya mau minta tolong.
>
> Bagaimana ya source code untuk mengecilkan jendela windows pada
> microsoft access. Bukan formnya.
> Jadi jika membuka file tertentu yang berbentuk access maka secara
> otomatis windows akan mengecil.
> Lihat attach
>
> Thanks & Best Regards
>
> Narupi
> Incoming Material
> Infineon Batam
> Telp. (0778) 611204 ext: 406
> mailto:[EMAIL PROTECTED]
>
>
