๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #407

Re: CommandButton evento click - vb6

#407
From: Dexter Ward
Date: Wed, 07 Jun 2006 09:38
30 lines
1785 bytes
Aneco ha scritto:

> Ciao,
> vi spiego cosa vorrei fare:
> cliccando la prima volta sul CommandButton vorrei ingrandire il form
> (rendendo visibile alcuni controlli all'interno del form), dopodich๏ฟฝ
> cliccando sempre sullo stesso CommandButton vorrei riportare il form
> alle dimensioni originarie, come posso gestire la cosa?
> spero di essere stato chiaro.
>
> grazie, ciao

Private m_resizeme As Boolean
Public Property Let ResizeMe(ByVal newvalue As Boolean)
    m_resizeme = newvalue

    If newvalue Then
        Me.WindowState = vbMaximized
    Else
        Me.WindowState = vbNormal
    End If
End Property

Public Property Get ResizeMe() As Boolean
    ResizeMe = m_resizeme
End Property

Private Sub Command1_Click()
    ResizeMe = Not ResizeMe
End Sub
Technical Details
Message-ID: <44869ea2$0$36934$4fafbaef@reader3.news.tin.it>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news2.volia.net!feeder.news.tin.it!spool.news.tin.it!not-for-mail
References: <1147952006.246295.296390@u72g2000cwu.googlegroups.com>

Show Full Headers
Complete Article Headers
X-Google-Thread: f94ee,466e82fc2fe7b465
X-Google-Attributes: gidf94ee,public
X-Google-Language: ITALIAN,ASCII
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news2.volia.net!feeder.news.tin.it!spool.news.tin.it!not-for-mail
From: "Dexter Ward" <dw@infracoop.net>
Newsgroups: free.it.visual-basic
References: <1147952006.246295.296390@u72g2000cwu.googlegroups.com>
Subject: Re: CommandButton evento click - vb6
Date: Wed, 7 Jun 2006 11:38:35 +0200
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2869
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2869
X-RFC2646: Format=Flowed; Original
Lines: 32
Message-ID: <44869ea2$0$36934$4fafbaef@reader3.news.tin.it>
Organization: TIN.IT (http://www.tin.it)
X-Comments: Please send technical notifications to newsmaster@tin.it
NNTP-Posting-Host: 80.183.164.10
X-Trace: 1149673122 reader3.news.tin.it 36934 80.183.164.10:21588
X-Complaints-To: Please send abuse reports to abuse@tin.it