Accueil > Forum > > > > comment passer un formulaire dans une procédure
comment passer un formulaire dans une procédure
mercredi 20 août 2008 à 18:07:12 |
comment passer un formulaire dans une procédure

firens
|
Bonjour, j'aurais voulu savoir comment passer un formulaire (Form1 par exemple) au travers d'une procédure pour pouvoir l'utiliser ensuite dans la procédure qui se situe dans une classe... J'ai tenté de déclarer dans la procédure une variable type frmForm as Form1 et en envoi Init(Form1) mais ca ne marche pas... Merci
|
|
mercredi 20 août 2008 à 18:26:15 |
Re : comment passer un formulaire dans une procédure

PCPT
|
salut, t'étais pas loin... c'est de type FORM donc dans un module : public sub InitFrm(byref oFrm as form) 'tes actions msgbox oFrm.caption end subet tu appelles par call InitFrm(Form1)ou call InitFrm(me)++ Prenez un instant pour répondre à ce sondage svp
|
|
mercredi 20 août 2008 à 18:28:33 |
Re : comment passer un formulaire dans une procédure

firens
|
Hello,
merci pour la réponse, mais il continue à me dire que le type est incompatible....
J'appelle ma classe après l'avoir instanciée de la manière suivante :
Adv.Init(Form1)
Ensuite la procédure dans ma classe est comme tu me la montré:
Public Sub Init(ByRef tmpForm As Form)
j'ai fais une erreur ????
|
|
mercredi 20 août 2008 à 18:38:01 |
Re : comment passer un formulaire dans une procédure

firens
|
Je devrais peut être préciser que l'appelle de procédure se fait en dehors de la classe....c'est peut être ça le problème ?
|
|
mercredi 20 août 2008 à 18:46:51 |
Re : comment passer un formulaire dans une procédure

PCPT
|
tu peux montrer un peu plus de code stp déclaration de la classe, déclarations dans la classe initialisation de la classe méthode Init complète nb : tu es bien en VB6, pas en VBA? Prenez un instant pour répondre à ce sondage svp
|
|
mercredi 20 août 2008 à 18:55:42 |
Re : comment passer un formulaire dans une procédure

firens
|
alors en fait voila pour mon code : Tu m'excuseras mais ça fait un moment que j'ai plus taper de vb et je dois dire que j'ai perdu un peu la main :p
dans ma procédure principale :
Set Adv = New TriPub
Adv.Init (Form1)
Dans la classe :
Option Explicit Private tmpForm2 As Form
Public Property Let Init(ByRef tmpForm As Form)
tmpForm2 = tmpForm
End Property
|
|
mercredi 20 août 2008 à 19:21:05 |
Re : comment passer un formulaire dans une procédure

PCPT
|
tu peux essayer d'être plus précis de suite qu'on ne fasse pas 50 échanges pour rien?!! VB6, CERTAIN ? Set Adv = New TriPub Adv.Init (Form1)Où EST LA DéCLARATION? CE CODE SE TROUVE Où? et l'erreur, c'est quoi le message exact, et sur quelle ligne ? ps : SET tmpForm2 = tmpForm ( donc 4 réponses attendues) pour reprendre mon exemple de départ, chez moi çà fonctionne : '----- 'Form1 '----- ' Option Explicit Private adv As New Class1
Private Sub Form_Load() adv.InitFrm Me adv.InitFrm Form1 Unload Me End Sub
Private Sub Form_Unload(Cancel As Integer) Set adv = Nothing End Sub
'------ 'Class1 '------ ' Option Explicit
Public Sub InitFrm(ByRef oFrm As Form) MsgBox oFrm.Caption End Sub
Prenez un instant pour répondre à ce sondage svp
|
|
mercredi 20 août 2008 à 19:25:02 |
Re : comment passer un formulaire dans une procédure

PCPT
|
ok j'ai vu..... (...)au travers d'une procédure(...) Public Property Let Init(ByRef tmpForm As Form) property çà veut dire procédure? tel quel, c'est Set Adv = New TriPub Adv.Init =Form1 Prenez un instant pour répondre à ce sondage svp
|
|
mercredi 20 août 2008 à 20:08:19 |
Re : comment passer un formulaire dans une procédure

