logo

Crowdly

Browser

Додати до Chrome

Questions Bank (1532990 total)

Aspect 1 of the marking criteria can be found in the assignment instructions.  It covers correct grammar, punctuation and writing style.  Select all of the statements below that should apply to your assignment.  Note that there is one item below that is bad practice and you shouldn't select this one.

By ticking a box below, you are indicating that you acknowledge that you should be aiming for this.

❌
✅
✅
✅
Переглянути це питання
Select all of the statements below that are correct and describe how your assignment should be.
0%
100%
100%
Переглянути це питання

Analysez le code suivant pour déterminer la valeur de la variable MaVar à la fin du traitement.

Option Explicit

Sub rollercoaster()

Dim Mavar As Byte

Dim i, j As Byte

i = 1

j = 1

Dim Mavar As Byte

Dim i, j As Byte

i = 1

j = 15

Do

    Do

        Mavar = Mavar + 1

         i = i + 1

    Loop Until i / 2 = Int(i / 2)

   

   j = j - 1

Loop Until j < 10

MsgBox Mavar

End Sub
0%
100%
0%
0%
Переглянути це питання

Quel est le problème avec cette boucle VBA ?

Dim i As Integer, j As Integer

i = 1

Do Until i > 3

    j = 1

    Do Until j > 3

        j = j + 1

    Loop

Loop

0%
0%
100%
0%
Переглянути це питання

Quel code permet de réaliser l'interface suivante ?

msgbox 5

0%
0%
0%
100%
Переглянути це питання

En analysant le code suivant, indiquez le comportement attendu de la procédure.

N.B. : Le développeur n'a pas activé l'option explicit.

Sub MaProcedure()

var3= 1589.5863

var1=CStr(var3)

Chaine=Right(var1, 2)

End Sub

0%
0%
0%
0%
Переглянути це питання

Dans le code suivant, il y a deux erreurs :

Sub Epreuves2()

Dim n As Integer, i As Integer

Dim nom As String

Dim maxnom As Double

Dim x As Single, y As Single, z As

Single

Dim m As Single, maxm As Single

maxnom=«»

maxm=0

n

= InputBox(« Donnez le nombre d’élèves »)

For

i = 1 to n

     nom = InputBox(«Donnez le nom de l’élève»)

     x = InputBox(« Donnez la note de la

première épreuve »)

     y = InputBox(« Donnez la note de la

deuxième épreuve »)

    z = InputBox(« Donnez la note de la

troisième épreuve »)

                    

m =

(x + y + z) / (3)

     If

m > maxm Then

          maxm = m

          maxnom = nom

     Next

End If

MsgBox

« L’élève » & maxnom & « a la moyenne maximale » & maxm

End

Sub

0%
67%
33%
0%
Переглянути це питання

Quelle instruction permet de déclarer un tableau dynamique en VBA ?

0%
0%
0%
0%
Переглянути це питання
Переглянути це питання

Bei der Gefährdungshaftung

100%
100%
0%
Переглянути це питання