• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Berichtvenster

Status
Niet open voor verdere reacties.

Marky76

Gebruiker
Lid geworden
26 okt 2002
Berichten
424
Public Sub MijnVenster2()
'Je kunt het berichtvenster ook samenstellen aan de hand van variabelen
Dim Tekst, Titel As Integer
Dim Knoppen As ..........
Tekst = "Programmeren in VBA: is dat moeilijk?"
Knoppen = vbYesNo + vbQuestion + vbDefaultButton2
Titel = "Alle begin is makkelijk"
MsgBox Tekst, Knoppen, Titel
End Sub

De variabele knoppen weet ik maar niet te declareren, krijg altijd een foutmelding.

Groeten, Mark.
 
Elimineren

Welke type variable zijn er allemaal? - Byte, Boolean, Integer, Long, Currency, Decimal, Single, Double, Date, String, Object, Variant

Wat doen deze variable: Zoek dat maar eens in de help bestanden.:cool:

Voorbeeld:
Een integer kan alleen getallen hebben met een waarde van -32.768 tot en met 32.767
Een string kan alleen maar karakters bevatten

Zoek ze maar eens op, als je er dan nog niet uit komt, dan gil nog maar eens :)
 
Public Sub MijnVenster2()
'Je kunt het berichtvenster ook samenstellen aan de hand van variabelen
Dim Tekst, Titel As Integer
Dim Knoppen As ..........
Tekst = "Programmeren in VBA: is dat moeilijk?"
Knoppen = vbYesNo + vbQuestion + vbDefaultButton2
Titel = "Alle begin is makkelijk"
MsgBox Tekst, Knoppen, Titel
End Sub

De variabele knoppen weet ik maar niet te declareren, krijg altijd een foutmelding.

Groeten, Mark.

De fout zit hem bij de declaratie van:

- Tekst: zoals het hier staat is het een Variant (niet echt fout op zich)
- Titel: titel is tekst en geen Integer: dus Dim Titel As String
- Knoppen kan je gerust als Variant houden

Samengevat:

Code:
Dim Tekst As String, Titel As String, Knoppen As Integer
Tekst = "Programmeren in VBA: is dat moeilijk?"
Knoppen = vbYesNo + vbQuestion + vbDefaultButton2
Titel = "Alle begin is makkelijk"
MsgBox Tekst, Knoppen, Titel

Wigi

P.S.: een goed boek over VBA legt zoiets uit. (no flame intended, anders krijg ik hier ook weer problemen mee.)
 
Wigi,

Nu zie ik het, dat is nu wel een domme fout van mij. Heb er heel de tijd zitten over kijken.
Maar er is ook iets dat ik al heel de tijd dan fout begrepen heb.
Dus als je met F8 de code test in het VBA scherm dat zetten hij de regel
Titel = "Alle begin is makkelijk" in het geel.

En ik had dacht ik gelezen dat de fout zich net bevindt in de regel boven de gele lijn, als je foutopsporing doet.
Daarom dacht ik dat de fout lag aan "Knoppen".

Bedankt.

Groeten, Mark

(zeg ik heb ook als mijn topics overlopen en met CTRL-F in mijn teksten gezocht of ik nergens al gehoord had van het woord tags of tag en vind het nergens terug, tenzij het onder een andere benaming is uitgelegd)
 
Wigi,

Nu zie ik het, dat is nu wel een domme fout van mij. Heb er heel de tijd zitten over kijken.
Maar er is ook iets dat ik al heel de tijd dan fout begrepen heb.
Dus als je met F8 de code test in het VBA scherm dat zetten hij de regel
Titel = "Alle begin is makkelijk" in het geel.

En ik had dacht ik gelezen dat de fout zich net bevindt in de regel boven de gele lijn, als je foutopsporing doet.
Daarom dacht ik dat de fout lag aan "Knoppen".

Bedankt.

Groeten, Mark

(zeg ik heb ook als mijn topics overlopen en met CTRL-F in mijn teksten gezocht of ik nergens al gehoord had van het woord tags of tag en vind het nergens terug, tenzij het onder een andere benaming is uitgelegd)

In orde.

Een andere veel gemaakte fout, ook in jouw oorspronkelijke code, is:

Code:
Dim Tekst, Titel As Integer

Tekst is hier nu gedeclareerd als Variant, niet als Integer. Velen denken dat dit toch als Integer kan gezien de komma. Niet waar dus.

(zeg ik heb ook als mijn topics overlopen en met CTRL-F in mijn teksten gezocht of ik nergens al gehoord had van het woord tags of tag en vind het nergens terug, tenzij het onder een andere benaming is uitgelegd)

Geen probleem, maar probeer het in het vervolg wel te doen. Diegene die de code leest zal dat veel beter vinden dan zonder tags.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan