PDA

View Full Version : سوال: درصد convert شدن یک فایل



azbddk
پنج شنبه 09 خرداد 1392, 14:09 عصر
چگونه می تونم درصد convert شدن فایل رو باProgressBar نشون بدم؟

h_a_m_i_d
پنج شنبه 09 خرداد 1392, 16:25 عصر
convert با چی
convert چی
برادر من یک اطلاعی میذاشتی
سورسی کدی D:
ProgressBar دارای یک خصوصیت هست به نام value که میتونی تغییرش بدی
البته maximum و minimum هم دارد که به ترتیب بالاترین و پاینترین مقداری هست که میشه استفاده کرد

azbddk
جمعه 10 خرداد 1392, 11:07 صبح
اینم سورس
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Dim type As String = ComboBox3.Text
If ComboBox3.Text = "" Then
MsgBox("No file type selected")
Else
End If
MsgBox("Do you want" + TextBox3.Text + "converted into a " + type + "file.")
If ComboBox3.Text = "MPEG" Then
Dim Y As String = Mid(TextBox3.Text, 1, Len(TextBox3.Text) - 5)
Dim S As String = IO.Path.GetFileName(Y)
My.Computer.FileSystem.CopyFile(TextBox3.Text, TextBox4.Text + "\" + S + "." + type)
Else
Dim oldFile As String = Mid(TextBox3.Text, 1, Len(TextBox3.Text) - 4)
Dim b As String = IO.Path.GetFileName(oldFile)
My.Computer.FileSystem.CopyFile(TextBox3.Text, TextBox4.Text + "\" + b + "." + type)
End If
End Sub
می خوام درصد convert شدن فایل رو توProgressBar نشون بدم