AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 01 09 06:55:43
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

106 commentaire(s) de TeBeCo sur des sources sur vbfrance

Le : 08/08/2008 12:58:38
Source : OPTIMISER WINDOWS POUR JOUER
vive les blague ...
vas y kill le "dwn" sous vista quand tu joue en mode fenetré on en reparle

apres :
taskkill /f /im jusched.exe

c'est une bonne idée aussi de kill ca si jamais y a un acces de fait ca se relance de tte facon mdr suffit qu'une autre tache en fond l'utilise, pour ce que ca coute en ressource quand il fait rien ca sert ... a rien

enfin tu devrais eviter de bidouiller des choses au hasard et te renseigner sur les process
surtout quand ton code n'est en rien de ".net" mais du shell de .bat depuis un executable que tu peux faire a la main ca a aucun interet
pourquoi double clicker sur un exe alors qu'on peux double cliquer le .bat ?

Le : 06/08/2008 13:15:57
Source : PROGRESSBAR
ca serais pas mal qu'un admin annule la coche ".Net" ou l'auteur si il y a acces quand il s'agit de vb6

Le : 17/07/2008 15:56:39
Source : SÉPARATEUR DÉCIMAL UNIVERSEL AVEC TEXTBOX
de nombreux point sombres dans ce code malheuresement.
Tout d'abord quand je vois :
CStr, VB.Right, Len, VB.Left
ca fait deja peur ...
en gros tu fais pas de .net la tu reste bloqué sur tes vieilles habitude vb6
Ces fonctions sont a eviter completement quasiment 90% du "Microsoft.VisualBasic" (si c'est pas 100%) est a eviter.
pour quelle raison ?
les lignes :
Dim s1 as String = "toto"
Dim n as Interger = 1
Dim s2 As String = Right(s1, integer)

ont un equivalents .net :
Dim s1 as String = "toto"
Dim n as Interger = 1
Dim s2 As String = s1.SubString(s1.Length - n)

que va-t-il se passer avec la ligne :
Right(s1, integer)

il va te faire un :
return s1.substring(s1.length - n)

tu me dira c'est pareil
ben non tu perd en temps d'execution et en ressource a force de dupliquer et empiler les appel
donc passe vraiment a .net
oublie Microsoft.VisualBasic le plus possible et cherche un peu dans la doc
la tu fais quoi ?
des manipulation de String ?
ben ouvre la doc de la classe System.String et lis t'as pas d'autre choix

avec comme l'a dis "Gwendal3" les 40 "If" imbrique c'est une blague ?
Le Select Case est deja beaucoup mieux mais c'est pas encore ca
.Net c'est de la prog objet donc faut reflechir objet et entité
t'as un super framework qui te fournis plein de classe avec des automatisme pré existant
la par exemple tu peux te créé une liste generique du type :
imports System.Collections.Generic
Dim lstCaractereASuivre As List(of String)
ou
Dim lstCaractereASuivre As List(of Char)

pourquoi "of Char" ben parce que y a aucun interet a utiliser "String" a toi de voir mais 1 caractère convertit en String a t il vraiment son interet ? a voir
et dans la liste au moment du load tu formulaire tu fais un truc dans le genre :
lstCaractereASuivre.Add("1")
ou
lstCaractereASuivre.Add('1')

suivant la liste que t'as pris
et tu rajoute tous tes caractère important en question
pourquoi ca ?
la reponse dans la doc MSDN encore une fois
tout d'abord tu peux interroger la collection pour voir si elle contient un caractère et ca renvois un true/false
if (lstCaractereASuivre.IndexOf(textbox.text.substring(textbox.text.length-1)) > 0) Then
'alors il est dans la liste
else
'il y est pas
end if

encore autre chose :
ecrire "TextBox1.Text" c'est super beau c'est genial c'est magique etc ....
sauf que une textebox c'est pas une variable faites pour te donné que du texte, y a une interface graphique y a pas mal de code derriere en plus pour la securité, le cross threas etc ...
donc les appels dessus sont relayé par du code derriere et donc plus lents
dans ces cas quand tu sais que tu va faire plusieur accces dessus il vaux mieux dupliqué la valeur 1 fois dans une variable String au debut du sub (variable de classe ou locale suivant ou tu t'en sert avec les Call) et a la fin recopié la valeur dans la textbox elle en sera d'autant plus contente
en plus de cas comme le multithread est possible en .net si jamais la valeur de ta textbox change entre le debut et la fin de la sub avec ton code tu l'a dans l'os


ensuite pour revenir sur la remarque de Eldim en .net (cf msdn pour changer) t'as une fonction qui te permet de recuperer le separateur decimal de l'utilisateur loguer sur la machine qui utilise ton application ca te permet de savoir si c'est un "." ou une "," ca aussi a stocké en varaible de classe ou globale je presume et a remettre a jour (a toi de voir quand mais si l'utilisateur le change pendant l'appli faut que ca soit gerer donc un timer c'est a eviter)

enfin y a beaucoup de chose a revoir
par ou commencer ?
je dirais qu'il faut plus se servir de MSDN => a chaque classe utiliser va lire la liste des membres, la description de la classe et les exemple associé
ensuite je te dirais d'arreter de raisoner a la VB6 si VB6 est marqué par microsoft comme obsolete depuis le debut de l'année c'est pas pour rien il faut penser plutot Programmation Objet.

Sur ce bonne continuation en .net

Le : 23/07/2007 18:13:33
Source : CLIENT IRC EN VB.NET MULTISERVER (SUPPRIMÉE)
je l'avais codé avec la version 2002 de VS.net c'est pour te dire l'ancienneté du code et en même temps c'etait l'année de sortie de .net avec ma première source déposé ici. :D
J'avais même pas fait attention au Strict On effectivement je pensais que c'etait mit par default sans même le vérifier.
J'ai pas eu le courage ni le temps de la mettre a niveau depuis mais quiquonque a l'envie et la motivation de le faire est le bienvenue ^^

Le : 10/07/2007 08:05:03
Source : MIDI IN EN VB2005
jeux de caractères :
namespace => System.Text.Encoding
ASCII
Unicode
UTF8
UTF16
Default (celui du systeme probablement l'ANSI sur bcp de pc)


string=>byte :
dim btData() as Byte = system.text.encoding.ascii.getbytes("salut")

byte => string
dim btData() as Byte
...
'remplissage
...
'decodage
dim sData as String = system.text.encoding.ascii.getstring(btdata)


(enfin ya plusieur fonction avec de l'overload a toi de choisir l'encoding qui te correspond ainsi qui les methode les plus approprié
j'espere avoir repondu a ta question sur les "caractère multibytes"

Le : 27/06/2007 13:07:13
Source : COUNTDOWN
l'erreur est pas du a ScharpDevelopp mais a ton code apparement tu tentes d'utiliser un membre static depuis uen instance de classe alors que pour utiliser un membre static il faut specifier le nom de la classe :

dim toto as tata
toto.nonstatic()
tata.static()

alors que toi tu fait :
toto.static

Le : 16/06/2007 12:13:43
Source : PANEL RÉTRACTABLE, REDIMENSIONNABLE ET DÉPLAÇABLE
le drag/drop est activé de facon a pouvoir l'avoir en dynamique dans le WYSIWYG de facon optimal où il faudra faire de la création dynamique de control pour pouvoir l'utiliser ?

Le : 10/05/2007 05:30:36
Source : CONTROLE POUR TRACER DES LIGNES
pas de soucis je rapelle qu'il y a un cannal irc reservé a la programmation
serveur irc : irc.heliosnet.org
cannal : #Programmation

ya une 40aine de personne en journée le chan est la pour depanner l'oublier pas (c'est pas google non plus c'est jsute de l'assistance pas du code tout fait)

Le : 07/05/2007 23:31:54
Source : CONTROLE POUR TRACER DES LIGNES
j'ai oublié de fermer la parenthese apres le "]" de Taille pour le pinceau d'ailleurs j'ai fait ce code de mémoire mais ca devrait etre ca, en gros a chaque fois que tu form est repaind il redessinne la ligne, si tu le met pas dans cet evenement la ligne sera dessiné mais en aucun cas elle sera memorisé c'est pour cela qu'il faut le mettre dans le "Paint"

Le : 07/05/2007 23:30:21
Source : CONTROLE POUR TRACER DES LIGNES
private sub form_paint(sender as object, e as painteventargs) handles me.paint
    e.Graphics.DrawLine(New Pen(<Couleur|Brush> [,Taille], <Point1,Point2|x1,y1,x2,y2>
end sub

(cf la doc MSDN comme tjs : "Press F1 to enter help" si t'as pas le reflexe t'avancera aps)


1 2 3 4 5 6 7 8 9 10 11


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,125 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.