Accueil > Forum > > > > Petit probleme avec une fonction
 Petit probleme avec une fonction
jeudi 21 juillet 2005 à 13:01:13 |
Petit probleme avec une fonction
Smu2015
|
Bonjour :)
Mon problème est tres simple :)
J'ai une fonction Arrondir dans un module:
Function Arrondi(nb)
nb = Fix((nb + 0.0001) * 1000) / 1000
End Function
Dans un autre module, j'ai :
toto=arrondi(toto)
Le probleme, c'est que ca me renvoie toujours Vide :(
Dans la fonction Arrondi, c'est bien calculé mais ca 'suis' pas apres.
Merci de m'indiquer mon erreur
|
|
jeudi 21 juillet 2005 à 13:38:36 |
Re : Petit probleme avec une fonction
SyS_
|
Réponse acceptée !
Salut !
Dans un premier temps, comme une fonction ('Arrondi' ici) renvoit toujours une valeur, il vaut mieux que tu précises le type de cette valeur. Tu peux d'ailleurs préciser aussi le type de la variable en entrée ('nb' dans ton cas). Par exemple, tu peux écrire :
Function Arrondi(nb as Single) as Single
Ton problème vient du fait que tu attribues la valeur à renvoyer à ta variable en entrée ('nb'), alors qu'il faut l'attribuer à la fonction :
Function Arrondi(nb as Single) as Single
Arrondi = Fix((nb + 0.0001) * 1000) / 1000
End Function
Ainsi, ça devrait suivre après!! ;-)
En espérant avoir été aussi clair que possible.
++++++++++++++++++++++++++++
|
|
jeudi 21 juillet 2005 à 13:53:23 |
Re : Petit probleme avec une fonction
Smu2015
|
Salut :)
Merci beaucoup pour ta réponse rapide.
Malheuresement, mon probleme n'est tjs pas résolu..
Function Arrondi(nb as Double) as Double
Arrondi = Fix((nb + 0.0001) * 1000) / 1000
End Function
1er souci : si je met (nb as double) g un type d'argument byref
incompatible (ce qui est tres étrange puisque le 'toto' est en double
aussi
2eme souci : le resultat ne suis toujours pas ... au lieu de vide, j'ai 0
|
|
jeudi 21 juillet 2005 à 13:57:22 |
Re : Petit probleme avec une fonction
Gally
|
Réponse acceptée !
Bonjour,
Public Function Arrondi(byval nb as Single) as long
Arrondi = Fix((nb + 0.0001) * 1000) / 1000
End Function
@++
[Gally Home Corp]
|
|
jeudi 21 juillet 2005 à 14:08:32 |
Re : Petit probleme avec une fonction
Smu2015
|
Ohhh le boulet, désolé, la réponse était bonne dès la seconde réponse...
Je continuais a mettre nb= au lieu de arrondi=
Merci beaucoup sys_ 
Merci aussi a toi Gally, avec le byval, plus de message d'erreur
@ +
|
|
vendredi 22 juillet 2005 à 08:25:30 |
Re : Petit probleme avec une fonction
SyS_
|
De rien ,
bonne continuation ! :-)
|
|
lundi 25 juillet 2005 à 19:41:04 |
Re : Petit probleme avec une fonction
Fred800202
|
Salut tout le monde, j'espère ne pas me tromper dans le post, je voudrais savoir comment je puis retranscrire l'expression suivante: lpFindFileData.cAlternate = String$(14, 0) qui est en VB6 en VB.Net.
Je joue en effet avec les fonctions API FindFirstFile, FindNextFile et FindClose mais je bloque sur cette convertion de syntaxe, si quelqu'un pouvait m'aider ce serrait très sympas à lui  Merci à tout ceux qui participe à ces forums aussi bien pour le Visual Basic que le C++ ou les autres langages de programmation La programmation, c bien, mais la programmation avec utilisation du multimédia (directX) c'est mieux, mais pas facile d'apprendre  Sinon, le graphisme 3D c'est cool aussi avec 3D Studio Max et Bryce que j'apprend |
|
Cette discussion est classée dans : fonction, arrondi, probleme, module, nb
 Répondre à ce message
 Sujets en rapport avec ce message
probleme acces fonction dans dll vb à partir power builder [ par kali ]
Bonjour, j'ai créé une dll activex à l'aide de vb. Celle ci contient ue seule fonction. Je souhaiterait pouvoir appeler cette fonction à partir d'une
Arreter complètement une fonction, se trouvant dans un module , depuis un form **URGENT SVP SVP .. [ par YoDa ]
Hello,j'ai une liste de dossiers (dirlistbox)et lorsque je clique sur un dossier mon programme (grace a une fonction se trouvant dans un module) met l
UN probleme de " [ par lezabour ]
Voila, ma fonction :Public Function test() As StringDim ip As Stringip = mysql.test1.Texttest = ipEnd FunctionJe veux ecrire le resultat de ma fonctio
Salut! G un probleme avec une fonction appele NumericText [ par DarKLight ]
Et bien voila, je debute en VB, et je n'arrive pas a faire marcher la fonction NumericText(str)... J'utilise VB6 sp5, et le manuels en ligne et celui
probleme access, arrondi, horaire [ par pierchons ]
Bonjour,je viens de realiser une base access pour gerer des petits boulots , 2 heures chez X, 3 heures chez Y, etc...mes problemes sont :j'ai un champ
probleme arrondi [ par liam ]
jeune stagiare debutant en VBA, j'ai la lourde charge de gerer un gros probleme d'arrondis avec une macro excel.ne connaissant pas vraiment le vb j'ai
parametre d'un module de classe [ par sherazade ]
j'ai une fonction public dans un module de classe qui se trouve dans un projet Dll .je fais appel a cette fonction a partir d'un autre projet exe .Le
Probleme avec un Module dans un ActiveX [ par Nicolas H. ]
Salut,Voila mon probl.j'ai un module dans un ActiveX et une des fonctions qui se trouve dans ce module doit ecrire sur ma form soit UserControl1 mais
DO - LOOP = probleme ! [ par boutnell ]
Lu'! g fait un prog du stye:*********do call fonctionloop*********Mon probleme est que l'on passe au LOOP sans que l'appel de la fonction sois termin
Reinicialisation error [ par WingZ ]
Yop yop, Voili j'ai un p'tit probleme (encore 1 autre)...J'ai un programme qui utilise les erreurs pour fonctionner correctement. Quand une erreur est
 Livres en rapport
|
Derniers Blogs
 GESTION D'EXCEPTION AVEC LES TASKSGESTION D'EXCEPTION AVEC LES TASKS par richardc
Nous avons vu dans un précédent article comment utiliser Task pour effectuer des opérations dans un autre thread.
Malheureusement, comme tout le monde n'est pas parfait, il se peut que cette exécution se passe mal et qu'une exception se produise.
La...
Cliquez pour lire la suite de l'article par richardc DéMARRONS AVEC LES TASKSDéMARRONS AVEC LES TASKS par richardc
Que vous le vouliez ou non, le développement multi-tâche est maintenant une obligation pour toute nouvelle application. Il est donc vital d'en comprendre les mécanismes et de s'y mettre le plus tôt possible.
En attendant le .NET Framework 4.5 avec le...
Cliquez pour lire la suite de l'article par richardc SLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPSSLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPS par Vko
Retrouvez les slides et les démo de ma session Fast & Furious XAML Apps. A ceux qui se posent la question : "est-ce que le code de la DataGrid est disponible?", je vous répondrais "pas encore". Je vais mettre en place un projet codeplex pour part...
Cliquez pour lire la suite de l'article par Vko XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Logiciels
 DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|