High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Accueil
Forum Codes-Sources
Visual Basic
Visual Basic 6
Synthaxe ?
Signaler
cs_kamalou
Messages postés
17
Date d'inscription
vendredi 11 avril 2003
Statut
Membre
Dernière intervention
17 mars 2015
-
7 avril 2009 à 13:14
Renfield
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
8 avril 2009 à 06:10
bonjour à!
qui peu m'expliquer ce que signifie cette ligne
If lBitMask And lWrk Then iResult = iResult + clBase1LwB
sachant que lBitMask est un long ainsi que lWrk
je voudrais aussi savoir se que vaut &H80000000 and decimal
merci d'avance
Afficher la suite
A voir également:
Synthaxe
Synthaxique
- Meilleures réponses
Visual Basic / VB.NET : Coloriage synthaxique d'un code vb - CodeS SourceS
- Guide
PHP : [expreg] coloration synthaxique (x)html - CodeS SourceS
- Guide
Erreur synthaxe insert into
✓
-
Forum - PHP
Erreur de synthaxe fonction RegExp ?
✓
-
Forum - Javascript / DHTML
Creation de requete dynamique : Synthaxe
✓
-
Forum - C# / .NET
4
réponses
Réponse 1 / 4
lesdis
Messages postés
403
Date d'inscription
mercredi 19 avril 2006
Statut
Membre
Dernière intervention
7 août 2020
1
7 avril 2009 à 14:17
Re Bonjour,
Pas la peine de faire de double post. J'ai répondu sur celui-ci :
http://www.vbfrance.com/forum/sujet-COMPARAISON-VALEUR_1293696.aspx#1
Bonne Prog
Réponse 2 / 4
Renfield
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
68
7 avril 2009 à 14:22
&h800000000 vaut 2147483648
mais ca n'a pas un grand interet de la savoir.
le And permet de faire un ET logique. de faire un masque au niveau des bits.
en binaire, ton hexa vaut:
10000000000000000000000000000000
et ca c'est interessant (sisi)
en gros, le test va permettre d'extraire le bit qui là est à un de la valeur de lWrk.
avec de petites valeurs, pour exemple, on peut avoir :
lBitMask = &hC0 soit (1100 0000) en binaire.
si lWrk = &hEE, on aura
11000000 AND 11101110 => 1100000
donc different de 0, ton test est vrai
si lWrk = &h30, on aura
11000000 AND 00110000 => 0000000
donc 0, ton test est faux
Réponse 3 / 4
cs_kamalou
Messages postés
17
Date d'inscription
vendredi 11 avril 2003
Statut
Membre
Dernière intervention
17 mars 2015
8 avril 2009 à 00:12
merci renfield pour ton explication elle est tres clair.
cependant, en quoi le mask peut il m'aider.
cordialement
Réponse 4 / 4
Renfield
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
68
8 avril 2009 à 06:10
on s'en sert souvent pour combiner plusieurs valeur boolean
par exemple, on pourrais stocker un combinaison pour savoir si notre texte est
- gras
- souligne
- italique
- barré
on pourrais considérer:
Private Const txtBold = 1&
Private Const txtUnderline = 2&
Private Const txtItalic = 4&
Private Const txtStroke = 8&
et faire:
Dim eStyle as Long
eStyle = txtUndeline Or txtItalic
Donc, pour combiner, on utilise 'Or'.
et pour extraire, on l'a vu :
If (eStyle And txtBold)=txtBold Then
Text1.Font.Bold = True
Else
Text1.Font.Bold = False
End If
If (eStyle And txtUnderline)=txtUnderline Then
Text1.Font.Underline = True
Else
Text1.Font.Underline = False
End If
...
Votre réponse
Répondre
Posez votre question
A voir également
Erreur de synthaxe de l'instruction Update Access 2008
Erreur de synthaxe 3075 : opérateur absent
Petit problème de synthaxe avec requête UPDATE basée sur deux tables
Petit problème de synthaxe sur requête UPDATE
Questions synthaxe SQL