Test Foro de elhacker.net SMF 2.1

Hola.

A ver, os cuento lo que quiero.

Mi idea es escribir un numero, por ejemplo 346, y que me cuente y me separe las cifras, es decir. que primero me coja el 3, hacer lo que tenga que hacer y meterlo en la variable, luego lo mismo con el 4 y luego lo mismo con el 6. pero separados, no se si me explico bien...

muchas gracias

Hola,algo asi??

Private Sub Form_Load()
Dim Palabra As String: Palabra = "sebas"
For i = 1 To Len(Palabra)
MsgBox Left(Palabra, i)
Next
End Sub

saludos.

me da error en el Left, me dice que no tiene parametros y su valor no se puede indizar.

por cierto, no lo he dicho, estoy con la version 2008.

Cita de: sextoestoy con la version 2008.

pequeño el detalle.... :P,esto deberia postearse en la categoria de .NET no aca...

en .NET seria asi:

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Palabra As String = "sebas"
        Dim i As Integer
        For i = 1 To Len(Palabra)
            MsgBox(Strings.Left(Palabra, i))
        Next
    End Sub
End Class

saludos.

ok, perdon :s, yo es que siempre usaba el 6, asi que la costumbre...

ya lo he probado y no es exactamente lo que quiero, pero si la base, creo que a partir de ahora si que puedo seguir yo.

muchas gracias por tu ayuda, tendras noticias mias ;)

es lo que vos pediste ,lo unico que tenes que hacer es guardar en las variables que vos queiras la letra de la palabra que vos quieras,segun el inidice o sea segun la "i"

si si, lo se. por eso te digo que a partir de ahora se seguir yo solo.

espero no tener mas complicaciones...

No consigo meter el numero/ letra en la variable...

i es la posicion, Palabra es la palabra...

que tengo que hacer? dios como me como la oya para que luego sea una tonteria ¬¬

Es fácil y está bien planteado. seba123neo ha planteado una buena solución pero ha faltado un detalle... en lugar de Left, usa Mid... así:

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Palabra As String = "sebas"
        Dim i As Integer
        For i = 1 To Len(Palabra)
            MsgBox(Strings.Mid(Palabra, i, 1))
        Next
    End Sub
End Class

Así cogerá caracter a caracter cada uno de ellos. De la otra forma primero cogía uno, luego dos, luego tres... y así sucesivamente..

lo que yo decia, por una l...

Muchas gracias, eso SI que era exactamente lo que queria

mmm, una cosilla rapida, hay alguna forma de que empiece por el final?

usa right para empezar del final,left para empezar del principio..

saludos.