Profil de GtommarC - CodeS SourceS

problème de décimale ....

Salut tout le monde ! Mon problème est simple. Je veux convertir des variables de type long en chiffres ayant 4 décimales aprés la virgule, comment faire ?

var1=format(var2,"0.0000") a+ GtommarC

Boujour a tous voila je débute et je voudrai savoir comment on inclut un variable dans une MsgBox par exemple : inclure la variable NBcoupv aprés "en" dans : MsgBox "Bravo t'as trouvé le bon nombre! en ici donc", vbExclamation, "Bravo!" Merci CIAO SZ

ok dans ma préciîtatopn j'ai oublié cz qui marche c'est réponse = MsgBox (strvar, vbExclamation, "Bravo!") GtommarC

dim strvar as string strvar = Bravo t'as trouvé le bon nombre! en" & NBcoupv & "ici donc" MsgBox (strvar, vbExclamation, "Bravo!") a++ GtommarC

livre a acheter

salut a tt je debute dans visual basic et je s'est pas quel et le meilleur livre a acheter (je suis vraiment nul) je cherche un livre qui explique bien merci pour votre aide :shy)

je suis aussi à marseille et je l'ai trouvé à carrefour bonneveine, je ne sais pas s'il y est encore. j'y vais demain je regarderai et te tiendrai au courant a++ GtommarC

j'ai trouvé interessant et pédagogique le magnum visual basic 6 édition Campuspress marque de PEARSON EDUCATION FRANCE 19 RUE MICHEL LE COMPTE 75003 PARIS coût 25.15€ GtommarC

j'en perd mon latin...

Salut ! J'ai besoin d'aide (comme d'hab...). Donc je veux comparer une chaine de caractere avec un champ de recordset pour effectuer une recherche sequentielle. J'ai tout essayé, rien ne marche ! Pourtant la valeur que je saisie et la valeur du recordset est identique (dans un msgbox). J'ai essayé : str1 = produits.rs_produit(1)... Lire la suite

peur etre faut-il lire le reccord set de cette façon str1 = trim(produits.rs_produit(1).Value) ce qui enlèvent les espaces crées à l'enregistrement GtommarC

MSHFlexGrid

Dans une MSHF.., lorsque j'effectue un calcul sur les colonnes, je vois le rectangle de sélection se déplacer sur toutes les cellules concernées par ce calcul. Qui peut me dire comment ne pas voir ce rectangle? merci d'avance GtommarC

merci pour la solution, malheureusement à part faire précéder les jours par un espace plus ou moins grand, ou changer l'alignement du texte dans la cellule, (juin aligné à Gauche et le jours à Droite) je ne connais pas la réponse au problème posé GtommarC

Expression numérique

G 1 pb tout bete que je n'arrive pas à résoudre! Un utilisateur rentre une valeur numerique dans un InputBox avec le pave numerique, exemple : 0.1; il rentre ainsi une centaine de valeurs pour une base de données, mais si en tapant trop vite, il entre 0..1, ca fait planter la macro VB. Alors j'ecrit If Is NotNumeric pour le contenu de l'I... Lire la suite

quand tu rentres un point, tu mets une valeur "true" dans une variable, et tu vérifies si le caractère frappé après et aussi un point. si c'est le cas tu mets une msg d'erreur GtommarC

Tri par ordre alphabétique d'un tableau

Bonjour à tous, Soit un tableau tout bete declare comme suit : Dim tableau() as String Je le rempli avec des valeurs, et je voudrais ensuite trier les valeurs contenues dans le tableau par ordre alphabétique. Comment on fait? Please !!! Merci par avance pour vos réponses, Sankukai Lire la suite

pour ceci je passe mes valeurs dans une listbox paramétrée sorted = true et je les récupère et les réintègre dans mon tableau GtommarC

Accéder directement à la dernière ligne d'1 fichier texte

Salut à tous ! J'aimerai savoir si il y a un moyen d'accéder directement à la dernière ligne d'1 fichier texte(fichier d'accès séquentiel) J'ai besoin de faire des traitement en temps réel sur la dernier ligne, etant donné que le fichier es de grande taille, et que je passe en revue toutes les lignes je n'arrive pas à obtenir l'interacti... Lire la suite

