Un p'tit coup de pouce pour debuter [Access / VB] - SQL/NoSQL - Programmation
Marsh Posté le 17-05-2004 à 11:05:29
la zone zt_nb est vide? coup classique: tentative de transformation de chaîne vide en valeur numérique> marchera pas. Au pire tu encadres les zt_nb.Value et autres d'un Val() de bon aloi, lui sauras transformer un "" en 0.
Marsh Posté le 17-05-2004 à 11:21:54
ou alors encore pire la zone zt_nb n'existe pas...
tu l'as créée avant ?
Marsh Posté le 17-05-2004 à 11:31:09
en tête de tous les modules> Option Explicit
question de savoir si on deale avec des variables déclarées
Marsh Posté le 17-05-2004 à 11:36:59
Eheh, et bien... non ! Elle n'etait pas creee la maligne.
Bref, j'ai repris en comprenant (un peu) plus. Donc : creation d'un formulaire avec les boutons, et les champs tout bien comme il faut (zt_nb,..., le bouton bt_calcul, et eti_resu). Deja, ca risque de mieux passer.
Ensuite, click droit sur le bouton bt_calcul et pour le builder je choisis "code builder". Je me retrouve dans la fenetre de module, je copie le code, et je tente l'execution. La ! patatra, il m'affiche une fenetre pour que je lui indique une macro a executer.
Je n'ai pas de macro, et tout monde code est present dans ce que j'ai mis plus haut.
Un brin d'explication ?
Marsh Posté le 17-05-2004 à 11:01:31
Bonjour tout le monde,
Voila, j'ai betement recopie ce code que j'ai insere dans un module Access. Je tente de le lancer, et la apparait une erreur 424 (Object required). Le debug pointe sur la ligne : "n = zt_nb.Value".
Voila les gens, si quelqu'un peut m'expliquer le pourquoi de cette erreur, et si possible comment y remedier.
Je sais clairement que c'est du bas niveau, alors un peu d'indulgence
---------
Sub bt_calcul_Click()
Dim n As Integer
Dim prix As Single
Dim tot As Single
Dim prod As String
n = zt_nb.Value
prix = zt_prix.Value
prod = zt_prod.Value
tot = n * prix
eti_resu.Caption = "vous avez commande " & n & " " & prod & "s pour un montant de " & tot & " euros"
End Sub
----------
Zubral