Páginas: [1] 
|
 |
|
 Autor
|
Tema: Separar cifras (Leído 246 veces)
|
sexto
 Desconectado
Mensajes: 75
|
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
|
|
|
|
|
En línea
|
|
|
|
|
seba123neo
|
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. |
|
|
|
|
En línea
|
Todos somos ignorantes;lo que pasa es que no todos ignoramos las mismas cosas - Albert Einstein
|
|
|
sexto
Desconectado
Mensajes: 75
|
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.
|
|
|
|
|
En línea
|
|
|
|
|
seba123neo
|
estoy con la version 2008. pequeño el detalle....  ,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. |
|
|
|
|
En línea
|
Todos somos ignorantes;lo que pasa es que no todos ignoramos las mismas cosas - Albert Einstein
|
|
|
sexto
Desconectado
Mensajes: 75
|
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  |
|
|
|
|
En línea
|
|
|
|
|
seba123neo
|
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"
|
|
|
|
|
En línea
|
Todos somos ignorantes;lo que pasa es que no todos ignoramos las mismas cosas - Albert Einstein
|
|
|
sexto
Desconectado
Mensajes: 75
|
si si, lo se. por eso te digo que a partir de ahora se seguir yo solo.
espero no tener mas complicaciones...
|
|
|
|
|
En línea
|
|
|
|
sexto
Desconectado
Mensajes: 75
|
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 ¬¬
|
|
|
|
|
En línea
|
|
|
|
Spider-Net
Desconectado
Mensajes: 269
Un gran poder conlleva una gran responsabilidad
|
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.. |
|
|
|
|
En línea
|
|
|
|
sexto
Desconectado
Mensajes: 75
|
lo que yo decia, por una l...
Muchas gracias, eso SI que era exactamente lo que queria
|
|
|
|
|
En línea
|
|
|
|
sexto
Desconectado
Mensajes: 75
|
mmm, una cosilla rapida, hay alguna forma de que empiece por el final?
|
|
|
|
« Última modificación: 22 Abril 2008, 15:00 por sexto »
|
En línea
|
|
|
|
|
seba123neo
|
usa right para empezar del final,left para empezar del principio..
saludos.
|
|
|
|
|
En línea
|
Todos somos ignorantes;lo que pasa es que no todos ignoramos las mismas cosas - Albert Einstein
|
|
|
|
Páginas: [1] 
|
|
|
 |
