Home > Visual Basic 6 > Membuat Form Agar Tidak Bisa Di Maximize Pada Visual Basic

Membuat Form Agar Tidak Bisa Di Maximize Pada Visual Basic

Source code berikut untuk membuat form agar tidak bisa di-maximize. Tombol maximize pada form di-disable sehingga form tersebut tidak bisa di-maximize.

Buat 1 project dengan :
1 Form

Copy source code berikut pada Form : 

Private Const GWL_STYLE = (-16)
Private Const WS_MAXIMIZEBOX = &H10000

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
        (ByVal hwnd As Long, ByVal nIndex As Long, _
        ByVal dwNewLong As Long) As Long

Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
        (ByVal hwnd As Long, ByVal nIndex As Long) As Long

Private Sub Form_Load()
Dim lStyle As Long

    'disable MAXIMIZE button
    lStyle = GetWindowLong(Me.hwnd, GWL_STYLE)
    lStyle = lStyle And Not WS_MAXIMIZEBOX
    Call SetWindowLong(Me.hwnd, GWL_STYLE, lStyle)
End Sub
  1. July 14, 2010 at 11:17 am

    wew..tengkyu boy…berhasil🙂

  2. July 14, 2010 at 11:19 am

    sip… sama-sama….

  3. August 4, 2010 at 11:15 pm

    gmn ya source kode simpan gambar dengan menggunakan vb 6.0 ke database access. terus kalo di klik tombol edit muncul dan dilaporan juga muncul. mohon bantuanya.

  4. August 4, 2010 at 11:16 pm

    gmn ya source kode simpan gambar dengan menggunakan vb 6.0 ke database access. terus kalo di klik tombol edit gambarnya muncul dan dilaporan juga muncul. mohon bantuanya.

  5. Faiz
    January 28, 2011 at 2:58 am

    Kode diatas memang mematikan tombol maximize pada form, namu jika diklik double pada title bar ada pengaruhnya…

  6. TYO
    May 6, 2011 at 10:43 am

    gmana caranya menyambungkan powerpoin ke vb6 ato database

  7. TYO
    May 6, 2011 at 10:43 am

    gmana caranya menyambungkan powerpoin ke vb6 ato database?

  8. July 20, 2012 at 9:01 am

    gk bisa

  9. August 26, 2012 at 8:46 pm

    TQ. InFoNyA BiSaQ .
    Memanq Okeq.
    Biar Bisa Bantu Dapetin Scourse Code Disini:
    (
    http://putravb.blogspot.com/
    )
    Blognya sudah tidak akan diupdate(Lihat Saja Home Tampilan Utamanya).
    Aku pembaca setia bloq niq.

  10. September 24, 2012 at 7:26 pm

    Thank you ^^

  1. No trackbacks yet.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: