- 15 Ottobre 2008
- 17
- 0
- Miglior risposta
- 0
Dopo un lungo periodo di assenza da questo forum torno con una guida su come creare un Browser in Visual Basic .net
visto che molte cose le sto studiando ora aggiornerò la guida ogni volta che imparo qualcosa di nuovo fino a mostravi come creare un browser con queste funzionalità:
- Funzioni principali -> FATTO
- Esplorazione a schede -> FATTO (ci ho messo 250000 anni LOL)
- Visualizzazione HTML -> FATTO
- Editor HTML -> In programmazione
- Gestione preferiti -> In studio LOL
- Gestione cronologia -> ANCHE LOL
Iniziamo...
Prima di tutto create una nuova applicazione windows form e denominatela "Browser".
Arrivati al form iniziamo subito con il codice dell'esplorazione a schede creando due array list con controlli webBrowser e TabPage.
Nelle dichiarazioni scriviamo questo:
APPENA HO TEMPO INSERISCO TUTTE LE ALTRE FUNZIONI
visto che molte cose le sto studiando ora aggiornerò la guida ogni volta che imparo qualcosa di nuovo fino a mostravi come creare un browser con queste funzionalità:
- Funzioni principali -> FATTO
- Esplorazione a schede -> FATTO (ci ho messo 250000 anni LOL)
- Visualizzazione HTML -> FATTO
- Editor HTML -> In programmazione
- Gestione preferiti -> In studio LOL
- Gestione cronologia -> ANCHE LOL
Iniziamo...
Prima di tutto create una nuova applicazione windows form e denominatela "Browser".
Arrivati al form iniziamo subito con il codice dell'esplorazione a schede creando due array list con controlli webBrowser e TabPage.
Nelle dichiarazioni scriviamo questo:
Ora passiamo a programmare la funzione che ci permetterà di creare nuove tabelle con WebBrowser integrato:Dim arrayWeb As New List(Of WebBrowser) 'dice che "arrayWeb" è una lista di "WebBrowser"
Dim arrayPages As New List(Of TabPage) 'dice che "arrayPages" è una lista di "TabPages"
Dim ControlloWeb As WebBrowser 'dice che "ControlloWeb" è un "WebBrowser"
Dim PaginaScheda As TabPage 'dice che "PaginaScheda" è una "TabPage"
Public Function CreaControlloWeb()
ControlloWeb = New WebBrowser
arrayWeb.Add(ControlloWeb)
ControlloWeb.Dock = DockStyle.Fill
PaginaScheda = New TabPage
arrayPages.Add(PaginaScheda)
TabControl1.TabPages.Add(PaginaScheda)
PaginaScheda.Controls.Add(ControlloWeb)
PaginaScheda.Text = "Nuova scheda"
TabControl1.SelectedTab = PaginaScheda
PaginaScheda.Text = "" + ControlloWeb.DocumentTitle
End Function
APPENA HO TEMPO INSERISCO TUTTE LE ALTRE FUNZIONI