Mensajes

GANÉ LA PORRA

[Mr Hooks]

Que aburrido es ver jugar a España, tocan, tocan y al final no hacen nada.

EDITO: Le acaban de hacer un penal a Ozil que no cobraron, ya empezaron a ayudar a España. Lamentable.

Che, porqué no dejan de tirar mala onda, los españoles estan viviendo este momento en forma muy especial, peden ganar un mundial por primera vez, no sean mala leche y/o envidiosos !!!

Exacto Mr Hooks  !!
Se nota que hay gente que no quiere que gane españa y eso les ciega a la hora de ver la realidad

Salu2!

sera aburrido pero vamos marcando el paso en el partido.

+1

Ok, agradezco la correcion, lo no tuve en cuenta
Ahora lo corregi!

Salu2!

Código (vb) [Seleccionar] Expandir


'0 ---> Invalido
'1 ---> No Primo
'2 ---> Primo
Option Explicit
Private Function Check_Prime_Number(ByVal lNumber As Long) As Byte
   Dim x            As Long
   If lNumber >= 2 Then
       Check_Prime_Number = 2
       For x = 2 To (lNumber ^ 0.5)
           If (lNumber Mod x) = 0 Then
               Check_Prime_Number = 1
               Exit For
           End If
       Next
   End If
End Function

[0 - 1]

0 - 1
Va ha estar muy reñido creo yo...

[Microsoft FlexGrid Control 5.0]

Investiga sobre : Microsoft FlexGrid Control 5.0

Salu2!

Añado a Debci y a Dessa!!

Muy buena Black!!!
Y encima es el doble de rapida que la mia...

Dulces Ranas¡!

Si si Black!
Ya dije que faltaba eso aun...
Lo corrigo en estos dias...

Salu2!