elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Obtener caracteres de una Cadena VB.NET
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Obtener caracteres de una Cadena VB.NET  (Leído 17,827 veces)
NetStorm

Desconectado Desconectado

Mensajes: 114


Ver Perfil
Obtener caracteres de una Cadena VB.NET
« en: 19 Diciembre 2009, 01:36 am »

Hola muchachos, sé que mi pregunta parece un tanto nob, pero estoy trabajando con VB.NET conectao a una base de datos en access y necesito leer o separar cada caracter de una cadena "D01" y cada carácter almacenarlo en una variable para luego hacer algunas comprobaciones... he pensado hacerlo algo así
Código:
Public valores(2) as string
Public texto as string = ""
texto="Ejmplo"

for i = 1 to Len(texto)
'Aquí iria la función que recorra cada carácter y la guarde en un array de tipo string
valores(i - 1) = valor obtenido
if IsNumeric() then
msgbox("Es número")
else
msgbox("No es número")
next

Bueno esa es la idea, si se pudiera guardar los valores en un array sería fantástico, haber que consejos me daís... Feliz Navidad y Buen Año Nuevo Para Todos!!! ... SALUD!!!

P.D. Molan los nuevos "emoticons" de el foro.  ::)


En línea

elmaro


Desconectado Desconectado

Mensajes: 301


Unas simples palabras...


Ver Perfil
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #1 en: 19 Diciembre 2009, 20:50 pm »

Si el dato tiene siempre el mismo formato de 3 caracteres, podrías usar esto:

Código:
        Dim Cadena = "D01"
        Dim Caracteres As New ArrayList

        Caracteres.AddRange(Cadena.ToCharArray)

        'Caracteres(0) contiene D
        'Caracteres(1) contiene 0
        'Caracteres(2) contiene 1

Saludos


En línea

NetStorm

Desconectado Desconectado

Mensajes: 114


Ver Perfil
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #2 en: 20 Diciembre 2009, 02:12 am »

Vale tío ya estaba liandome con lo de MID() jajaja, aunque las dos formas estan simpáticas la tuya está sencilla y muy servicial, algo asi como un ... "Conectar y usar"  ;D
En línea

seba123neo


Desconectado Desconectado

Mensajes: 3.621



Ver Perfil WWW
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #3 en: 20 Diciembre 2009, 02:41 am »

lo que te paso elmaroes propio de .NET, en cambio tu codigo es como si estarias programando en visual basic 6.
En línea

NetStorm

Desconectado Desconectado

Mensajes: 114


Ver Perfil
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #4 en: 20 Diciembre 2009, 22:30 pm »

Intentaba hacer una comparación, aquí el código y me dijo que no podía hacer comparaciones con operadores de comparación, asi que tuve que hacerlo con MID jajaja, de todos modos he aprendido eso de los ArrayList que por cierto no lo sabía ...  :-[

Código:
Public Sub ReciclarCodCargo(ByVal CodigoEliminado As String)
        Try
            Dim t As Integer = 0

            Dim Caracteres As New ArrayList

            Caracteres.AddRange(CodigoEliminado.ToCharArray)

            If Caracteres(1) > 0 Then
                'En caso de ser de dos cifras, por ejemplo 25 lo concatenamos y guardamos
                'en la tabla Control, para usarlo la siguiente vez ...
                t = Caracteres(1) & Caracteres(2)
            Else
                'Caso contrario es de una cifra por lo tanto no hay más que comentar
                t = Caracteres(2)
            End If
            com.CommandText = "update Control set valor = '" & t & "' where parametro ='cargo'"
            com.Connection = con
            com.ExecuteNonQuery()
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
Y entonces me generó el error, de todos modos ya lo estoy haciendo con el MID ...
Gracias!!!
En línea

elmaro


Desconectado Desconectado

Mensajes: 301


Unas simples palabras...


Ver Perfil
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #5 en: 21 Diciembre 2009, 00:14 am »

En que linea te da el error?
En línea

Skeletron


Desconectado Desconectado

Mensajes: 1.731


A long way to go


Ver Perfil WWW
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #6 en: 23 Diciembre 2009, 15:31 pm »

Y que dice el error?

No veo que realices conexión con la base de datos.

Yo para conectar con la base de datos hago:


Código
  1. Dim SQLconnect As New SQLite.SQLiteConnection()
  2.            Dim SQLcommand As SQLite.SQLiteCommand
  3.            SQLconnect.ConnectionString = "Data Source= AQUI LINK AL ARCHIVO.. EN MI CASO ERA PARA SQLITE...;"
  4.            SQLconnect.Open()
  5.            SQLcommand = SQLconnect.CreateCommand
  6.            SQLcommand.CommandText = "SELECT * FROM LA TABLA WHERE Fecha='" & Fecha & "'" ' ORDER BY Texto"
  7.            Dim SQLreader As SQLite.SQLiteDataReader = SQLcommand.ExecuteReader()
En línea

NetStorm

Desconectado Desconectado

Mensajes: 114


Ver Perfil
Re: Obtener caracteres de una Cadena VB.NET
« Respuesta #7 en: 29 Diciembre 2009, 02:06 am »

Vale, gracias a todos podeis ver el producto de vuestra ayuda aquí:

http://foro.elhacker.net/net/digit0_database_10-t279291.0.html

Desde el fondo de mi corazón muchas gracias ... por su ayuda y por vuestro tiempo...

Felices Fiestas!
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
cadena de caracteres con cout « 1 2 »
Programación C/C++
cazagavilan 14 10,478 Último mensaje 15 Abril 2011, 19:11 pm
por cazagavilan
Problemas leer cadena de caracteres con conio
Programación C/C++
powerflame 1 3,084 Último mensaje 23 Mayo 2011, 20:52 pm
por Khronos14
cadena de caracteres
Programación C/C++
Ander123 1 2,549 Último mensaje 6 Septiembre 2012, 14:15 pm
por avesudra
Error al imprimir cadena de carácteres en C « 1 2 »
Programación C/C++
darg94 14 14,525 Último mensaje 21 Octubre 2012, 15:39 pm
por darg94
Obtener valor numerico y posicion en una cadena de caracteres - python
Programación General
juanfelr 3 8,340 Último mensaje 28 Abril 2022, 03:49 am
por juanfelr
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines