CamerNet - Visual Basic

Des astuces utiles pour prendre des bonnes habitudes lorsque vous programmez en vb !

ASTUCES DE DEMARRAGE

[Astuce : Faire un Cd Autorun]

Pour faire que le système execute automatiquement un programme quand le CD est inséré, créez un fichier .inf nommé "Autorun.inf" et mettez le dans le Cd. Le fichier "Autorun.inf" doit ressembler à ça:

[autorun]
OPEN=SETUP.EXE /AUTORUN

Remplacer SETUP.EXE par le programme sur le Cd que vous voulez executer. A noter que l'utilisateur peut supprimer l'Autorun sur son PC.

[Astuce : Mettre NotePad dans le Menu "Envoyer Vers"]

C'est toujours aussi penible lorsqu'on veut éditer un fichier .vbp, .sys.. d'ouvrir Notepad, de naviguer dans les répertoires pour aller chercher le fichier. Cette astuce permet de mettre Notepad dans le Menu "Envoyer vers" [lorsque vous cliquez sur un fichier avec le bouton droit]. Voici comme faire:
Mettre simplement un raccourcis Notepad dans le dossier Windows\Send To.

[Astuce : Simuler le passage d'une ligne de Commande]

Pour simuler le passage d'une ligne de Commande à votre programme lorsque vous êtes encore sous vb, procédez comme suit:
Dans VB5: Sélectionner le menu Projet puis cliquez sur Propriétés. Cliquer sur Faire et entrez vos arguments dans le champ de texte "Arguments de la Ligne de Commande"

ASTUCES DES TECHNIQUES DE CODAGE

[Astuce : Apprendre les TYPES des objets]

Si vous voulez savoir si un objet est d'un type particulier, faites un test qui ressemble à ça:

If TypeOf obj Is ListItem then...

Si vous voulez avoir le type d'un objet, utilisez ceci:

MsgBox "L'objet sélectionné est un " & TypeName(obj)

[Astuce : Utilisez des dll]

Si votre programme utilise un très grand nombre de fonctions, il serait préférable de les insérer tous dans une DLL et ensuite de faire une référence à cette dll dans votre projet.
Ceci augmentera considérablement la vitesse du code.
Faites de même pour les API: Utilisez beaucoup plus les API au lieu des fonctions usuelles de vb.

[Astuce : Contrôlez vos structures de répétitions infinies]

Lorsque votre programme entre dans une structure de répétitions très importantes, il serait préférable d'insérer la fonction DoEvents dans la structure. Ex:

     For i=1 to 1000000
          DoEvents
          ....
     Next i

DoEvents permet de récuperer les évènements [cliques, pression de touches] que recoit le programme pendant les répétitions. Ainsi, si votre programme met du temps, l'utilisateur peut le fermer en cliquant sur un bouton.

[Astuce : Vos structures de répétitions infinies plus RAPIDE]

J'ai découvert que lorsqu'on utilise l'api GetInputState au lieu de la fonction vb DoEvents, l'interception des évènements est plus rapide... ainsi les répétitions s'effectuent aussi plus rapidement. Alors, dans vos structures de répétition (ex. for i=1 to 2000), remplacer
DoEvents
Par

If GetInputState then DoEvents

Ceci est du au fait que GetInputState ne retient que les évènements qui sont destinées à l'application alors que DoEvents retient tous les évènements des applications en cours ! Testez Pour voir ! TEST

Private Declare Function GetInputState Lib "user32" () As long
Private Sub Form_Click()
Dim i, a
Dim sec1, sec2
Sec1 = Time
For i = 1 To 2000
      'Faites varier les fonctions pour voir la différence
      If GetInputState then DoEvents
      'DoEvents
      a = a + 1
      debug.Print a
Next i
Sec2 = Time
Msgbox sec1 & " - " & sec2
End sub

<< PAGE PRECEDENTE - Page 2/2

[Home] [Actualités] [Trucs & Astuces] [Astuces Windows] [ActiveX-Ocx/Dll] [Articles] [Codes Sources] [VB Games] [Fichiers Sons] [Fichiers Icônes] [Programmes & Sources] [Mailing-List] [Divers] [A Propos]