Question sur &

bonjour leo,

extrait de l'aide: Dim, instruction
Long, type de données
Nombre entier codé sur 4 octets et dont la valeur est comprise entre -2
147 483 648 et 2 147 483 647. Dans Visual Basic, le signe et commercial
(&) est le caractère de déclaration du type Long.


isabelle

Bonsoir,
Sur la macro de Frédéric Sigonneau, Nombre de jour ouvrés entre deux dates :
nbouvré&(d1,d2)

A quoi sert le & ?

D'avance merci,

--


Amicalement,
Leo

Dim J_aurais_Pu_Y_Penser as long

Function Merci_beaucoup ( Isabelle) as long
end function

Sub Toujours_Le_Top& (MPFE)
end sub

A+



"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
OhhS1VCJFHA.2852@TK2MSFTNGP09.phx.gbl...

bonjour leo,

extrait de l'aide: Dim, instruction
Long, type de données
Nombre entier codé sur 4 octets et dont la valeur est comprise entre -2
147 483 648 et 2 147 483 647. Dans Visual Basic, le signe et commercial
(&) est le caractère de déclaration du type Long.


isabelle

Bonsoir,
Sur la macro de Frédéric Sigonneau, Nombre de jour ouvrés entre deux
dates :

nbouvré&(d1,d2)

A quoi sert le & ?

D'avance merci,

--


Amicalement,
Leo

Bonjour,

nbouvré&(d1,d2)

A quoi sert le & ?

C'est l'ancienne façon pour désigner une variable (ou le résultat
d'une fonction, dans ce cas-ci), comme étant en virgule flottante à
double-précision, ou du type Double. Cette notation origine du BASIC
originel, ou presque, et a été maintenue pour des fins de
compatibilité.

Scusez pardon, c'est # qui désigne un nombre en double-précision.

Pour le fun, voici la liste:

Integer : %
Long : &
Single : !
Double : #
Currency : @
String : $

Les autres types n'en n'ont pas.

(En passant, je n'ai jamais testé, mais on ne pourrait pas avoir dim
variable as currency. Il faudrait avoir Dim variable, ou dim variable
as variant, puis, dans les calculs, utiliser cCur(variable)


"Clément Marcotte" <clement.marcotte@sympatico.ca> a écrit dans le
message de news:%23e4rtgCJFHA.3916@TK2MSFTNGP14.phx.gbl...

Bonjour,

nbouvré&(d1,d2)

A quoi sert le & ?

C'est l'ancienne façon pour désigner une variable (ou le résultat
d'une fonction, dans ce cas-ci), comme étant en virgule flottante à
double-précision, ou du type Double. Cette notation origine du BASIC
originel, ou presque, et a été maintenue pour des fins de
compatibilité.

Bonjour.

(En passant, je n'ai jamais testé, mais on ne pourrait pas avoir dim
variable as currency. Il faudrait avoir Dim variable, ou dim variable
as variant, puis, dans les calculs, utiliser cCur(variable)

Un petit exemple.

Private Declare Function GetDiskFreeSpaceEx& _
Lib "kernel32" Alias "GetDiskFreeSpaceExA" _
(ByVal lpRootPathName$, lpFreeBytesAvailableToCaller@, _
lpTotalNumberOfBytes@, lpTotalNumberOfFreeBytes@)

Sub Currency_Pour_Clément()
Dim TailleUtile@, TailleTotale@, TailleLibre@, Titre$, Msg$, Bouton&, I&
Titre = "dim variable As Currency"
I = 10000&
If GetDiskFreeSpaceEx("C:", TailleUtile, TailleTotale, TailleLibre) Then
Msg = "TailleUtile = " & TailleUtile * I & vbNewLine & _
"TailleTotale = " & TailleTotale * I & vbNewLine & _
"TailleLibre = " & TailleLibre * I
Bouton = vbInformation
Else
Msg = "L'opération a échouée"
Bouton = vbCritical
End If
MsgBox Msg, Bouton, Titre
End Sub

Alain CROS