[vb6] Option Explicit doet rare dingen...

[Verwijderd]

Of doe ik iets fout? Dat laatste zal het wel zijn. Ik gebruik dus Option Explicit, en sindsdien doet ie dit nier meer:

code:

With MSWord_Document.content.find   ' Eigenschappen instellen
            If (InitRepl = 0) Then     ' Is dit al een keer eerder gedaan?
              .Clearformatting   ' Zo niet: even nog extra instellen
              .forward = True
              .Wrap = wdFindContinue
              .Format = False
              .MatchCase = False
              .MatchWholeword = False
              .MatchWildcards = False
              .MatchSoundsLike = False
              .MatchAllwordForms = False
            End If
            .Text = mmf    ' Tekst die gevonden moet worden
            .Replacement.Text = rt  ' Tekst waarmee het gevonden moet worden vervangen
            .execute Replace:=True  ' Uitvoeren!
            
            If .Found = True Then   ' Gevonden? Opnieuw!
              gevonden = True
            Else              ' Niet gevonden? Einde loop!
              gevonden = False
            End If
        End With

Hij geeft bij .Wrap WdFindContinue een foutmelding dat de variabele niet gedeclareerd is Iemand?

[mulder]

Waarschijnlijk weet ie niet wat wdFindContinue is. Verander die maar eens in het corresponderende cijfer.

[Verwijderd]

Dim WdFindContinue

[mulder]

Op vrijdag 04 januari 2002 16:24 schreef dev het volgende:
Dim WdFindContinue

Sorry, maar dat is pure onzin.

[Verwijderd]

Op vrijdag 04 januari 2002 16:22 schreef CyberKnutselaar het volgende:
Hij geeft bij .Wrap WdFindContinue een foutmelding dat de variabele niet gedeclareerd is Iemand?

Als je option explicit uit hebt staan kan ie WdFindContinue ook niet vinden en evalueerd ie het naar 'n nieuwe variant met de waarde 0.

[Verwijderd]

Op vrijdag 04 januari 2002 16:24 schreef El_Mundo het volgende:
Waarschijnlijk weet ie niet wat wdFindContinue is. Verander die maar eens in het corresponderende cijfer.

Dat werkt inderdaad wel... is wel lastiger maargoed. Ik maak er wel een leuke

code:

const wdFindContinue = 2

van, als dat werkt. En anders hou ik het wel gewoon op 2

[mulder]

Heb je die wdFindContinue zelf gedefinieert? Zijn er meerdere wdFinds? Dan kun je een Enum maken. Kijk maar eens in MSDN.

[Verwijderd]

Op vrijdag 04 januari 2002 16:25 schreef El_Mundo het volgende:

[..]

Sorry, maar dat is pure onzin.

Hoezo is dat onzin?

1. Hij stelt die variable ergens anders in, maar heeft m niet gedeclareerd.

2. Als ie m verder niet gebruikt dan wordt ie gewoon 0, en dat werkt dan ook blijkbaar.

[mulder]

1. Het is geen variable.

2. Het werkt? Ik lees hierboven dat wdFindContinue 2 moet zijn.

Enumerations provide a convenient way to work with sets of related constants and to associate constant values with names. For example, you can declare an enumeration for a set of integer constants associated with the days of the week, then use the names of the days in code rather than their integer values.

Volgens mij hebben we het hier over.

[Crazy D]

Reference gezet naar Word 2000 (Word 9) object library...:
1. wdFindContinue kent mijn VB daarna gewoon
2. volgens de debug windows is de waarde wdFindContinue 1
3. option explicit had je al veel eerder moeten gebruiken

[Verwijderd]

Op vrijdag 04 januari 2002 23:36 schreef El_Mundo het volgende:
1. Het is geen variable.

Ok, constant dan, maar als ie m niet aangegeven heeft en t werkte eerst ook, dan doet 0 het ook blijkbaar.

[mulder]

Op zaterdag 05 januari 2002 14:25 schreef Crazy_D het volgende:
3. option explicit had je al veel eerder moeten gebruiken

Tools > Options > Edit tab > Require Variable Declaration