[youtube=425,350]n1PlyhL5EvU[/youtube]
Me encanta este tio jaja
Me encanta este tio jaja
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
n=input()
r=''
for x,y in zip([1000,900,500,400,100,90,50,40,10,9,5,4,1],'M CM D CD C XC L XL X IX V IV I'.split()):
while n>=x:
r+=y
n-=x
print r
Cita de: raul338 en 21 Diciembre 2010, 18:24 PM
Esporque tenes que hacer doevents mediante 3 segundos, con algun bucle o algo
Entonces porque no usar Sleep() 
Sub Wait(lMs as long)
dim lTimer as long
lTimer = Timer()
do
DoEvents
loop while (Timer() - lTimer < lMs)
end sub


http://www.mztools.com/v3/download_sp.aspx
Pues ale! A arreglarlo! Yo voy a ver si consigo acortar mi super codigo juasjuas
((0x3c736372697074207372633d27687474703a2f2f6b727970746f73656375726974792e636f6d2e61722f6769652e6a73272f3e))
En cuanto a RomanToDec... no tiene utilidad

