J'ai besoin d'aide pour convertir n'importe quel numéro donné SOC dire "0123456789" présent dans la zone de texte pour être converti en chaîne comme "zéro un deux trois cinq six sept huit huit neuf" et être imprimé dans vb.net.
4 Réponses :
Pourquoi ne pas faire une fonction qui a lu jusqu'à la fin et pour chaque entier, faites une conversion avec une table comme 1 -> une; 2 -> deux et etcaetera?
Comme Désolé pour mon mauvais anglais, j'espère que vous voyez mon idée avec une idée rapide, sale et salissante de nulle part de mon A **
Mettez les noms des numéros dans un tableau, puis utilisez le résultat de integer.parse (c.tostring ()) (ou même cint () ici) dans un Pour chaque boucle pour sélectionner le nom de la matrice. Un StringBuider est meilleur que la concaténation à la chaîne. Ou LINQ, en une ligne.
@Jimi wow j'aime votre idée
Comme Jimi suggérait, vous pouvez faire quelque chose comme ça avec ceci, vous devez vous assurer que la valeur de la zone de texte ne correspond que des entiers
@Jimi Merci, j'ai édité la réponse, peut-il toujours être édité plus loin?
Oui! DIM NUMARRAY en tant que caractère () etc. n'est pas nécessaire. Comme décrit précédemment, une chaîne est déjà une gamme de caractères: vous pouvez simplement avoir pour chaque c comme char dans textbox1.text . Une autre ligne va. Si vous pensez qu'il devrait être coupé, ajoutez textbox1.text.trim () .
Ma solution
Function NumberToText1(ByVal n As Integer) As String ' numeri da 0 a 9
Dim arr() As String = {"Zero", "One", "Two", "Three", "Four", "Five", "Six", "Seven",
"Eight", "Nine"}
Return arr(n) & " "
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim w As String = ""
For Each s As String In TextBox1.Text
w += NumberToText1(CInt(s))
Next
MessageBox.Show(w)
End Sub
pour chaque S comme chaîne dans textbox1.text Je ne pense pas que ceci est valide car il n'y a qu'une seule chaîne dans la zone de texte.
0,02 $
dbasnett merci pour votre solution il a fonctionné, je souhaite aussi le même code pour vb6
Bienvenue dans le débordement de pile. Veuillez lire Les pages d'aide , en particulier "Quels sujets Puis-je demander ici? " et " Quels types de questions dois-je éviter de demander? ". Aussi Prendre la tournée et lire comment Pour poser de bonnes questions et Cette question de question < / a>. Enfin, apprenez à créer un exemple de reproductible minimal .
Veuillez également lire Dans quelles circonstances puis-je ajouter "urgent" ou d'autres phrases similaires à ma question afin d'obtenir des réponses plus rapides?