62

nom en anglais	nom en français	détail/abrév.(anglais)	complément ou exemple
'	commentaire	.	' -------- remarque -------
' '	dans les ordres SQL pour les champs caractères	.	ex5 = "select * from ex1 where ex1= ' " & toto & " ' "
" "	double guillemets """	double quote, ""	ex5 = ex1 + "texte"
#	dièse	.	open ex5 for Append as #10
#if #end if	si …. Fin de si	.	.
&	pour les valeurs de couleurs	ampersand	ex5.backcolor = &H8000&
& _	permet de mettre la suite d'une ligne sur une autre	.	ex5="select * " & _ "from ex1"
()	en rapport avec un tableau	array	global ex5(10) as boolean
:	étiquette (VB)	label	On Error GoTo ex5…...ex5:…
:	permet de mettre plusieurs instruction sur la même ligne	.	A=B : C=2
_	souligné	.	if (IsNumeric(ex5) = true AND _
<=cvcvcxvx	plus petit ou égal	.	if (ex5(3) <=0) then..end if
apostrophe	commentaire (')	.	' ex5 de commentaire
append	joindre (ajouter)	.	open ex5 for append as #3…print #3, ex1…close #3
as	comme	.	dim nombre as long…dim const ex5 as integer=2
as String	comme caractère	.	Const ex5 As String = "contenu de ex5"
case	cas ((VB)	select case…end select	select case (valeur) ...case ex5:.. End select
chr(13)	retour chariot (13h)	CR, carriage return, pas nom,	MsgBox "Er " + Str(Err.Number) + Chr(13) + Err.Description
close	fermer un fichier	.	Open ex5 For Append As #7...Print #7, ex5 .. Close#7
const	constante	constant	public const ex5 as integer=150
debug	déboguer	.	Debug.print rst.Fields(1)
dim	dimensionner une variable	.	Dim ex5 As long
dim as	dimensionnement d'une variable	.	Dim nombre as long
Do Loop	boucle (do while)	Do while…loop	do while ex5 < 100…ex5=ex5+1…Loop
Do Loop	boucle (do until)	Do until…loop	do until ex5 >=100…ex5=ex5+1…loop
do until	faire jusqu'à (VB)	.	.
do while	bouche tant que "do while wend"	Do While ...wend	Do While not rs!EOF…rs.movenext...Wend
do while	boucle tant que (Visual Basic)	do while… loop	do while ex1 < 10…ex1=ex1+1…loop
end	fin (VB)	.	If App.PrevInstance = 1 Then End
Enum	énumération (VB)	.	private Enum ex5…ex1… ex2…End Enum
EOF	fin de fichier (VB)	End Of File	do while not EOF(1)…loop
exit	quitter (VB)	.	.
exit function	sortir de la fonction	.	private function ex5(…) …if (a>2) then Exit Function
Exit Sub	sortie de la procédure (sous-routine)	.	Private Sub ex5() ...exit sub…End Sub
for	pour -> boucle en Visual Basic	for ..to...next,	for i to ex5 …. Next i
for each	pour chaque (VB, VBA)	for each …next	for each ex1 in ex2 … next ex1
function	fonction	.	public function…. End Function
global	global	.	global ex5 as string
goto	atteindre	.	On Error Goto 0
instruction	instruction	for each, do while, do loop, set,	.
LIB	librairie	LIBrary	Declare Function GetWindow Lib "user32" ..As Long
loop	boucle	do while …loop,	do while ex < 3…ex=ex+1 …loop
msgbox	boîte de message	message box	msgbox "ex5", vbYesNo,"titre")
new	nouvelle instance d'une classe (VB)	.	set ex5 = New ex1
on Error	sur erreur	.	on error resume next
on error goto	sur une erreur aller à (étiquettes,…)	.	On Error GoTo ex5…ex5:
on goto	aller à (VB)	.	.
OPEN	ouvrir un fichier	Open…For Append As	Open ex5 For Append As #7 Print #7, ex5 Close #7
option explicit	déclaration explicite des variables	.	option explicit
optional	optionnel	.	Optionnal ByVal …
preserve	préserver	.	.
print	affichage de contenu d'une donnée	.	print ex5
REDIM	redimensionner un tableau	.	ReDim ex5(200 to 210)
ReDim Preserve	redimensionnement en gardant les données	.	ReDim Preserve ex5 (200 to 230)
REM	commentaire en VB	remark	.
select case	sélection suivant la valeur d'une variable	.	select case (ex5)…case ex1:…end select
set	mettre une variable à une valeur	.	set rs = Nothing ' (recordset)
SUB	procédure (sous-routine)	sub…, private sub txt_change(), private sub lbl_click(),	Private Sub ex5() ….End Sub
then	alors (VB)	.	if (ex5=1) then beep
underscore	continuation de la ligne (_) en VB	.	.
while	tant que (VB)	.	while not (rst.EOF) …Wend
with	avec	.	With label2 .caption="ex5"…End With