forma23
elenco proprietà per USERFORM Name assegnare nome a oggetto Backcolor assegnare colore per sfondo da tavolozza colori o lista colori Bordercolor assegnare colore per bordo da tavolozza colore o sistema Borderstyle assegnare stile bordo nessuno=0 unico = 1 Caption assegnare testo da visualizzare in oggetto Cycle 0 - 2 DrawBuffer assegnare valore (32000) Enabled abilita True o disabilita False oggetto Font assegna stile,font,dimensione,effetti ForeColor assegnare tavolozza colori o sistema Height assegnare valore altezza HelpContextID assegnare valore =.. KeepScrollBarsVisible assegnare 0-1-2-3 Left assegnare valore distanza da margine sinistro Mouseicon assegnare icona per oggetto MousePointer assegnare forma per cursore 0...9 Picture indicare percorso per caricare immagine PictureAlignment assegnare giustificazione immagini PictureSizeMode assegnare dimensioni immagine PictureTiling assegnare True o false ScrollBars assegnare valore per modo scorrimento SelectionMargin true-false ScrollHeight assegnare valore 0... ScrollLeft assegnare valore 0.. ScrollTop assegnare valore 0... ScrollWidth assegnare valore 0.. SpecialEffect assegnare valori 0...6 StartupPosition assegnare posizione iniziale 0-1-2-3 Tag assegnare tag Top assegnare distanza margine superiore VerticalScrollBarSide assegnare valore 0-1 WhatsThisButton false - true WatsThisHelp false - true Width assegnare larghezza Zoom assegnare valore
elenco proprietà USERFORM ASPETTO BackColor BorderColor Bordestyle 0-1 Caption ForeColor SpecialEffect 0...6 AZIONI Cycle 0-2 enabled true CARATTERE font IMMAGINE picture picturealignment 0..4 picturesizemode 0.1.2 picturetiling false POSIZIONE height left StartUpPosition 0.1.2.3 Top Width SCORRIMENTO KeepScrollBarsVisible 0.1.2.3 Scrollbars 0.1.2.3 ScrollHeight 0 ScrollLeft 0 ScrollTop 0 ScrollWidth 0 VerticalScrollBarSide 0.1 VARIE name Drawbuffer 32000 HelpContextID 0 MouseIcon Mousepointer 0..9 tag WhatsThisButton false WhatsThisHelp false zoom 100
codice per Userform corrente Private Sub UserForm_Click() UserForm23.BackColor = vbCyan UserForm23.BorderColor = vbRed UserForm23.BorderStyle = fmBorderStyleSingle UserForm23.Caption = "userform23" UserForm23.Cycle = fmCycleAllForms UserForm23.DrawBuffer = 32000 UserForm23.Enabled = True UserForm23.Font = times UserForm23.ForeColor = vbRed UserForm23.Height = 300 UserForm23.Left = 10 UserForm23.HelpContextID = 1 UserForm23.KeepScrollBarsVisible = 3 UserForm23.Left = 50 UserForm23.MousePointer = fmMousePointerArrow UserForm23.PictureAlignment = fmPictureAlignmentCenter UserForm23.PictureSizeMode = 0 UserForm23.PictureTiling = True UserForm23.ScrollBars = fmScrollBarsBoth UserForm23.SpecialEffect = fmSpecialEffectSunken UserForm23.StartupPosition = 2 UserForm23.Tag = "tag inserita" UserForm23.Top = 20 UserForm23.VerticalScrollBarSide = fmVerticalScrollBarSideRight UserForm23.Width = 400 UserForm23.Zoom = 100 End Sub