Problème programmation BlackJack VBA

Fermé
Amnesia92 Messages postés 1 Date d'inscription jeudi 10 avril 2014 Statut Membre Dernière intervention 10 avril 2014 - 10 avril 2014 à 15:47
Bonjour, je cherche à programmer un BlackJack en VBA, seulement je rencontre un problème.

Voila comment je commence:
Sub blackjack()
Dim valeur As Double
Dim mise As Double
Dim x As Integer
Dim choix As Integer
Dim banque As Integer
Dim autrepartie As Integer
Dim carte1 As Integer
Dim carte2 As Integer
Dim carte3 As Integer
valeur = 500
MsgBox (" Pour débuter, vous disposez de " & valeur & "euros ")
InputBox (" Votre mise : ")
If mise < 0 Or mise > valeur Then
InputBox (" Vous ne pouvez miser cette somme. ")
End If

Le problème est que je ne sais pas comment faire pour prendre la réponse du premier inputbox et la mettre dans la ligne If mise<0...

Si vous pouviez m'aider se serait sympha. Merci