Visual Basic Research Center

~ Edito ~

12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période.
Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.

~ Rechercher ~

~ Annuaire VB ~

~ Partenaires ~

~ L'Astuce du Jour ~

Comment doit-on déclarer les paramètres passés à une fonction ou une procédure?
Il existe deux façons de déclarer les paramètres d'une fonction, ByVal et ByRef. C'est-à-dire, par valeur, ou par référence. Cela n'est absolument pas obligatoire dans le cas de fonctions internes (attention cependant pour les API), et dans ce cas, VB (version 6) considère par défaut que le paramètre est passé par référence.
Lorsqu'un paramètre est déclaré ByVal, VB passe en fait à la fonction uniquement la valeur de celle-ci, sans faire de lien avec la variable qui peut être utilisée par la procédure d'appel. La valeur peut alors être modifiée à volonté, cela n'aura aucune répercussion sur le programme lorsque la fonction se terminera.
Par contre, lorsqu'un paramètre est déclaré ByRef, VB envoie à la fonction un pointeur sur la variable utilisée lors de l'appel. Si lors du déroulement de la fonction, cette variable est modifiée, lorsque la main sera rendu au programme, la variable conservera alors sa nouvelle valeur.
Pour vous faire une idée plus claire, voyez plutôt le code ci-dessous :

' Déclaration d'une variable globale
Public lgTest As Long

' Trois procédures, pour les trois possibilités
Public Sub TestByRef(ByRef lgTmp As Long)
lgTmp = lgTmp + 5
End Sub
Public Sub TestByVal(ByVal lgTmp As Long)
lgTmp = lgTmp + 5
End Sub
Public Sub TestDefaut(lgTmp As Long)
lgTmp = lgTmp + 5
End Sub

Public Sub Test()
' Procédure de test
lgTest = 20
MsgBox "Valeur = " & lgTest ' Affiche 20 (valeur de départ)
' Méthode ByRef
Call TestByRef(lgTest)
MsgBox "Valeur = " & lgTest ' Affiche 25 (valeur modifiée par l'appel)
' Méthode ByVal
Call TestByVal(lgTest)
MsgBox "Valeur = " & lgTest ' Affiche 25 (valeur non modifiée par l'appel)
' Methode par défaut
Call TestDefaut(lgTest)
MsgBox "Valeur = " & lgTest ' Affiche 30 (valeur modifiée par l'appel)
End Sub

Astuce Précédente - Liste des astuces - Proposer une astuce

17/04/2006 @ 19:04 - Code
Petite mise à jour avec quatre nouvelles fonctions à découvrir dans la rubrique "Code".
A+

13/03/2006 @ 19:11 - API
On commence la semaine en douceur avec 5 fonctions APIs (certaines sont des ajouts, d'autres des modifications), avec leurs exemples.
Je constate que le code de ces derniers est un peu trop large pour l'affichage en 800x600... je le note pour le rectifier d'ici la fin de la semaine. D'ailleurs, ça me fait penser que l'affichage dans d'autres résolutions (par le bloc "affichage" dans la colonne de droite) donne n'importe quoi... à regarder aussi donc.
Have a nice evening...

12/03/2006 @ 12:03 - Ménage et fonds de tiroir
Après une loooongue période de sommeil je reprend le clavier pour dépoussierer le site.
Il faut dire qu'avec le temps, il y a pas mal de chose qui ne vont plus. Des liens qui se cassent, quelques bugs qui s'entassent, et des compteurs qui s'affolent

En plus, si le site tourne en rond, de mon côté je continue malgré tout à accumuler du code. Et c'est quand même mieux si tout le monde peut en profiter.
Ca fait beaucoup de boulot tout ça et il y en a donc pour quelques jours. Voyons... ça fait une bonne trentaine de fonctions supplémentaires qui devraient arriver, quelques APIs et un petit programme pour se divertir.

Pour ce qui est de la reprise du site, c'est toujours d'actualité. On en reparlera plus tard...

~ En stock ~

. 214 fonctions API
. 12 applications
. 130 fonctions
. 39 liens dans l'annuaire
. 3 questionnaires
. 20 livres sur Visual Basic
. 1474 icônes

~ Affichage ~

800x600 - 1024x768
1152x864 - 1280x960

~ Recommander ~