Votre question

Probleme visual basic probleme de code source

Tags :
  • Programme
  • Programmation
Dernière réponse : dans Programmation
30 Avril 2006 16:42:19

bonjour j'ai un probleme je suis vraiment débutant en visual basic est mon programme a une erreur

Compile error block if without end if

----------

Private Sub Form_Load()
Dim DateNaissance
Dim Prenom
Dim Message, Titre As String
Message = "Veuillez entrer votre date de naissance? "
Titre = "Entrez votre date de naissance : "
DateNaissance = InputBox(Message, Titre)
If DateNaissance <> "" Then
DateNaissance = Format(DateNaissance, "Long Date")
MsgBox DateNaissance, vbOKOnly + vbInformation, "Vous êtes né(e) le"
Message = " Quel est votre prenom? "
Titre = "votre prenom : "
Prenom = InputBox(Message, Titre)
If Prenom <> "" Then
End
Else
While DateNaissance = ""
MsgBox "Entrez une date arreter de fermer le programme ", vbOKOnly + vbExclamation, "Attention!"
DateNaissance = InputBox(Message, Titre)
Wend
DateNaissance = Format(DateNaissance, "Long Date")
MsgBox DateNaissance, vbOKOnly + vbInformation, "Vous êtes né(e) le"
End
End If
End Sub
--------------


ps : avez vous un tres bon site pour apprendre a programmer en vb? mais je ni conner rien de rien et je voudrais apprendre de la base de chez base?

Autres pages sur : probleme visual basic probleme code source

1 Mai 2006 13:47:35

je pense que ton message d'erreur parle de lui meme...!


tu a oublié de fermer un if...

If Prenom <> "" Then

enfin, il me semble... non?

1 Mai 2006 20:18:12

je ne vois pas de quoi tu veu parler ?
Contenus similaires
a c 232 L Programmation
2 Mai 2006 08:55:42

Il dit que tu as ouvert deux conditions IF :
  1. If DateNaissance <> "" Then

et
  1. If Prenom <> "" Then


Et que tu n'en fermes qu'une seule :
  1. End If
2 Mai 2006 10:56:47

bon, tiens mon mail: tariktobbal@hotmail.com, tu m'envois ce que tu veux faire, et je t'enverrai ton prog prét a fonctionne, comme ça tu pourra voir comment ça marche, ok!
bon courage
a c 232 L Programmation
2 Mai 2006 11:04:05

C'est inutile de faire ça, il apprendra pas.

Si tout lui tombe du ciel, il prendra meme pas le temps de comprendre !
2 Mai 2006 11:12:32

c vrai, t'as raison collégue, pour apprendre il faut se trouer la tête!!!! lol
2 Mai 2006 18:16:42

oui c'est vrais aussi d'apres vous ce site c'est un tres bon moyen d'apprendre ouai je voudrais faire des petit programme sympatosh lol je voudrai savoir comen peut on faire un programe pour un pote enfete la question est " avec qui voudrais tu sortir il doi la taper dans une case le nom est puis des qu'il clique sur Ok sa m'envoie un email lool quel est la commande pour que sa menvoie un email quand il clique sur ok
Tom's guide dans le monde
  • Allemagne
  • Italie
  • Irlande
  • Royaume Uni
  • Etats Unis
Suivre Tom's Guide
Inscrivez-vous à la Newsletter
  • ajouter à twitter
  • ajouter à facebook
  • ajouter un flux RSS