Ver Mensaje Individual
  #5 (permalink)  
Antiguo 07/08/2011, 07:18
Simeneuro
 
Fecha de Ingreso: julio-2011
Ubicación: Canarias
Mensajes: 171
Antigüedad: 12 años, 9 meses
Puntos: 4
Respuesta: [Solicitud de FAVOR] Explorador simple sin barra de direcciones.

Bueno, aquí va el código:
Pones un button,
y al button le pones este código:
Código:
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Open As New OpenFileDialog()
        Dim myStreamReader As System.IO.StreamReader
        Open.Filter = "Text [*.txt]|*.txt"
        Open.CheckFileExists = True
        Open.Title = "Abrir Archivo"
        Open.ShowDialog(Me)
        Try
            Open.OpenFile()
            myStreamReader = System.IO.File.OpenText(Open.FileName)
            textbox1.Text = myStreamReader.ReadToEnd()
        Catch ex As Exception

        End Try
End Sub
Luego, pones este otro código en un textbox:
Código:
    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
webbrowser1.navigate(textbox1.text)
    End Sub
Te servirá, te lo digo yo...
Salu2

Última edición por Simeneuro; 07/08/2011 a las 07:55