معادل تابع delay سی در وی بی

[mrpn]

معادل تابع زیر که در زبان سی است را در ویژوال بیسیک میخواهم
delay(10)
یه چیزی مثل wait
حلقه فور تو خالی هم گزاشته ام ولی نشد
میخواهم در برنامه ام یک وقفه چند ثانیه ای داشته باشم
برنامه من این است میخواهم مقدار یک تکست را به صورت وقفه ای در یک لیبل چاپ کنم
مثلآ اسم محمد ابتدا م بعد ح بعد مو..
پیشاپیش از راهنمایتان ممنون

[Iron_Fist]

توابع تايمر
تابع اسليپ

[mrpn]

توابع تايمر
تابع اسليپ

با تشکر
یک تابع که وقفه ایجاد کنه توابع تایمر را دارم ولی چنین چیزی در آنها ندیده ام

[Iron_Fist]

توابع تايمر
تابع اسليپ

با تشکر
یک تابع که وقفه ایجاد کنه توابع تایمر را دارم ولی چنین چیزی در آنها ندیده ام

اسليپ چي

کد:

Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
Public Declare Function SleepEx Lib "kernel32" Alias "SleepEx" (ByVal dwMilliseconds As Long, ByVal bAlertable As Long) As Long

[mrpn]

اسليپ چي

کد:

Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
Public Declare Function SleepEx Lib "kernel32" Alias "SleepEx" (ByVal dwMilliseconds As Long, ByVal bAlertable As Long) As Long

[/quote]

دستت درد نکنه ولی کارم نشد یه نگاه به کد زیر بنداز بهد از صد میلی ثانیه عبارت داخل تکست یکجا در لیبل قرار میگیره ولی من میخواهم تک تک حروف با صد میلی ثانیه وقفه داخل لیبل باشه
For i = 1 To 10
Sleep (100)
Label1.Caption = Left(Text1.Text, i)
Next

[Iron_Fist]

بيا حتما با اين كدي كه نوشتم مشكلت حله
http://h1.ripway.com/KP/Hal_Kon.zip

[Iron_Fist]

اگه از سورس خوشت نيومد يه راه ديگه هم ياديم اومد
مي توني بعد از هر دستور اسليپ بنويسي

کد:

Me.Refresh

[mrpn]

بيا حتما با اين كدي كه نوشتم مشكلت حله
http://h1.ripway.com/KP/Hal_Kon.zip

ای ول خیلی عالی بود امان از بی سوادی میدونستما ولی نک زبونم بود
30مر

[Iron_Fist]

قابل شما رو نداشت
اون

کد:

Me.Refresh

رو هم امتحان كن

[mrpn]

مهر هزار آفرینم کمه من دنبال یه چیزی مثل دومی بودم آفرین با با حال کردم

[Iron_Fist]

مهر هزار آفرینم کمه من دنبال یه چیزی مثل دومی بودم آفرین با با حال کردم

قابل نداشت