Buat Video Converting sendiri dgn VB 2010

halo gan,pada kesempatan ini,di forum cmonhackns ane akan ngeposting tutorial membuat Video Converting di Visual Basic 2010

Komponen yg dibutuhkan di VB 2010 :

1) 1 OpenFileDialog
2) 2 Button
3) 1 TextBox
4) 1 ComboBox
==========

sekarang tutornya :

1) Letakkan komponen diatas seperti gambar berikut :
[You must be registered and logged in to see this image.]

2) Klik 1 kali pada komponen ComBox1 dan lihat pada Properties(kotak pojok bawah kanan),dan cari tabel Items,dan kemudian isi dgn text berikut :

Code:

.mp4
.avi
.m4v
.mp3
.flv

lihat gambar dibawah :
[You must be registered and logged in to see this image.]

3) Klik 2 kali pada Button1 yg tulisannya telah kita ganti menjadi Open File,dan masukkan scripts berikut :

Code:

OpenFileDialog1.ShowDialog()

4) Klik 2 kali pada Button2 yg tulisannya telah kita ganti menjadi Convert,dan masukkan scripts berikut :

Code:

Dim type As String = ComboBox1.Text
        If ComboBox1.Text = "" Then
            MsgBox("No file type selected")
        Else
        End If
        MsgBox(TextBox1.Text + " shall be converted into a " + type + " file.")
        Dim oldFile As String = Mid(TextBox1.Text, 1, Len(TextBox1.Text) - 4)
        FileCopy(TextBox1.Text, oldFile + type)

inilah scripts yg paling penting

5) Dan Pada bagian bawah Form,klik 2 kali pada komponen OpenFileDialog1 dan masukkan scripts sebagai berikut :

Code:

Dim file As String = OpenFileDialog1.FileName
        TextBox1.Text = file

6) Dan sekarang tinggal kita compilasi(coba) dgn klik Run(tombol panah hijau diatas) atau tekan tombol F5..dan pilih open file,pada combobox pilih format yg akan dipilih,kemudian convert...

semoga berhasil...

gan,dah capek2 nulisnya

Wah Work 100% Gan...

Thanks Bgt,...

Ane Soalnya Pengen bgt Jadi Progammer


Maaf Nih Blm Bisa Ngasih Cendol/..

wah.. ane lg belajar VB 2010 di kampus...
tq ya gan, semoga ini bermanfaat buat ane dan yg laennya

minta link VB 2010 nya donk !

please !