tu ouvres ton fichier for random as #N°ouverture as len = longueur d'enregistrement get #N°ouverture,lof(N°ouverture)/ longueur d'enregistrement,variable la variable sera le dernier enregistrement de ton fichier séquentiel GtommarC

Régler Epaisseur Line URGENTS

Comment regler l'épaisseur de ce Line ex: Line (10,100)-(100,2000) merci Megatrix

ma réponse précédente ne marche pas? GtommarC

Line Border

Comment puis je faire épaissir mon line ex: Line (0,100) - (10,1000) merci @++ Megatrix

printer.DrawWidth = l'epaisseur GtommarC

convertir lettre en chiffre

comment puis en vb ocnvertir les lettres en chiffres apres avoir récupérer un fichier: genre a=1;b=2;c=3... quand le programme lit "a" il affiche 1.

tu lis le fichier line input#N°fichier, variable cette variable vaudra a puis b ECT c'est dans la boucle de lecture que tu écris ce code GtommarC

select case string case "a" intvariable = 1 case "b" intvariable = 2 case "X" intvazriable = valeur de x end select GtommarC

Do Loop pour avoir jour mois année

'lut, suis nouveau, commence juste la programmation. Sur Vb il met demandé de vérifier la validité de l'entrée année, mois et jour. Seulement pour le jour je suis embété. Exemple, pour vérifier si la le jour de 1 a 30 pour le mois 4, 6, 9, et 11. Ma question est donc de savoir comment je peux ma vérif en une fois et non faire une boucl... Lire la suite

en supposant que tu utilise une text box pour les jours, une pour les mois et une pour les années Select Case Val(mois.Text) Case Is = 2 If Val(jour.Text) > 29 Then re = MsgBox("il ne peut pas y avoir plus de 29 jours en février", vbOKOnly, "ERREUR DE MOIS") End If Case Is = 4, 6, 9, 11 If Val(jour....

CommonDialog1

CommonDialog1.InitDir = "C:" CommonDialog1.Filter = "Fichiers Textes|*.txt|Documents|*.doc|Images|*.bmp;*.gif;*.jpg" CommonDialog1.FilterIndex = 1 CommonDialog1.Action = 1 Quand j'execute ce morceau de programme il me dit: "Erreur de compilation, variable non définie" Pourquoi et comment fait on pour que la commande CommonDialo... Lire la suite

Sur ta boite à outils tu dois avoir ce contrôle , cliquer dessus et l'amener sur ta form si tu ne l'as pas, tu positionnes ta souris sur la boite, tu cliques sur le bouton droit, un menu contextuel va apparaitre tu cliques sur composant et dans la fenetre qui s'ouvre tu cherches le common dialog. tu coche te tu appuie sur appliquer, il v...

As tu mis Microsoft Common Dialog Controle 6.0(SP3) sur ta feuille GtommarC

Probleme de somme avec MSHFlexGrid

Bonjour a tous, j ai un petit probleme d' addition. En fait j' ai un MSHFlexGrid qui contient 2 colones et je voudrais pour additionne le montant de chaque ligne pour obtenir un resultat total de chaque colone( Donc autant pour la 1 ere colonne et autant pour la seconde) et le resultat sera afficher dans des text box Qui connais le co... Lire la suite

il faut mettre le nom de ta grille à la place je viens de mettre une source complète avec saisie dans une msflexgrille GtommarC

dim total as long ou single ou integer suivant tes dionnées 'commence à 0 si ta première ligne ne contient pas de titre sinon for x = 1 to nb ligne msflexgrille.col = 0 msflexgrille.row = x total = total + msflexgrille.text next x total est le total de la colonne tu fait pareil avec la colonne 2 GtommarC

Déplacer un fichier

Comment déplacer un fichier? merci @++ Megatrix

OldName = "C:\ancien repertoire\ancien nom" NewName = "C:\nouveau repertoire\nouveau nom" Name (OldName) As (NewName) GtommarC