Article View: free.it.visual-basic
Article #781Re: animazioni
From: Cerberus
Date: Sat, 26 Mar 2005 08:58
Date: Sat, 26 Mar 2005 08:58
20 lines
1504 bytes
1504 bytes
option explicit
private sub Form_activated()
dim n,m as integer
text1.text = "Questo � il testo scorrevole di Rita"
n=0
do until n=1
for m = 1 to 200 step 1
doevents
next m
text1.text=mid(text1.text,2,len(text1.text)-1) & left(text1.text,1)
loop
end sub
"Rita" <mariano.mancuso@fastwebnet.it> ha scritto nel messaggio
news:kkB0e.19882$kC3.15022@tornado.fastwebnet.it...
> come si pu� fare a reazizzare un testo scorrevole ?
prova, non ti assicuro niente, non � stato testato.
Cerberus
Technical Details
Message-ID:
<Su91e.11496$IN.258286@twister2.libero.it>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!tiscali!newsfeed1.ip.tiscali.net!nntp.eutelia.it!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mailReferences:
<kkB0e.19882$kC3.15022@tornado.fastwebnet.it>Show Full Headers
Complete Article Headers
X-Google-Thread: f94ee,b5962712231d8aa3 X-Google-Attributes: gidf94ee,public X-Google-Language: ITALIAN,ASCII Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!tiscali!newsfeed1.ip.tiscali.net!nntp.eutelia.it!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail From: "Cerberus" <cerberus1981@hotmail.com> Newsgroups: free.it.visual-basic References: <kkB0e.19882$kC3.15022@tornado.fastwebnet.it> Subject: Re: animazioni Lines: 22 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.2180 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180 X-RFC2646: Format=Flowed; Response Message-ID: <Su91e.11496$IN.258286@twister2.libero.it> Date: Sat, 26 Mar 2005 08:58:26 GMT NNTP-Posting-Host: 151.80.1.103 X-Complaints-To: abuse@libero.it X-Trace: twister2.libero.it 1111827506 151.80.1.103 (Sat, 26 Mar 2005 09:58:26 MET) NNTP-Posting-Date: Sat, 26 Mar 2005 09:58:26 MET Organization: [Infostrada]