firens
|
Alors pour être précis :
Option Explicit Private adv As New TriPub
Private Sub Form_Load() adv.InitFrm Me 'LE MESSAGE D'ERREUR EST ICI End Sub
Pour la classe
Option Explicit
Private tmpForm2 As Form
Public Sub InitFrm(ByRef tmpForm As Form) tmpForm2 = tmpForm End Sub
L'erreur est de type : Erreur d'exécution 13 Type incompatible
|
|
mercredi 20 août 2008 à 20:08:30 |
Re : comment passer un formulaire dans une procédure
|
Cette discussion est classée dans : formulaire, passer, form1, procédure
Répondre à ce message
Sujets en rapport avec ce message
Passer proprement d'un formulaire à l'autre [ par lmu ]
Bonjour, J'aimerai faire ceci: 1/ Ouvrir un nouveau formulaire (form2) depuis le (form1) 2/ Changer la valeur d'une variable (MyID) dans le (form2) d
appelé une procédure d'un formulaire [ par sambb59 ]
Comment fait on pour appeler une procédure dans un module en VBA ? quand je fais : Module1.enregistrer() //enregistrer() est ma procédure dans le
passer un contrôle en paramètre [ par zbooon ]
Bonjour, J'ai créé une procédure qui permet d'initialiser une combobox via la base de donnée, le probléme est que lors de l'appel de cette procédure j
communication entre formulaires VB.NET [ par el_createur ]
Salut,alors j'ai deux problèmes.Le premier, c'est que j'ouvre un formulaire form2 à partir d'un formulaire form1. Le problème c'est que je veux que le
[ACCESS]Passer de Mode Formulaire à Mode Création, mais BDD vérouillée [ par Karellou ]
Bonjour, J'ai recherché sur le forum des sujets traitant de mon pb... mais j'ai rien trouvé =( Voici mon problème : Je suis actuellement en stag
Comment connaître le formulaire ayant ouvert un formulaire? [ par Gwendal3 ]
Bonjour, J'ai un formulaire qui me sert à ajouter / modifier des valeurs, "Form1". Celui-ci peut être ouvert par différents formulaires. Ma questio
Parapétrer une procédure - ouverture de formulaires [ par toofar ]
Bonjour, Je cherche à savoir s'il était possible de paramétrer une procédure pour l'ouverture d'un formulaire... Voici mon code : [i]Public Sub Op
VB6 : Lancer une URL et passer des paramètres [ par Daghis ]
Bonjour à tous, Pourquoi [color=blue][i]Shell "explorer.exe http://localhost/Mon Site/Formulaire.php?nom=dupont"[/i][/color] me renvoie sur explorer
Accès variables d'un autre formulaire sans taper -> nomDeForm.maVar [ par mioumiounorris ]
Bonjour. J'imagine bien que cette question va en énerver plus d'un, mais je ne trouve pas la réponse. En fait je ne sais même pas si c'est possible.
Passage de string en Form ? [ par Urda ]
Bonjour ,J'écris ce message car je suis arrivé devant un problème après quelques recherche je n'arrive pas a trouver de solution.Voilà mon probleme ,
Livres en rapport
|
Derniers Blogs
ASYNC/AWAIT: COMPRENDRE COMMENT CA MARCHEASYNC/AWAIT: COMPRENDRE COMMENT CA MARCHE par fathi
Tout le monde est unanime pour dire que la programmation multi-thread et asynchrone est en train de devenir un sujet incontournable. Beaucoup de choses sont arrivées avec le framework 4 pour le code parallèle (TPL, PLinq,.) et bientôt, on va avoir l...
Cliquez pour lire la suite de l'article par fathi PAS D'INTELLITRACE SUR MON SITE WEB DANS IIS !PAS D'INTELLITRACE SUR MON SITE WEB DANS IIS ! par Etienne Margraff
J'ai récemment eu un problème pour obtenir l'intelliTrace sur un site web dans IIS. Il n'y avait pas de message d'erreur, rien dans le journal d'évènement Windows, et après 3 appels à une voyante, 2 visites chez un marabou, j'ai failli me résign...
Cliquez pour lire la suite de l'article par Etienne Margraff OFFICE 365 - SHAREPOINT ONLINE, QUELQUES LIMITATIONSOFFICE 365 - SHAREPOINT ONLINE, QUELQUES LIMITATIONS par junarnoalg
De nombreuses entreprises font le choix de SharePoint Online, service fourni au travers de l'offre de Microsoft Office 365. S'il est vrai que ce choix apporte un grand nombre d'avantages; rapidité de mise en œuvre, disponibilité, large couvertu...
Cliquez pour lire la suite de l'article par junarnoalg PRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGEPRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGE par richardc
http://www.c2idotnet.com/articles/presentation-des-api-rest-de-windows-azure-lister-les-comptes-de-storage
Désolé pour "toto", mais c2i existait avant blogs.developpeur.org et c'est mon site "officiel" ;-) ...
Cliquez pour lire la suite de l'article par richardc
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|