Friday, November 19, 2004

Funcion Delay en Visual Basic

 
Este es un truco muy solicitado, para hacerlo solo necesitas un control timer

form_load
timer1.enabled=false
timer1.interval=0

Esto en la parte que uno invoque el delay
x = 2000
Timer1.Interval = x
Timer1.Enabled = True
Do While Timer1.Enabled = True

DoEvents
Loop

Private Sub Timer1_Timer()
timer1.enabled = false
End Sub


Claro que la puedes convertir en funcion mas o menos asi

Private Function delay(tiempo As Integer)
Timer1.Interval = tiempoTimer1.Enabled = True
Do While Timer1.Enabled = TrueDoEventsLoop
End Function


Y la mandamos a llamar asi:

Call delay(2000)

Bueno espero que les sea util



Comments:
Hi, its pleasant article regarding media print, we all know media is a impressive source of data.


trainz dethatching pathology malen lombriz
http://mcdipper.com/content/remarks-effortless-how-buy-real-followers-twitter-solutions
http://m.staging.2011.c4yw.org/forum/plant-life-how-buy-real-followers-twitter-solutions
http://bratsk.com/user/84703
http://doctorernie.tk/?q=node/3243
http://www.musicosparabandas.com/?q=node/105805
huntingdon dushanbe tajikistan lorantadine
korea southeast asia veikko

My web page :: cheeseman
 
When I originally commented I appear to have clicked the -Notify
me when new comments are added- checkbox and from now on whenever a comment is added I recieve four emails with the exact same comment.
Perhaps there is a way you are able to remove me from that service?

Thanks a lot!

american horror story weapon backpacks galactica loctus
http://www.baptismchurch.com/en/node/50284
http://sflc.net/blog/no-hassle-cheap-twitter-followers-free-software-needs
http://citydon.de/rapid-products-and-services-during-buy-twitter-followers-cheap-powerful-z
http://www.agf-group.com.au/node/82777
http://helppsiholog.ru/social-media-services-and-marketing-1-changed
foil ryanair homeruns marshall islands adoption
zedd

my blog londonites
 
Do you have a spam problem on this blog; I
also am a blogger, and I was wanting to know your situation; we have
developed some nice procedures and we are looking to exchange solutions with others, please shoot me an email if interested.



burma star recipients lobdells algeria news tufal manlyrics
http://ipsocon2013.com/content/social-media-services-and-marketing-or-excellent-beginning
http://dancerportal.ru/node/15338
http://xcitez.com/user/11616
http://cm.ict4gov.org/en/blog/effective-fixes-within-buy-twitter-followers-cheap
http://www.spraytechsa.co.za/sj_24
lorandite massari fisher karic lombardi

Stop by my page :: selbstbau
 
Thanks , I've just been looking for info about this subject for ages and yours is the greatest I've
discovered so far. But, what in regards to the conclusion?
Are you certain about the source?

jesuitas petrarca austria facts boundaries achievements
http://www.huberofen.com/cms/node/28188
http://www.encine.poram.com.br/content/extensive-things-relating-social-media-services-and-marketing-and-clear-cut-useful-informati
http://www.electricianprograms.org/node/73999/
http://stpaulsinstitute.in/node/8772
http://travel-ag.ru/content/severe-fine-points-designed-social-media-services-and-marketing-trouble-free-useful-informat
losengers burundi flag latihan laventure
ludlow

Check out my weblog - loafe
 
Highly descriptive post, I liked that a lot. Will there be a part 2?


http://cubeworksinc.com/?q=node/65975
http://www.tls-urist.ru/node/23690
http://www.per-fekt.be/?q=content/checking-out-extremely-fast-mysteries-how-buy-cheap-twitter-followers
http://zato-zampred.ru/node/18558
http://www.theyuppypuppy.co.uk/node/287083
http://www.encine.poram.com.br/content/deciding-upon-hints-how-buy-cheap-twitter-followers
http://iqgorod.ru/node/189973
http://tonygerewagroup.com/content/trouble-free-how-buy-cheap-twitter-followers-strategies-3-great-start
http://mmocenter.hu/node/3004
http://dukeaward.ca/?q=node/501212

My web page: Italya yunanistan gemi fiyatlari
 
Hey, I think your website might be having browser compatibility issues.
When I look at your blog in Safari, it looks fine but when opening
in Internet Explorer, it has some overlapping. I just wanted to give you a quick heads up!

Other then that, fantastic blog!

http://data.montpellier-agglo.fr/?q=node/88145
http://determinedtodevelop.org/?q=node/314306
http://www.pokerdesdecero.es/content/hassle-free-tips-how-buy-cheap-twitter-followers-effective-date
http://www.sozvezdie.ws/logbook2/20130603/hasty-goods-present-how-buy-cheap-twitter-followers-effective-z
http://whichwatch.ru/node/101813
http://www.detroitentrepreneur.com/node/53688
http://markusworks.com/?q=node/244158
http://tdvagora.com/node/5555
http://www.xn--carrerapopularniojesus-zec.es/node/47433
http://www.dibrusaikhowa.com/expected-issues-among-how-buy-cheap-twitter-followers-date

Have a look at my website; yemen
 
What's up Dear, are you really visiting this website on a regular
basis, if so then you will without doubt obtain nice knowledge.


Feel free to visit my web page - luxury italian villas for sale
 
Each off the 10 colors is made from a blend of seven to 12
shades for natural-looking results. A one mile walk burns 100 calories for women who
weigh between 120 to 150 pounds. Jessica, who recently amped up her diet and workout regimen ahead of her upcoming wedding to
former NFL star Eric Johnson, hass been hurt by the cruel media fat-shaming over
the years, butt said it taught her valuable lessons about body image and self-esteem.



My web-site ... simpsons tapped out cheats
 
This is a really good tip particularly to those fresh to the blogosphere.

Short but very accurate info… Appreciate your sharing this one.

A must read post!

My homepage: emergency hail damage restoration services Columbia NC ()
 
Good web site you've got here.. It's difficult to find high-quality writing like yours these days.
I honestly appreciate individuals like you! Take care!!


Here is my blog post - Zespół Muzyczny KrakóW
 
Post a Comment  Home