TextBox + Webbrowser : Incompatible dans la form 2 ?Résolu

Question

Salut,
Je suis sur la conception d'un navigateur web. Mon problème est un peu dur : J'ai une autre form. Je veux mettre un TextBox dans la form2 pour naviguer avec le Webbrowser dans la form1
Merci d'avance, Jérém'
PS : Je précise que je suis sous VB 2008

cnt · Accepted Answer

Je détaille
il faut aller sur le menu Projet et choisir la ligne Ajouter un Module
et là, écrire dans celui-ci:
Public AddressURL As String = "" 


ensuite, si Form2 est bien la dite boite de dialogue, ce que tu as écrit dans le LOAD peut être valable, mais que pour l'init du TextBox --> TextBox1.Text = AdresseURL 
par contre le stockage aprés modif du TextBox doit se faire au moment de la validation de l'adresse par le bouton d'activation du WebBrowser

Private Sub Command1_Click(......)
   AdresseURL = TextBox1.Text
   ....
   Lancement du WebBrowser
End Sub 

Bonne suite

cs_DARKSIDIOUS · Answer

Salut,

Si tu fais du vb.net, pourquoi tu poste dans le forum VB6 ?

Je déplace vers le forum approprié.
______________________________________

AVANT de poster votre message, veuillez lire, comprendre, et appliquer notre réglement

JeremyZoe · Answer

Re,
Je vient de reussir. En fait il fallait que je met:

    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(Form2.TextBox1.Text)
    End Sub

Maintenant mon problème est le suivant : 
Quand je rentre une adresse dans le TextBox et que je ferme la boite de dialogue et que la réouvre, le lien n'est plus là.
Quand je laisse la boîte de dialogue ouvert, il me met about:blanck
Que faire ???

JeremyZoe · Answer

Je suis sous VB 2008 et non pas VB.NET
Cordialement, Jérémy

cs_DARKSIDIOUS · Answer

Salut,

VB 2008, c'est du VB.NET. VB.NET a commencé en 2002 en remplacement de VB6, maintenant on en est à VB.NET 2008, et très bientôt (4 jours) on aura VB.NET 2010.
______________________________________

AVANT de poster votre message, veuillez lire, comprendre, et appliquer notre réglement

JeremyZoe · Answer

A d'accord je ne savais pas,Merci,mais je n'ai toujours pas de réponse à ma question ...

cnt · Answer

Bonjour
Il faudrait peut-être attribuer à une variable public le contenu de "Form2.TextBox1.Text", pour que le lien soit toujours présent jusqu'à son changement.


CNTJC

JeremyZoe · Answer

Salut, merci pour ton aide, mais ca ne fonctionne pas. Voici mon code :
Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        Dim TextBox1 As String = Form2.TextBox1.Text
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox1)
    End Sub
End Class

Je précise que j'ai des TabSheets et que quand je fais OK dans la boite de dialogue, l'addresse ne se sauvegarde pas.
Cordialement, Jérém'

cnt · Answer

Re
La déclaration doit se faire dans un module comme suite:
Public TextBox1 As String

ainsi que l'affectation  
VariableTextBox1 = Form2.TextBox1.Text 

CNTJC

JeremyZoe · Answer

Re, je réexplique mon problème:
Je suis en train de créer un navigateur web à onglet, utilisant un TabControl. Je veux faire des raccourci web pour quand on clique sur un bouton, le site apparait directement sur le WebBrowser. L'adresse est stockée dans un TextBox dans une autre Form (boite de dialogue),qui est comme une fenêtre d'options. Le problème, c'est qu'a chaque fois que je ferme la boite de dialogue, le texte s'efface. Que faire pour que le texte reste là et que les raccourcis fonctionnent.
Merci d'avance, je compte sur vous , Jérém'

cnt · Answer

Bonjour
Suite à tes explications, il me semble y voir un peu plus clair.
Voila comment je procéderai:

Dans un module existant ou à ajouter, déclarer une variable de stockage de la dernière adresse URL. 
Dans le Module
Public AdresseURL As String =  ""

Puis dans la  Boite de Dialogue , au moment de chaque ouverture, initialiser le TextBox1 ainsi:
TextBox1.Text  =  AdresseURL 

et au moment de la fermeture(validation) de cette dite boite de dialogue, réaffecter la valeur du TextBox1 à la variable AdresseURL 
AdresseURL = TextBox1.Text

voila donc ma suggestion 

CNTJC

JeremyZoe · Answer

Salut, est ce que tu vois le code code cela ?:


Public AddressURL As String = ""
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        TextBox1.Text = AdresseURL
        AdresseURL = TextBox1.Text
    End Sub
End Class

Car moi j'ai essayé ca mais ca ne fonctionne pas (il me dit AdresseURL n'est pas déclaré)
Merci quand même, Jérémy

TextBox + Webbrowser : Incompatible dans la form 2 ?

12 réponses

Votre réponse

Discussions similaires