Visual Basic - Alguien sabe o intulle, como....

Hola a todos como puedo hacer para añadir un caracter de forma aleatoria en un textbox??
Lo que no logro es que el caracter se genere entre la palabra por ejemplo:
m+e+sa
me+sa..
a mi solo me sale ....mesa++ y me gustaria que hiciera lo anterior. gracias, Salu22

porque te empeñas en hacer siempre las mismas preguntas y despues no lees las respuestas=?

el ejemplo que te puso Fernando mas abajo funciona perfectamente!!

Salu23

LLa lo contesté antes y lo vuelvo a contestar ahora:


Private Sub Command1_Click()

Dim caracter As String
Dim inferior As Integer
Dim superior As Integer

If Len(Text1.Text) >= 6 Then MsgBox "La palabra tiene 6 caracteres", _
vbOKOnly, "Atención": Exit Sub

caracter = "+" 'caracter a introducir
inferior = 1
superior = Len(Text1.Text) + 1

posicion = Int((superior - inferior + 1) * _
Rnd + inferior)

izq = Left(Text1.Text, posicion - 1)
der = Right(Text1.Text, Len(Text1.Text) - posicion + 1)

'Debug.Print CStr(posicion), izq, der

Text1.Text = ""
Text1.Text = izq + caracter + der

End Sub

Ok gracias, e vuelto a plantear la pregunta pq ayer no me dio resultado. Pero si dices que funciona probare de nuevo, ayer me daba error. Gracias de nuevo

¿Qué error?

Hola fernando, me da error en la parte de..

izq = Left(Text1.Text, posicion - 1)
der = Right(Text1.Text, Len(Text1.Text) - posicion + 1)

me dice que left y right no tienen parametros

gracias por tu ayuda

Va por mail el ejemplo que a mi me funciona bien.