ADO vb6

Signaler
Messages postés
5
Date d'inscription
jeudi 17 mai 2012
Statut
Membre
Dernière intervention
4 juin 2012
-
Messages postés
14774
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
7 mars 2021
-
je suis actuellement en train de développer une application VBA sous excel 2007 . Mon outil communique avec une base de donnée ACCESS via l'objet ADO pour afficher les donnés nécessaires a chaque étape (passage de ID 1 à2 de tableau Access par exemple) je fais une fonction d'optimisation programmer mais lorsque je clique sur cette bouton d'optimisation les valeurs tirer par l'ADO sont remise a zéros et lorsque j'affiche le valeur suivant l'optimisation ne fonctionne pas je vous donne le programmation de bouton optimiser Dim X As Integer
Text2.Text = X
If Text2.Text = 2 Then
Check1.Value = 0
Check2.Value = 1
Check3.Value = 1
Check4.Value = 0
Check5.Value = 0
Check6.Value = 0
Label7.Caption = "Vérification du plan de fréquence -Downtilt des sources interférentes-Réduction de la puissance d'émission de la BTS"
Label5.Caption = "Interférence moyenne"
Else

Check1.Value = 0
Check2.Value = 1
Check3.Value = 0
Check4.Value = 1
Check5.Value = 1
Check6.Value = 0
Label7.Caption = "Vérification du plan de fréquence -Downtilt des sources interférentes-Réduction de la puissance d'émission de la BTS"
Label5.Caption = "Trop d'interférence"
End If
End If
End If
avec Text2.text est le contenu de case que ces valeurs sont tirer par ADO

1 réponse

Messages postés
14774
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
7 mars 2021
151
Bonjour,

VBA sous excel 2007
VB.NET et VB 2005 > Base de données > Access > ADO vb6

Je déplace donc dans VBA.

Concernant le code, lis le point 2 de ma signature.

Sinon, j'ai du mal à comprendre le problème, tu peux reformuler ?

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualVasic (onglet Références dans les propriétés du projet).
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Mon site