L2 Programmation VBA
Шукаєте відповіді та рішення тестів для L2 Programmation VBA? Перегляньте нашу велику колекцію перевірених відповідей для L2 Programmation VBA в moodle.unistra.fr.
Отримайте миттєвий доступ до точних відповідей та детальних пояснень для питань вашого курсу. Наша платформа, створена спільнотою, допомагає студентам досягати успіху!
Quelle est la bonne syntaxe de cette boîte de dialogue ? (Rep correspond à la variable)
Quelle est la bonne syntaxe de cette boîte de dialogue ? (Rep correspond à la variable)
Quelle syntaxe correspond à cette boîte de dialogue ?
A la lecture du code suivant, quelle sera la valeur de la variable Mention ?
MaNote=12
If MaNote >=0 Or MaNote <=20 Then
If MaNote < 10 then
Mention = « Ajourné »
ElseIf MaNote >=10 Then
Mention= « Reçu »
EndIf
EndIf
Quelle syntaxe correspond à cette boîte de dialogue ?
Quelle est la bonne syntaxe de cette boîte de dialogue ? (Rep correspond à la variable)
Quelle syntaxe correspond à cette boite de dialogue ?
Quelle est la bonne syntaxe de cette boîte de dialogue ? (Rep correspond à la variable)
On a besoin de vérifier que la note d’un test sera entre 0 et 100. Si l’utilisateur saisit une valeur en dehors de cet intervalle (on utilise la variable Score), on va redemander la saisie jusqu’à ce qu’elle soit correcte. Quelle est la commande qu’on va utiliser ?
La procédure Kiplante() a pour objectif d’enregistrer les meilleurs temps d’un athlète dans une feuille Excel. On veut obtenir le nom du coureur et son meilleur temps dans une même ligne. On suppose que la valeur saisie pour la variable Chrono est toujours strictement supérieur à 0. Le code ne fonctionne pas comme désiré. Pourquoi ?
Option Explicit
Sub Kiplante()
Dim NbTours, i as Integer
Dim Chrono, ChronoEnreg as Long
Dim Coureur as String
ChronoEnreg = 60000
Coureur = Inputbox(« Quel est le nom de l’athlète ? »)
Coureur = Cells(« A1 »)
NbTours = Inputbox (« Combien de tours de pistes ? »)
For i=1 to NbTours
Chrono = Inputbox (« Quel temps pour le tour n° » & i)
If Chrono < ChronoEnreg Then
Chrono = Cells(« A2 »)
NbTours = Cells(« A3 »)
ChronoEnreg = Chrono
End if
Next i
End Sub
Хочете миттєвий доступ до всіх перевірених відповідей на moodle.unistra.fr?
Отримайте необмежений доступ до відповідей на екзаменаційні питання - встановіть розширення Crowdly зараз!