Imprimir Página - Recortar número

Título: Recortar número
Publicado por: Psyke1 en 10 Agosto 2010, 02:59 am

Quizas sea muy simple, pero en fin:

Imaginemos que tengo esto:

Código

Dim a As Integer
Dim b as Integer
 
a = 2345
b = CInt(Right$(CStr(a),2))
 
msgbox a
msgbox b

¿Como obtengo el mismo resultado, peeeeeero sin utilizar Right$()? :huh:

Gracias! ;D

DoEvents¡! :P

Título: Re: Recortar número
Publicado por: Sanlegas en 10 Agosto 2010, 03:13 am

left, mid :xD

Título: Re: Recortar número
Publicado por: Psyke1 en 10 Agosto 2010, 03:26 am

Que gracioso... :¬¬
Espero ayuda coherente.... :silbar:

DoEvents¡! :P

Título: Re: Recortar número
Publicado por: aaronduran2 en 10 Agosto 2010, 03:27 am

Chapucero, pero es cuestión de probar:

Código

Dim a As Integer
Dim b As Integer
a = 2345
b = Mid(a, Len(a) + 1)
MsgBox b

Un saludo.

PD: ya te agregué al MSN ;)

Título: Re: Recortar número
Publicado por: Psyke1 en 10 Agosto 2010, 03:32 am

Gracias aaronduran2! ;)
Pero obvio que asi tambien lo se hacer... :P
Pero me referia a lo que dice Karcrack aqui:
http://foro.elhacker.net/programacion_visual_basic/snippetreto_isitprime_comprobar_si_un_numero_es_primo-t298929.0.html;msg1483010#msg1483010

DoEvents¡! :P

Título: Re: Recortar número
Publicado por: aaronduran2 en 10 Agosto 2010, 03:36 am

Leeré un poco más ese tema, no me había parado a verlo detenidamente.

Un saludo ;)

Título: Re: Recortar número
Publicado por: Karcrack en 10 Agosto 2010, 12:56 pm

Código:

    Dim a As Integer
    Dim b As Integer
     
    a = &H2345
    b = a And &HFF
     
    MsgBox Hex$(a)
    MsgBox Hex$(b)

No se si es esto lo que pides.... Este codigo lo que hace es obtener el LoByte de un Word... es decir... si el Integer es 0xBEBA devuelve 0xBA...

Título: Re: Recortar número
Publicado por: Psyke1 en 10 Agosto 2010, 13:04 pm

mmmm
No, es que me acorde de lo que me dijiste aqui:
http://foro.elhacker.net/programacion_visual_basic/snippetreto_isitprime_comprobar_si_un_numero_es_primo-t298929.0.html;msg1483010#msg1483010

Citar

/
Debes comprobar la velocidad con el proyecto compilado, si no no es de fiar... por ejemplo, el codigo de Cobein era un poco mas rapido que el mio cuando lo prove...

Para hacer tu codigo mas rapido deberias hacer la comprobacion trabajando con los bits... voy a ver si puedo hacer algo sin pasarlo a String... que eso consume mucho

Quizas ni te entendi bien, hacias referencia a lo que estoy preguntando?¿ :huh:

Gracias! ;)

DoEvents¡! :P

Título: Re: Recortar número
Publicado por: Karcrack en 10 Agosto 2010, 13:11 pm

Si, es lo que estamos hablando, trabajar con numeros/bits en vez de con cadenas... el codigo que te he puesto trabaja con bits...

Título: Re: Recortar número
Publicado por: Psyke1 en 10 Agosto 2010, 13:32 pm

Ok gracias, me informare!! ;)
Te debo muchas! :-* :laugh:

DoEvents¡! :P

Título: Re: Recortar número
Publicado por: DarkMatrix en 12 Agosto 2010, 05:33 am

y si usas split? :P

Título: Re: Recortar número
Publicado por: Psyke1 en 12 Agosto 2010, 08:51 am

Tambien, pero la duda ya esta resuelta queria hacerlo como puso Karcrack ;)

DoEvents¡! :P

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Psyke1 en 10 Agosto 2010, 02:59 am