Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - codice vb resize form e webbrowser
Forum - Visual Basic 6 - codice vb resize form e webbrowser

Avatar
Nencio (Normal User)
Newbie


Messaggi: 3
Iscritto: 29/12/2008

Segnala al moderatore
Postato alle 21:52
Lunedì, 29/12/2008
salve a tutti, ridimensionando un form, vorrei che il controllo webbrowser si ridimensioni, quindi allargando la finestra del form, si allarghi anche il controllo webbrowser.
ho provato con questo codice:

Private Sub Form_Resize()
Dim yMargin As Single
On Error Resume Next
yMargin = ProgressBar1.ScaleHeight + 15

Form1.Left = 0
Form1.Top = 0
WebBrowser1.Width = Me.ScaleWidth
WebBrowser1.Height = Me.ScaleHeight - yMargin
End Sub

però non funziona, e mi dice:
Errore di Compilazione, impossibile trovare il metodo o il membro dei dati.

PM Quote
Avatar
Alceus (Member)
Expert


Messaggi: 288
Iscritto: 22/07/2008

Segnala al moderatore
Postato alle 14:29
Martedì, 30/12/2008
L'errore si riferisce all'oggetto ProgressBar1, che non possiede la proprietà ScaleHeight...

PM Quote
Avatar
Nencio (Normal User)
Newbie


Messaggi: 3
Iscritto: 29/12/2008

Segnala al moderatore
Postato alle 15:25
Martedì, 30/12/2008
ok allora come posso fare per fare in modo che al ridimensionamento del form si ridimensioni anche il controllo webbrowser e la progressbar posta al di sotto del webbrowser si sposti rimanendo alla stessa distanza?? grazie

PM Quote
Avatar
Nencio (Normal User)
Newbie


Messaggi: 3
Iscritto: 29/12/2008

Segnala al moderatore
Postato alle 20:21
Martedì, 30/12/2008
già risolto tutto, funziona.
una cosa banale invece:
ho una combobox dove io digito l'indirizzo da navigare, vorrei aggiungere un commandbutton "Vai" per far iniziare la navigazione.
quale è il codice?? grazie ancora

PM Quote
Avatar
Alceus (Member)
Expert


Messaggi: 288
Iscritto: 22/07/2008

Segnala al moderatore
Postato alle 17:08
Mercoledì, 31/12/2008
È facile: mettiamo che il CommandButton si chiami cmdNavigate, il ComboBox cmbAddress e il WebBrowser web.
Il codice sarà il seguente:
Codice sorgente - presumibilmente VB.NET

  1. Private Sub cmdNavigate_Click()
  2. web.Navigate cmbAddress.Text
  3. End Sub


Ah, per semplificare, puoi fare la stessa cosa premendo il tasto Invio nel cmbAddress in questo modo:
Codice sorgente - presumibilmente VB.NET

  1. Private Sub cmbAddress_KeyDown(KeyCode As Integer, Shift As Integer)
  2. If KeyCode = vbKeyReturn Then cmdNavigate_Click 'Se si preme il tasto Invio (vbKeyReturn) richiama la sub cmdNavigate_Click
  3. End Sub


:k:

Ultima modifica effettuata da Alceus il 31/12/2008 alle 17:15
PM Quote