Flaming 

Pues un sistema "chapucero" seria reproducir el video a pantalla completa y hacerle un screen. Si no busca un convertor a avi, que suele haber mas programas de ese estilo para el formato .avi.
Suerte! 

Gracias, me encanta este juego! 

Ya esta solucionado usando if. Muchas gracias por la ayuda! 

        Text1.Select(ze, 1)
        ze = ze + 1
        cont = (Text1.SelectedText)
        If cont = "h" Then
            Text1.Select(ze, 1)
            ze = ze + 1
            cont = (Text1.SelectedText)
            If cont = "t" Then
                Text1.Select(ze, 1)
                ze = ze + 1
                cont = (Text1.SelectedText)
                If cont = "t" Then
                    Text1.Select(ze, 1)
                    ze = ze + 1
                    cont = (Text1.SelectedText)
                    If cont = "p" Then
                        Text1.Select(ze, 1)
                        ze = ze + 1
                        cont = (Text1.SelectedText)
                        If cont = ":" Then
                            Text1.Select(ze, 1)
                            ze = ze + 1
                            cont = (Text1.SelectedText)
                            If cont = "/" Then
                                Text1.Select(ze, 1)
                                ze = ze + 1
                                cont = (Text1.SelectedText)
                                If cont = "/" Then
                                    For i = 0 To 53
                                        Text1.Select(ze, 1)
                                        ze = ze + 1
                                        temp = (Text1.SelectedText)
                                        dir = dir + temp
                                        If i = 53 Then
                                            fox.Navigate(dir)
                                            dir = ""
                                            Timer1.Enabled = False
                                            Timer3.Enabled = True
 
 
                                        End If
                                    Next
 
 
 
                                End If
                            End If
                        End If
                    End If
                End If
            End If
        End If

Muchas gracias por las respuestas, a ver si lo consigo 

Hay un rich textbox con texto, y dispersas por el texto hay URLs, lo que quiero hacer es sacar esas URLs u guardarlas en un txt.

Texto inicial:


Txt final

Estoy haciendo un bot y necesitaria saber como puedo sacar las URLs de un Richtextbox y guardarlas en un txt, en distintas lineas.
Gracias! 

Mira a ver si esto te resulta util: http://www.elguruprogramador.com.ar/articulos/conectando-a-un-servidor-mysql-desde-visual-basic.htm

Ya pero se escapan unos cuaantos, no se quizas afinando el sistema de borrado automatico, por ejemplo ,no creao que ninguno vaya a hablar de pussy, palbra que podria provocar el borrado del mensaje, etc

Ultimamente se esta viendo demasiado spam por el foro, vendría bien que se añadieran dificultades de registro a los bots.
Gracias!