IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Quiz n°6

Question 1

En VBA, le mot clé Err désigne :

Une propriété de l'objet Application
Un évènement
Une fonction

Question 2

Dans l'éditeur VBE, quel raccourci permet d'afficher l'explorateur d'objet ?

F11
F2
F4
ALT+F2
ALT+F4

Question 3

En VBA que renvoie l'appel de CBool(2) ?

Vrai
Faux
Une erreur est levée.

Question 4

En VBA, le paramètre DataErr de l'évènement OnError d'un formulaire est :

Un objet correspondant à l'erreur
Le numéro de l'erreur
Le descriptif de l'erreur

Question 5

Soit le code suivant :

Dim disque As String
Dim repertoire As String
Dim fichier As String
Dim extension As String


WizHook.SplitPath "d:\test\test.mdb", disque, repertoire, fichier, extension
MsgBox repertoire
Que contient la variable repertoire à son affichage ?

test
\test
\test\
Une chaîne vide

Question 6

La propriété WizHook de l'objet Application propose une liste de fonctions non documentées parfois utiles. Mais pour qu'elle fonctionne correctement, il faut avant tout appel définir :

WizHook.Key = 0
WizHook.Key = 65535
WizHook.Key = 51488399

Question 7

Quel est le comportement de la méthode Debug.Assert dans le cadre d'un fichier mde ?

Une erreur est levée
L'appel est omis
Exactement le même que dans un fichier mdb

Question 8

Dans une base de données contenant la table locale tblClient, quelle sera la valeur affichée à l'issue de ce code si la table contient 10 enregistrements ?

Dim oRst As DAO.Recordset
Set oRst = CurrentDb.OpenRecordset("tblClient")

MsgBox oRst.RecordCount

0
1
10

Question 9

Dans une base de données contenant la table attachée tblClient, quelle sera la valeur affichée à l'issue de ce code si la table contient 10 enregistrements ?

Dim oRst As DAO.Recordset
Set oRst = CurrentDb.OpenRecordset("tblClient")

MsgBox oRst.RecordCount

0
1
10

Question 10

Dans une base de données contenant la table locale tblClient, que va provoquer l'exécution du code suivant ?

Dim oRst As DAO.Recordset
Set oRst = CurrentDb.OpenRecordset("tblClient")

oRst.FindFirst("idclient=2")

Le Recordset va avancer de deux enregistrements
Le Recordset va se positionner sur l'enregistrement ayant l'idclient égal à 2
Une erreur de compilation est levée
Une erreur d'exécution est levée

Question 11

En VBA, la fonction racine carrée est :

Sqr()
Sqrt()
Square()
La fonction n'existe pas et il faut élever le nombre à la puissance 0.5

Question 12

Quelle est le prototype de la fonction TimeSerial, équivalent de DateSerial mais pour les horaires ?

TimeSerial(Hour,Minute,Second)
TimeSerial(Second,Minute,Hour)
TimeSerial(Second)
Cette fonction n'existe pas

Question 13

La syntaxe SQL suivante :

SELECT TOP 10 , 2 * FROM Matable

Retourne deux enregistrements à partir du dixième
Retourne dix enregistrements à partir du deuxième
Retourne le deuxième et le dixième enregistrements
Retourne les enregistrements du deuxième au dixième
Est incorrecte

Question 14

En VBA, la ligne suivante :

#Const conDebug = 1
définit

Une constante de type Integer
Une constante mise en commentaire
Une constante de compilation conditionnelle

Question 15

Que va afficher la procédure suivante ?

Sub Quiz()
Dim n
n = 0 = 1
MsgBox n
End Sub

Vrai
Faux
Rien
Une erreur de compilation est levée
Une erreur d'exécution est levée

Question 16

Dans la procédure suivante, combien de messages vont être affichés ?

Sub Quiz()
Dim i As Integer
For i = 1 To 1.5
MsgBox i
Next i
End Sub

Un
Deux
Une erreur de compilation est levée
Une erreur d'exécution est levée

Question 17

Quel est le sens de la déclaration suivante ?

Dim i$

Cette déclaration n'est pas valide
La variable i$ est une donnée de type Variant
La variable i est une donnée de type String

Question 18

Quelle est le volume de mémoire occupé par un paramètre de type Boolean passé par référence à une procédure ?

Sub Essai(ByRef MonBool As Boolean)

1 octet
2 octets
4 octets
16 octets

Question 19

Une requête SQL possédant une clause GROUP BY limite l'affichage des champs mémo à :

64 caractères
255 caractères
Les champs mémos ne sont pas compatibles
Les champs mémos ne sont pas tronqués

Question 20

Quand deux tables sont mises en relations et que l'intégrité référentielle est appliquée, il est possible d'affecter une valeur nulle à une clé étrangère ?

Oui
Non



Copyright © 2007 www.developpez.com Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.