Bonjour,
Comme son nom l'indique, le contenu d'une Textbox
est du texte. Si ce texte contient uniquement des chiffres et éventuellement un séparateur décimal, il est convertible en nombre pour être utilisable.
Exemple :
MonNombre = txt_stm * 1
On peut aussi utiliser les fonctions de conversion (CSng(), CInt(), CDbl(), etc)
Personnellement, je conseillerais de faire la vérification des caractères saisis en temps réel, par exemple :
Private Sub TextBox1_Change()
'Nom TextBox à adapter
If TextBox1 <> "" Then
If Not (Right(TextBox1, 1) Like "#" Or Right(TextBox1, 1) = ".") Then 'Si dernier caractère saisi non numérique ou ".", alors
Msgbox "Vous devez saisir un nombre ! Le séparateur décimale est le point." 'Avertissement
If Len(TextBox1) > 1 Then TextBox1 = Left(TextBox1, Len(TextBox1) - 1) Else TextBox1 = "" 'Suppression dernier caractère
End If
End If
End Sub