PDA

View Full Version : مبتدی: راهنمایی در نوشتن پروژه vb.net 2010



caspianhero
شنبه 09 اردیبهشت 1391, 09:25 صبح
با سلام بر دوستان برنامه نویس:
من میخوام سیستم مدیریت کتابخانه را به زبان vb.net بنویسم:لطفا طول انجام پروژه من را راهنمایی کنید!!!!
اولین سئوال من این هست که چطور می توانم یک ProgressBar1 در فرم بگذارم!!! ایا کد نویسی در این محیط مثل vb6 هست!!!!
ایا این کد درون vb.net اجرا می شود!!! برای من که اجرا نشد!!!
ایا تنظیمات خاصی دارد!!؟؟؟ لطفا راهنمایی کنید؟؟؟
Private Sub Timer1_Timer()
For i = 1 To 1000000
ProgressBar1.Value = i
If ProgressBar1.Value = 1000000 Then
asli.Show
Unload Me
End If
Next i
End Sub

سپاس

xxnagin
شنبه 09 اردیبهشت 1391, 10:17 صبح
چطور می توانم یک در فرم ProgressBar (http://barnamenevis.org/showthread.php?322974-آموزش-کنترل-های-پر-کاربرد-بسته-ی-DevComponents&p=1439911&viewfull=1#post1439911)بگذارم






ProgressBar عین vb6 هستش از toolbox استفاده کن
و یا از کامپوننت های dotnet مه فرمت رو زیبا میکنن
که اقای vbboos دارن اموزشش رو هم تو اول پست گذاشتن که یکیش dotnetbar یا DevComponents
http://barnamenevis.org/showthread.php?322974-آموزش-کنترل-های-پر-کاربرد-بسته-ی-DevComponents



Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
For i As Integer = 0 To 100
ProgressBar1.Value = i
If ProgressBar1.Value = 100 Then
Me.Hide()
Form2.Show()
Timer1.Enabled = False
End If
Next i
End Sub

caspianhero
شنبه 09 اردیبهشت 1391, 22:33 عصر
این کدی را که دادید توی timer گذاشتم ولی نمیدانم که چرا اجرا نشد!!؟؟؟:متعجب:

xxnagin
شنبه 09 اردیبهشت 1391, 22:48 عصر
اون کد خوتون هستش
شما میتونی از این هم استفاده بکنی
در ضمن تایمر در حالت عادی غیر فعال هستش که شما میگین کار نمیکنه > Timer1.Enabled = False
Enabled تایمرت رو فعال کن داخل پروپرتی Enabled = False
یا interval برابر 1000 بذار یا ProgressBar maximum رو زیاد کن که اینجا 100 هستش

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

ProgressBar1.Value += 5
If ProgressBar1.Value = 100 Then
Me.Hide()
Form2.Show()
Timer1.Enabled = False
End If

End Sub