[Duda] TabControl1

[iUDEX]

¡Buenas!

Creé un sencillo programa con un WebBrowser, un TabControl y un TextBox (más unos botones).

El pequeño inconveniente es cuando el usuario ingresa a un sitio web. Bueno, ingresa, y la URL del sitio se "captura" en el TextBox1. Por ejemplo, http://www.bing.com/.

Luego al crear una nueva Tab con TabControl1, ingresa a otro sitio, y también la URL se captura en TextBox1, aquí, por ejemplo, http://www.google.com/. Cuando nuevamente el usuario regresa al Tab anterior (Bing) aparece la URL anterior (Google).

Mi pregunta es, ¿cómo es posible que TextBox1 "guarde" cada URL por cada Tab seleccionada? Que no se combinen.

¡Saludos!

[XresH]

Tenes varias maneras, podrias crear un listado o array para almacenar lo que se va ingresando y luego "consulte" segun un index del tab (manejado por vos a traves una variable o como quieras)
Tambien utilizando un listbox que "almacene" de manera temporal los accesos.
Podrias crear una matriz con textbox.

Si pones que codigo tenes podemos ver la mejor forma y opinar sobre alguna solucion.

Saludos.

[iUDEX]

¡Buenas XresH!

No sabría que responder. Soy un poco novato para esto.

Aunque eso del ListBox suena bien. Si bien entiendo, dices que cada URL del TextBox vaya almacenándose allí, ¿no? Y luego cuando se cambie de pestaña se copie dicha URL al TextBox. Algo así.

No sé que código poner, haber si éste guía un poco:

Código [Seleccionar] Expandir

Private Sub WebBrowser_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles Me.DocumentCompleted
        Form1.Text = Me.DocumentTitle & ""
        Dim Tabpage As TabPage = Me.Tag
        Tabpage.Text = Me.DocumentTitle
        Try
            Form1.TextBox1.Text = Me.Url.AbsoluteUri
        Catch ex As Exception
        End Try
        If Me.CanGoBack = True Then
            Form1.Button1.Enabled = True
        Else
            Form1.Button1.Enabled = False
        End If
        If Me.CanGoForward = True Then
            Form1.Button2.Enabled = True
        Else
            Form1.Button2.Enabled = False
        End If
    End Sub

¡Saludos!

[-- KiLiaN --]

Crea un textbox2.

[XresH]

Mi idea era otra porque supuse que programabas en Visual basic 6, no importa pero digo para que coloques los temas en el lugar correcto, tal vez hubiese contestado alguien antes que yo pero no lo sabrian porque tu tema no esta en .NET.

Hice un codigo de ejemplo manipulando el tab con 3 paginas.
Dentro de los tabs coloque 3 WebBrowser, 1 textbox y un boton de comando.

Lo que hace el ejemplo es recargar las paginas que se le indica partiendo del tab seleccionado, luego lo modifica en el listbox anteriormente cargado, para cuando se vuelva a hacer clic en el tab, al tener "en foco" el mismo busca en el listado del listbox y lo agrega al textbox de url, claro que no encajara exactamente a tu proyecto, eso debes encargarte, ya que eres novato te sera util, porque manipulo elementos basicos:

Código (vbnet) [Seleccionar] Expandir

Public Class Form1
    Dim ListaUrl() As String
    Private Sub cmdIr_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdIr.Click
        Dim webS As Byte
        'obtenemos en la variable webS el tab seleccionado
        webS = TabControl1.SelectedIndex
        'depende el tab seleccionado es donde recargara la url puesta
        Select Case webS
            Case 0
                'si esta seleccionado el tab 1
                Web1.Navigate(Trim(txtUrl.Text))
                'actualiza en el listbox (el index se obtiene desde el tab seleccionado)
                listUrl.Items.Item(webS) = Trim(txtUrl.Text)
            Case 1
                'si esta seleccionado el tab 2
                Web2.Navigate(Trim(txtUrl.Text))
                listUrl.Items.Item(webS) = Trim(txtUrl.Text)
            Case 2
                'si esta seleccionado el tab 3
                Web3.Navigate(Trim(txtUrl.Text))
                listUrl.Items.Item(webS) = Trim(txtUrl.Text)
        End Select
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        listUrl.Items.Clear()
        ReDim Preserve ListaUrl(3) 'redimensionamos, aca depende la cantidaad de tabs, yo uso 3 como ejemplo
        'tambien se podria declarar junto con la variable Dim ListaUrl(0 to 2) como gustes.
        'cargamos el listbox con los items para solo edditarlos luego al recargar las paginas
        listUrl.Items.Add("( Pagina  1 )")
        listUrl.Items.Add("( Pagina  2 )")
        listUrl.Items.Add("( Pagina  3 )")
    End Sub
    Private Sub TabControl1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.Click
        If listUrl.Items.Count = 0 Then Exit Sub 'sino hay elementos salimos
        txtUrl.Text = listUrl.Items.Item(TabControl1.SelectedIndex)
    End Sub
End Class

Espero sirva, saludos.

[iUDEX]

¡Buenas!

¡Gracias viejo! Me has ayudado un montón. Dejé el programita y recién esta semana lo he vuelto a administrar.

Ha funcionado a la perfección.

Si quieres, te pongo en los créditos xD!

¡Saludos!

[XresH]

¡Buenas!

¡Gracias viejo! Me has ayudado un montón. Dejé el programita y recién esta semana lo he vuelto a administrar.

Ha funcionado a la perfección.

Si quieres, te pongo en los créditos xD!

¡Saludos!

No es obligacion, al menos yo estoy para colaborar en la comunidad, me alegro haberte ayudado, suerte con tu proyecto y si tienes dudas ya sabes !

Saludos.