Re: On Error

Article View: be.comp.programming

Article #14552

Back to be.comp.programming Previous Next

#14552

From: Bockx Danny
Date: Mon, 29 Jan 2001 06:53

45 lines
2857 bytes

Sorry.  Dit weekend heb ik de service packs van 2 tot en met 4
ge�nstalleerd, maar ik kan nog steeds niet error trappen.  Bestaat er
eventueel een patch ?  Zou het een bepaalde "dll" kunnen zijn ?  Een
"dll" dat Win2000 gebruikt en weigert aan te passen bij het installeren.

Groeten,
Danny


>Bij mij werkt dit op NT (de voorganger van Win 2000) perfect onder VB6,
>Service Pack 4.
>Welk SP heb jij ge�nstalleerd?
>
>Luc
>
>"Bockx Danny" <danny.bockx@skynet.be> wrote in message
>news:94p1ur$qon$1@news0.skynet.be...
>> Het volgende voorbeeld is in feite niets waard.  Bovendien kun je dit
>> via een combinatie van Val() en Str() ook oplossen.  Maar het
voorbeeld
>> geeft enkel de Engelse foutboodschap en onderbreekt dus het
programma.
>>
>> Option Explicit
>>
>> Sub Main()
>> On Error GoTo Fout
>> Dim lStrAntwoord As String
>> Dim lLngResult As Long
>> Dim lIntTeller As Integer
>>
>>    lLngResult = 0
>>    For lIntTeller = 1 To 3
>>      lStrAntwoord = InputBox("Geef een waarde in (" & lIntTeller &
"):", "Optellen 3 waarden")
>>      lLngResult = lLngResult + lStrAntwoord
>>      MsgBox ("Het resultaat (optelling) is : " & lLngResult)
>>    Next
>>    Exit Sub
>> Fout:
>>    MsgBox ("Sorry, er is een fout gebeurd.  Deze waarde wordt niet
meegeteld")
>>    lStrAntwoord = "0"     'ik weet het, dit hoeft niet
>>    Resume Next
>> End Sub

Technical Details

Message-ID: <95340g$6rk$1@news1.skynet.be>

Path:

arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!news.tele.dk!212.43.194.69!fr.clara.net!heighliner.fr.clara.net!skynet.be!poster!not-for-mail

References:

<94jv8q$l6p$1@news1.skynet.be> <IKzb6.263975$MA1.8557502@afrodite.telenet-ops.be> <94p1ur$qon$1@news0.skynet.be> <YRUb6.270059$MA1.8785884@afrodite.telenet-ops.be>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII
X-Google-Thread: 107324,790f91f6758b4e50
X-Google-Attributes: gid107324,public
X-Google-Thread: fcea4,790f91f6758b4e50
X-Google-Attributes: gidfcea4,public
X-Google-Thread: 110e3b,790f91f6758b4e50
X-Google-Attributes: gid110e3b,public
X-Google-Thread: 1143a7,790f91f6758b4e50
X-Google-Attributes: gid1143a7,public
X-Google-ArrivalTime: 2001-01-28 22:53:07 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!news.tele.dk!212.43.194.69!fr.clara.net!heighliner.fr.clara.net!skynet.be!poster!not-for-mail
From: "Bockx Danny" <danny.bockx@skynet.be>
Newsgroups: be.comp.programming,comp.lang.basic.visual.database,comp.lang.basic.visual.misc,nl.comp.programmeren
Subject: Re: On Error
Date: Mon, 29 Jan 2001 07:53:01 +0100
Organization: Belgacom Skynet SA/NV
Lines: 48
Message-ID: <95340g$6rk$1@news1.skynet.be>
References: <94jv8q$l6p$1@news1.skynet.be> <IKzb6.263975$MA1.8557502@afrodite.telenet-ops.be> <94p1ur$qon$1@news0.skynet.be> <YRUb6.270059$MA1.8785884@afrodite.telenet-ops.be>
Reply-To: "Bockx Danny" <danny.bockx@skynet.be>
NNTP-Posting-Host: dialup280.herentals.skynet.be
X-Trace: news1.skynet.be 980751184 7028 194.78.239.88 (29 Jan 2001 06:53:04 GMT)
X-Complaints-To: abuse@skynet.be
NNTP-Posting-Date: 29 Jan 2001 06:53:04 GMT
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.00.2919.6700
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700

Reply to Parent Message