Condividi:        

Tasti di sistema form

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Tasti di sistema form

Postdi piter123 » 05/07/08 14:57

Buongiorno, come faccio su una form di vbe a far apparire i tasti di sistema riduci a icona e ripristina ?
Ho un command buttom con funzione form.show che apre la form, esiste un controllo che faccia aprire solo una volta la form ?
Grazie
piter123
Utente Senior
 
Post: 190
Iscritto il: 07/11/07 18:31

Sponsor
 

Re: Tasti di sistema form

Postdi Anthony47 » 06/07/08 17:44

Qualcuno lo fa, vedi ad esempio vedi FormFun.zip su http://www.bmsltd.co.uk/Excel/Default.htm
Io mi sono accontentato di molto meno, cioe:
-sulla form, in alto a sx, disegno un Interruttore (ToogleButton), con la descrizione (proprieta' Caption) "Min/Max"; poi uso il seguente codice
Codice: Seleziona tutto
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then
'  Riduci
Me.Height = 50
Me.Width = 50
Me.Top = Application.Top + Application.Height - Me.Height
Me.Left = Application.Left + Application.Width - Me.Width
Else
'  Ingrandisci
Me.Height = 200
Me.Width = 300
Me.Top = 250
Me.Left = 400
End If
End Sub


In questo modo, premendo il tooglebutton la form si riduce spostandosi in basso a dx e si ingrandisce tornando al centro. Setta Top, Left, Height e Width in modo da avere la form posizionata correttamente (o usa delle variabili globali per memorizzare il valore di queste grandezze all' apertura della form, e poi ripristinarle).

Per la seconda domanda, io gestirei l' apertura (riapertura) della form tramite una variabile che metti a 1 quando attivi la form (es con una Sub UserForm_Activate()) e azzeri quando la termini (Sub UserForm_Terminate())

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Tasti di sistema form

Postdi piter123 » 07/07/08 09:26

gazie mille, ora farò delle prove
piter123
Utente Senior
 
Post: 190
Iscritto il: 07/11/07 18:31


Torna a Applicazioni Office Windows


Topic correlati a "Tasti di sistema form":


Chi c’è in linea

Visitano il forum: Ricky0185 e 46 ospiti