Re: Properties wijzigen met een sub

Article View: be.comp.programming

Article #7497

Back to be.comp.programming Previous Next

#7497

From: GEOware
Date: Thu, 05 Sep 2002 23:16

41 lines
2353 bytes

gebruik in de parameters ipv Field as String, Field as Object

dan kan je wel de properties wijzigen.  Je kan zelfs verder gaan
door TypeOf te gebruiken.

bv if typeof Field is TextBox then
         Field.backcolor = &h80000005
     end if

Geoffrey Frederickx
GEOware


"Gaise" <de_gaise@hotmail.com> wrote in message
news:6d005f7a.0209050656.233c2c88@posting.google.com...
> Hallo,
>
> Over Visual Basic 6
> met een subroutine probeer ik de eigenschappen te wijzigen van een
> object op een databar form. Daarvoor heb ik geprobeerd:
>
> Public Sub CheckChangeField(Field As String, Maxi As Integer, Min As
> Integer, Max As Integer, NotEqualto As Integer)
>
>     a = ReadInput(Field & ".Text")
>     If IsNumeric(Field & ".Text") And Not (a < Min Or a > Max Or a =
> NotEqualto) Then
>             If Field & ".Enabled" Then
>                 Field & ".Backcolor" = &H80000005
>
> 'And so on
>
> Als ik dat aanroep als:
>
> CheckChangeField DataBar.ts3_A1BoTest, 0, -25, 0, 0
> CheckChangeField DataBar.ts3_ACte01Test, 0, -25, 0, 0
> ...
>
> werkt dat niet.
>
> Wie helpt? Bedankt, gaise

Technical Details

Message-ID: <yBRd9.104985$8o4.14633@afrodite.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-08!supernews.com!newspump.sol.net!news.mailgate.org!fr.usenet-edu.net!usenet-edu.net!fr.clara.net!heighliner.fr.clara.net!proxad.net!news-hub.cableinet.net!blueyonder!btnet-peer!btnet!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

References: <6d005f7a.0209050656.233c2c88@posting.google.com>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,7fabfdb5a8a294f3
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-09-05 17:24:20 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-08!supernews.com!newspump.sol.net!news.mailgate.org!fr.usenet-edu.net!usenet-edu.net!fr.clara.net!heighliner.fr.clara.net!proxad.net!news-hub.cableinet.net!blueyonder!btnet-peer!btnet!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "GEOware" <info@geoware.be>
Newsgroups: be.comp.programming
References: <6d005f7a.0209050656.233c2c88@posting.google.com>
Subject: Re: Properties wijzigen met een sub
Lines: 43
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <yBRd9.104985$8o4.14633@afrodite.telenet-ops.be>
Date: Thu, 05 Sep 2002 23:16:46 GMT
NNTP-Posting-Host: 213.119.95.187
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1031267806 213.119.95.187 (Fri, 06 Sep 2002 01:16:46 MET DST)
NNTP-Posting-Date: Fri, 06 Sep 2002 01:16:46 MET DST
Organization: Telenet Internet

Reply to Parent Message