anoniem Geplaatst: 2 mei 2003 Delen Geplaatst: 2 mei 2003 Hoi Luitjes, Ik heb een simpel Class'je om alleen valuta invoer toe te laten in bepaalde textboxen. Werkt perfect, behalve wanneer ik meerdere instanties van een textbox plaats, dus met een index. Dit werkt wel: Dim Bedrag As New ValutaBoxClass Private Sub Form_Load() Set Bedrag.ValutaBox = txtBedrag End Sub Dit dus niet: Dim Bedrag As New ValutaBoxClass Private Sub Form_Load() Set Bedrag.GeldBox = txtBedrag(0) <----------- End Sub Dus verschillende textboxen (zonder index) werkt perfect, maar als ik ze dezelfde naam geef (met verschillende indexen) lukt het niet. Wie kan me helpen ? Alvast bedankt ! Rob Quote Link naar reactie
anoniem Geplaatst: 3 mei 2003 Auteur Delen Geplaatst: 3 mei 2003 Waarom staat er in de onderste "Geldbox" i.p.v. Valutabox?? En wat voor foutmelding krijg je? Of krijg je geen foutmelding zoniet wat gebeurd er dan? Groeten Wouter Quote Link naar reactie
anoniem Geplaatst: 3 mei 2003 Auteur Delen Geplaatst: 3 mei 2003 Ja, sorry dat moet gewoon ook ValutaBox zijn, omdat ik het net had veranderd, maar in mijn project heet het tegenwoordig ValutaBox. De foutmelding die ik krijg is: "Object or class does not support the set of events." de melding komt op de regel: Set Bedrag.ValutaBox = txtBedrag(0) ROB Quote Link naar reactie
anoniem Geplaatst: 3 mei 2003 Auteur Delen Geplaatst: 3 mei 2003 Kun je je class module ook posten, of in elk geval het type van ValutaBox (Currency, String, TextBox, Control, wat anders?) Quote Link naar reactie
anoniem Geplaatst: 3 mei 2003 Auteur Delen Geplaatst: 3 mei 2003 De Class-module begint met: Public WithEvents ValutaBox As TextBox Verder staan er KeyPress, LostFocus enz. events in die bij een TextBox (zonder Index) horen. Quote Link naar reactie
anoniem Geplaatst: 4 mei 2003 Auteur Delen Geplaatst: 4 mei 2003 Misschien dat je hier wat aan hebt [url]http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vamsgObjDoesNotSupportEvents.asp[/url] Quote Link naar reactie
anoniem Geplaatst: 5 mei 2003 Auteur Delen Geplaatst: 5 mei 2003 Ik heb het gelezen, maar begrijp niet helemaal wat "Client sinking" betekent. Iemand enig idee? Quote Link naar reactie
anoniem Geplaatst: 14 mei 2003 Auteur Delen Geplaatst: 14 mei 2003 Niet zeker, maar ... Set Bedrag.GeldBox = txtBedrag(0) --> Set Bedrag(0).GeldBox = txtBedrag :-? Ik neem hierbij aan dat 'GeldBox' een eigenschap is van het object Bedrag. Als je meerdere tekstboxen hebt die Bedrag heten, dan moet de index dus achter Bedrag. Wat is txtBedrag? een andere tekstbox of een variabele? Dave,.. Quote Link naar reactie
anoniem Geplaatst: 14 mei 2003 Auteur Delen Geplaatst: 14 mei 2003 OK EVEN ALLES OP EEN RIJTJE NU: (ik heb er maar een CurrencyBox van gemaakt, vergeet GeldBox en ValutaBox !!) Ik heb een classmodule die textbox-events bevat. dat ziet er zo uit: [code:1:1ce0acb567]Public WithEvents CurrencyBox As TextBox Private Sub CurrencyBox_KeyPress(KeyAscii As Integer) enz.... End Sub Private Sub CurrencyBox_GotFocus() enz... End Sub Private Sub CurrencyBox_LostFocus() enz... End Sub[/code:1:1ce0acb567] Op een form zet ik 2 textboxen, txtBedrag(0) en txtBedrag(1) In het Form_Load event zet ik dit: [code:1:1ce0acb567]Dim myClass As New CurrencyBoxClass Dim myTextBox As TextBox Private Sub Form_Load() Set myTextBox = txtBedrag(0) Set myClass.CurrencyBox = myTextBox 'Foutmelding op regel hier boven: "Object or class does not support the set of events." End Sub[/code:1:1ce0acb567] Wanneer ik dus maar 1 textbox op het form plaats (txtBedrag, zonder index), gaat het wel goed. Maar ik wil door heel mijn applicatie van deze textboxen zetten waar je een bedrag in moet typen, dus dacht ik meerdere instanties van txtBedrag te plaatsen. HOE KAN IK TOCH INDEXEN GEBRUIKEN ??? groetjes ROB Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen