elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado:


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  [VB]Obtener Texto seleccionado en un richtextbox
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [VB]Obtener Texto seleccionado en un richtextbox  (Leído 7,953 veces)
Niko^

Desconectado Desconectado

Mensajes: 43



Ver Perfil WWW
[VB]Obtener Texto seleccionado en un richtextbox
« en: 25 Agosto 2010, 03:28 am »

mi problema es el siguiente necesito obtener el texto seleccionado al apretar un boton. osea si el usuario selecciona "fulanito" obtengo el texto con el boton y escribo "hola fulanito" no se si se entiende..

quisas con imagenes entiendan mejor =)

el usuario escribe:
http://www.imageshost.us/image.php?id=87CD_4C745F58

y devuelve:
http://www.imageshost.us/image.php?id=46CE_4C745F58


con SelectedText se puede hacer ? no se como se utiliza :S

S2 desde ya gracias


En línea

[D4N93R]
Wiki

Desconectado Desconectado

Mensajes: 1.646


My software never has bugs. Its just features!


Ver Perfil WWW
Re: [VB]Obtener Texto seleccionado en un richtextbox
« Respuesta #1 en: 25 Agosto 2010, 03:46 am »

De verdad no te entiendo.. Pero juega con los métodos Select del textbox.. :P


En línea

Niko^

Desconectado Desconectado

Mensajes: 43



Ver Perfil WWW
Re: [VB]Obtener Texto seleccionado en un richtextbox
« Respuesta #2 en: 25 Agosto 2010, 04:07 am »

De verdad no te entiendo.. Pero juega con los métodos Select del textbox.. :P

quiero obtener un texto que esta selecionado en una variable :S tan malo soy explicando xD
En línea

43H4FH44H45H4CH49H56H45H
Wiki

Desconectado Desconectado

Mensajes: 502



Ver Perfil
Re: [VB]Obtener Texto seleccionado en un richtextbox
« Respuesta #3 en: 25 Agosto 2010, 04:31 am »

Asi?

Código
  1. Public Class Form1
  2.    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.        MsgBox("Cadena Seleccionada: " & RichTextBox1.SelectedText)
  4.    End Sub
  5. End Class
En línea


-R IP
:0100
-A 100 
2826:0100 MOV AH,09
2826:0102 MOV DX,109
2826:0105 INT 21
2826:0105 MOV AH,08
2826:0105 INT 21
2826:0107 INT 20
2826:0109 DB 'MI NICK ES CODELIVE.$' 
2826:0127 
-R BX
:0000
-R CX
:20
-N CODELIVE.COM
-W
[D4N93R]
Wiki

Desconectado Desconectado

Mensajes: 1.646


My software never has bugs. Its just features!


Ver Perfil WWW
Re: [VB]Obtener Texto seleccionado en un richtextbox
« Respuesta #4 en: 25 Agosto 2010, 05:26 am »

Será, posiblemente sea eso.. Sino revisa los métodos de ese control en MSDN :)
En línea

Niko^

Desconectado Desconectado

Mensajes: 43



Ver Perfil WWW
Re: [VB]Obtener Texto seleccionado en un richtextbox
« Respuesta #5 en: 25 Agosto 2010, 18:57 pm »

Asi?

Código
  1. Public Class Form1
  2.    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.        MsgBox("Cadena Seleccionada: " & RichTextBox1.SelectedText)
  4.    End Sub
  5. End Class

era eso muchas gracias. habia intentado algo asi pero no me habia salido :S


Será, posiblemente sea eso.. Sino revisa los métodos de ese control en MSDN :)

estuve buscando en la msdn sobre otros metodos se agradece =)


aca les dejo lo que queria hacer no me di cuenta de postearlo antes.

es como un bbc al presionar el boton(negrita) a la palabra seleccionada se le agregan las etiquetas si no hay ninguna palabra seleccionada escribe las tiquetas en el richtextbox

Código
  1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  2.        Dim b As String
  3.        b = tex.SelectedText
  4.  
  5.        If Len(b) = 0 Then
  6.  
  7.            If Len(tex.Text) = 0 Then
  8.                tex.Text = tex.Text & "[b]" & b & "[/b]"
  9.  
  10.            Else
  11.                tex.Text = tex.Text & " [b]" & b & "[/b]"
  12.  
  13.            End If
  14.        Else
  15.            tex.Text = " [b]" & b & "[/b]"
  16.        End If
  17.  
  18.    End Sub



Gracias y saludos
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines