Results 1 to 4 of 4

Thread: Expand/Contract a User Form

Threaded View

Previous Post Previous Post   Next Post Next Post
  1. 10-27-2008, 01:44 AM #4
    phendrena
    phendrena is offline
    VBAX Tutor phendrena's Avatar
    Joined
    Oct 2008
    Location
    Huddersfield, UK
    Posts
    285
    Location
    Quote Originally Posted by david000
    A simpler approach is to use the caption property, then toggle the height and width. 
    Private Sub OptionsButton_Click()
    If OptionsButton.Caption = "Options >>" Then
        Me.Height = 164
        OptionsButton.Caption = "<< Options"
    Else
        Me.Height = 128
        OptionsButton.Caption = "Options >>"
    End If
End Sub
    The attachment is from John Walkenbach.
    Thats exactly what i'm looking for.
    Thank you.
    Last edited by Aussiebear; 02-26-2025 at 03:17 PM.
    Somewhere in the dark and nasty regions where nobody goes, stands an ancient castle.
    Deep within this dank and uninviting place lives Berk, overworked servant of The Thing Upstairs.
    But thats nothing compared to the horrors that lurk beneath The Trap Door.
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules