Traducteur de morse avec choix des couleurs
Soyez le premier à donner votre avis sur cette source.
Vue 9 739 fois - Téléchargée 432 fois
Description
TRADUIT du texte en morse
interface graphique vite fait
il y a pas tout dans le code
mais par contre il y a tout dans le zip
AUTREMENT TOUT EST DANS LE ZIP
interface graphique vite fait
il y a pas tout dans le code
mais par contre il y a tout dans le zip
Source / Exemple :
EXEMPLE EXEMPLE EXEMPLE Private Sub Command1_Click() Dim I Dim sel Dim mor For I = 1 To Len(Text1) sel = Mid$(LCase(Text1), I, 1) If sel = "a" Then mor = "._ " If sel = "b" Then mor = "_... " If sel = "c" Then mor = "_._. " If sel = "d" Then mor = "_.. " If sel = "e" Then mor = ". " If sel = "f" Then mor = ".._. " If sel = "g" Then mor = "_ _. " If sel = "h" Then mor = ".... " If sel = "i" Then mor = ".. " If sel = "j" Then mor = "._ _ _ " If sel = "k" Then mor = "_._ " If sel = "l" Then mor = "._.. " If sel = "m" Then mor = "_ _ " If sel = "n" Then mor = "_. " If sel = "o" Then mor = "_ _ _ " If sel = "p" Then mor = "._ _. " If sel = "q" Then mor = "_ _._ " If sel = "r" Then mor = "._. " If sel = "s" Then mor = "... " If sel = "t" Then mor = "_ " If sel = "u" Then mor = ".._ " If sel = "v" Then mor = "..._ " If sel = "w" Then mor = "._ _ " If sel = "x" Then mor = "_.._ " If sel = "y" Then mor = "_._ _ " If sel = "z" Then mor = "_ _.. " If sel = "0" Then mor = "_ _ _ _ _ " If sel = "1" Then mor = "._ _ _ _ " If sel = "2" Then mor = ".._ _ _ " If sel = "3" Then mor = "..._ _ " If sel = "4" Then mor = "...._ " If sel = "5" Then mor = "..... " If sel = "6" Then mor = "_.... " If sel = "7" Then mor = "_ _... " If sel = "8" Then mor = "_ _ _.. " If sel = "9" Then mor = "_ _ _ _. " If sel = "." Then mor = "._._._ " If sel = " " Then mor = " " Text2 = Text2 + mor Next End Sub EXEMPLE EXEMPLE EXEMPLE
Conclusion :
AUTREMENT TOUT EST DANS LE ZIP
Codes Sources
A voir également
- Traducteur morse
- Morse traducteur - Meilleures réponses
- Traducteur de morse - Meilleures réponses
- Choix de couleur - Codes sources - C / C++ / C++.NET (.Net)
- Rgb - utilitaire de choix de couleur pour vos futurs programmes - Codes sources - Visual Basic / VB.NET (Formulaire)
- Choix de couleur sous xp en mode console - Codes sources - Visual Basic / VB.NET (Shell)
- Choix de couleurs personnalisées. - Codes sources - Delphi / Pascal (Graphique)
- Traducteur code morse ✓ - Forum - C++ & C++ .NET
Commentaires
continu a fair des tits truk comme ca ^^
tu pourrai fair un traducteur francais anglais si tu veut :)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.