Problemas al pegar una imagen en un richtextbox!!
Publicado por kryptic (40 intervenciones) el 25/07/2007 21:15:10
tengo este codigo que es una prueba para un programa que estoy haciendo
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static i As Integer
i += 1
Select Case i
Case 1
RichTextBox1.Text &= "Hola "
RichTextBox1.SelectionStart = RichTextBox1.TextLength
Case 2
Dim ruta As String = "C:\Desarrollo\Reemplazo\bin\Debug\Imagenes\LUIS.png"
Dim imagen As Bitmap = New Bitmap(ruta)
Clipboard.SetImage(imagen)
RichTextBox1.Paste()
Case 3
RichTextBox1.Text &= " como estas"
RichTextBox1.SelectionStart = RichTextBox1.TextLength
End Select
End Sub
entonces en el primer segundo me pone Hola en el richtextbox
en el segundo segundo me pega la imagen
en el tercer segundo me pone como estas, pero me borra la imagen
alguien sabe porke??????? gracias
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static i As Integer
i += 1
Select Case i
Case 1
RichTextBox1.Text &= "Hola "
RichTextBox1.SelectionStart = RichTextBox1.TextLength
Case 2
Dim ruta As String = "C:\Desarrollo\Reemplazo\bin\Debug\Imagenes\LUIS.png"
Dim imagen As Bitmap = New Bitmap(ruta)
Clipboard.SetImage(imagen)
RichTextBox1.Paste()
Case 3
RichTextBox1.Text &= " como estas"
RichTextBox1.SelectionStart = RichTextBox1.TextLength
End Select
End Sub
entonces en el primer segundo me pone Hola en el richtextbox
en el segundo segundo me pega la imagen
en el tercer segundo me pone como estas, pero me borra la imagen
alguien sabe porke??????? gracias
Valora esta pregunta


0