Make a Video Converter
Make a Video Converter
This is ONLY codes + a video at the end.
CREDITS:
Nicho1995W
Button 1 (The open file button)
Button2 (The convert button)
OpenFileDialog1:
Video:
CREDITS:
Nicho1995W
Button 1 (The open file button)
Code:
OpenFileDialog1.showdialog()
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)
Code:
Dim file As String = OpenFileDialog1.FileName
TextBox1.Text = file
I want this 
Arnt video converters a LOT more complicated? I dont think changing the File Ext will work. Also, grats on VB minion
Originally Posted by Iamazn1
Arnt video converters a LOT more complicated? I dont think changing the File Ext will work. Also, grats on VB minion
Not to sound rude, but.....Anyone who believes this actually converts a video is on crack...
All it does is change the file extension which windows uses to show a different icon. Most players support multiple formats to begin with and parse it based on the file contents and not the file extension so it may 'appear' to work, but this code does absolutely nothing useful.
All it does is change the file extension which windows uses to show a different icon. Most players support multiple formats to begin with and parse it based on the file contents and not the file extension so it may 'appear' to work, but this code does absolutely nothing useful.
Originally Posted by B1ackAnge1
Not to sound rude, but.....Anyone who believes this actually converts a video is on crack...
All it does is change the file extension which windows uses to show a different icon. Most players support multiple formats to begin with and parse it based on the file contents and not the file extension so it may 'appear' to work, but this code does absolutely nothing useful.
All it does is change the file extension which windows uses to show a different icon. Most players support multiple formats to begin with and parse it based on the file contents and not the file extension so it may 'appear' to work, but this code does absolutely nothing useful.
Originally Posted by Pixie
This is ONLY codes + a video at the end.
Button 1 (The open file button)
Button2 (The convert button)
OpenFileDialog1:
Video:
Button 1 (The open file button)
Code:
OpenFileDialog1.showdialog()
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)
Code:
Dim file As String = OpenFileDialog1.FileName
TextBox1.Text = file
u shud give creits to the video maker
Are you serious? (not to sound condescending)
yes he is seroius lol
offtopic: everyone chillz
Ontopic: thank you for posting this, may come in handy later, also its possible i could edit the code O.o
Offtopic again: I knew pixiecorp would win ^.^ never had a chance to say that
Ontopic: thank you for posting this, may come in handy later, also its possible i could edit the code O.o
Offtopic again: I knew pixiecorp would win ^.^ never had a chance to say that
Not to be rude, but how the f*ck did you get mignion? o__O
Originally Posted by Hell_Demon
Not to be rude, but how the f*ck did you get mignion? o__O
Originally Posted by stevethehacker
not to be rude but your an asshole
Originally Posted by Hell_Demon
Thanks, but if you're unable to see that this is NOT a video converter you must have a mental handicap...
It's a rule.
And this is just something I found on youtube, so
upThis thread is closed for replies.
