Welcome Guest: S’enregistrer | Connexion
 
FAQ | Rechercher | Membres | Groupes
 
Function NbEnRomain(Nb As Integer) As String Dim ChiffreRomain As String ChiffreRomain = String(Int(Nb / 1000), "M") Nb = Nb - (Int(Nb / 1000) * 1000) If Nb >= 900 Then ChiffreRomain = ChiffreRomain & "CM" ElseIf Nb >= 500 And Nb < 900 Then ChiffreRomain = ChiffreRomain & "D" & String(Int((Nb - 500) / 100), "C") ElseIf Nb >= 400 And Nb < 500 Then ChiffreRomain = ChiffreRomain & "CD" Else ChiffreRomain = ChiffreRomain & String(Int(Nb / 100), "C") End If Nb = Nb - (Int(Nb / 100) * 100) If Nb >= 90 Then ChiffreRomain = ChiffreRomain & "XC" ElseIf Nb >= 50 And Nb < 90 Then ChiffreRomain = ChiffreRomain & "L" & String(Int((Nb - 50) / 10), "X") ElseIf Nb >= 40 And Nb < 50 Then ChiffreRomain = ChiffreRomain & "XL" Else ChiffreRomain = ChiffreRomain & String(Int(Nb / 10), "X") End If Nb = Nb - (Int(Nb / 10) * 10) If Nb >= 9 Then ChiffreRomain = ChiffreRomain & "IX" ElseIf Nb >= 5 And Nb < 9 Then ChiffreRomain = ChiffreRomain & "V" & String(Int((Nb - 5) / 1), "I") ElseIf Nb >= 4 And Nb < 5 Then ChiffreRomain = ChiffreRomain & "IV" Else ChiffreRomain = ChiffreRomain & String(Int(Nb / 1), "I") End If NbEnRomain = ChiffreRomain End Function ' Pour L'executer ex : NbEnRomain(1225)
Règles
 
Poster un nouveau sujet   Répondre au sujet
Pokémon Ultra Index du Forum -> Pokémon Ultra V3 -> Stade Ultra
Sujet précédent :: Sujet suivant  
Auteur Message
R30
Administrateur
Administrateur

Hors ligne

Inscrit le: 15 Sep 2007
Messages: 860
Poképoints: 0
Moyenne de points: 0

MessagePosté le: Lun 1 Sep - 11:21 (2008)
MessageSujet du message: Règles
Répondre en citant

Bienvenue au Stade Ultra!

Les règles sont simple,prenez votre équipe et défier les membres de Pokémon Ultra par la wii-fi.
Le but étant de faire une série de 100 victoires consécutives! Si vous y parvenez vous obtiendrez un précieux lot!
Choisissez les règles et paramètres que vous voudrez. Vous ne pouvez pas affrontez deux fois le même dresseur dans la même journée.
Je crois que c'est à peu près tout.


BOnne chance!!!
_________________


Revenir en haut
Publicité






MessagePosté le: Lun 1 Sep - 11:21 (2008)
MessageSujet du message: Publicité

PublicitéSupprimer les publicités ?
Revenir en haut
Montrer les messages depuis:   
Pokémon Ultra Index du Forum -> Pokémon Ultra V3 -> Stade Ultra Toutes les heures sont au format GMT + 2 Heures
Poster un nouveau sujet   Répondre au sujet
Page 1 sur 1
Sauter vers:  

 

Portail | Index | créer forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
phpBB
Template by BMan1
Traduction par : phpBB-fr.com