CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 cadena de caracteres

(1/1)

Jesmi89:
Hola, es que tengo un pequeño problemita con un codigo. Lo que necesito es que al ingresar una palabra cualquiera este me desfragmente, es decir, que si por ejemplo se tiene "codigo", aparezca asi: "co", luego, "cod", luego, "codi", luego, "codig" y "codigo". Yo lo he estado haciendo asi, pero me doy cuenta que solamente se reduce aun tamaño especifico de palabra (asi que no estoy muy segura si lo estoy haciendo bien).

Entonces quisiera saber, si me podrian ayudar con esto, es decir, como se haria para que sin importar el tamaño de la palabra que se ingrese la desfragmente.



--- Código: Text ---Public Class Form1     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         Dim a As String         a = TextBox1.Text         For a = Len(TextBox1.Text) To 1 Step -1              TextBox2.Text = Strings.Left(TextBox1.Text, 2)            TextBox3.Text = Strings.Left(TextBox1.Text, 3)            TextBox4.Text = Strings.Left(TextBox1.Text, 4)         Next    End SubEnd Class 
Gracias  :ayuda:

Nebire:

--- Cita de: "Jesmi89" ---Entonces quisiera saber, si me podrian ayudar con esto, es decir, como se haria para que sin importar el tamaño de la palabra que se ingrese la desfragmente.


--- Código: Text ---Public Class Form1    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Dim a As String        a = TextBox1.Text         For a = Len(TextBox1.Text) To 1 Step -1            TextBox2.Text = Strings.Left(TextBox1.Text, 2)            TextBox3.Text = Strings.Left(TextBox1.Text, 3)            TextBox4.Text = Strings.Left(TextBox1.Text, 4)        Next    End SubEnd Class 
Gracias  :ayuda:
--- Fin de la cita ---
Veamos, en primer lugar la variable 'a' la declaras como string, y luego le asignas el contendio de un textbox.... luego ya no lo vuelves a usar como string...
2º  Declaras 'a' como string pero luego lo usas como integer para el contador del bucle, esto es una contradición.
3º un bucle se usa para no repetir código, por tanto si haces manualmente algo, el bucle carece de sentido.

El código debería quedar algo así como:

--- Código: Visual Basic ---        Dim a As String = TextBox1.Text       dim k as integer=0         For k = Len(a) To 1 Step -1            TextBox2.Text = Strings.Left(a, k)  ' cadena de la que se toma, cantidad que se toma        Next  

Navegación

[0] Índice de Mensajes