Pour apprendre ses verbes irrèguliers d'anglais
Soyez le premier à donner votre avis sur cette source.
Vue 4 999 fois - Téléchargée 308 fois
Description
Un prg en vb 6
A mettre dans le dossier demarrage, ou avec les taches planifiées.
Tant que l'enfant n'a pas répondu aux 10 questions le bouton quitter n'est pas accessible.
On peut malgrès tout s'échapper en tapant le code "exit" dans la zone prévu à cet effet.
(mais comment empecher de faire ctrl alt sup et fin de tache ?)
Il y a 75 verbes irréguliers enregistrés, si on en rajoute, il faut modifier la valeur de la constante.
Je n'ai pas mis les verbes dans un fichier externe pour que l'on puisse cacher l'executable un peu n'importe ou et je n'arrive pas à charger un fichier externe automatiquement.
Il faudra également rajouter un peu de code pour qu'il n'y ait pas plusieurs fois le meme verbe.
A mettre dans le dossier demarrage, ou avec les taches planifiées.
Tant que l'enfant n'a pas répondu aux 10 questions le bouton quitter n'est pas accessible.
On peut malgrès tout s'échapper en tapant le code "exit" dans la zone prévu à cet effet.
(mais comment empecher de faire ctrl alt sup et fin de tache ?)
Il y a 75 verbes irréguliers enregistrés, si on en rajoute, il faut modifier la valeur de la constante.
Je n'ai pas mis les verbes dans un fichier externe pour que l'on puisse cacher l'executable un peu n'importe ou et je n'arrive pas à charger un fichier externe automatiquement.
Il faudra également rajouter un peu de code pour qu'il n'y ait pas plusieurs fois le meme verbe.
Codes Sources
A voir également
- Quizz verbe irrégulier anglais
- Apprendre ses verbes irréguliers en anglais - Meilleures réponses
- Call verbe irrégulier - Meilleures réponses
- Verbes irréguliers d'anglais de "obiouane" - Codes sources - Visual Basic / VB.NET (API)
- C# / .NET : Quizz verbes irreguliers d'anglais - CodeS SourceS - Guide
- Exercices sur les verbes irréguliers en anglais - Guide
- Visual Basic / VB.NET : Verbes irréguliers anglais - CodeS SourceS - Guide
- Javascript : Irregular verbs test (les verbes irréguliers(anglais)) - CodeS SourceS - Guide
23 oct. 2003 à 12:30
14 mai 2003 à 00:06
J'ai essayé de rajouter quelques trucs dont la sauvegarde dans un fichiers. Et aussi pour pas avoir deux fois le même verbe. Super, je vais m'en servir.
Je met la 2ème version sur mon compte. Si tu veux y jeter un coup d'oeil.
Julien
- Messages postés
-
908
- Date d'inscription
- jeudi 26 juillet 2001
- Statut
- Modérateur
- Dernière intervention
- 1 février 2015
25 avril 2003 à 22:21
Pas un mauvais programme sinon...
5 avril 2003 à 20:01
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Const SPI_SCREENSAVERRUNNING = 97
Private Sub Form_Unload(Cancel As Integer)
Call BoutonActiveCTRLALTSUPPR_Click
' Là c'est pour que CTRL+ALT+SUPPR soit réactivé quand vous quittez
End Sub
Private Sub BoutonDesactiveCTRLALTSUPPR_Click()
Dim Retour As Long
Dim a As Boolean
Retour = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, a, 0)
End Sub
Private Sub BoutonActiveCTRLALTSUPPR_Click()
Dim Retour As Long
Dim a As Boolean
Retour = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, a, 0)
End Sub
'Et pour charger un fichier externe automatikement :
Dim TaVariable As String
Open App.Path & "TonFichierDeVIs.txt" For Input As #1 'App.Path = le chemin de ton prog
Line Input #1, TaVariable
Close #1
txt_liste_verbes.Text = TaVariable
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.