LinkClicked mehrere Contains filtern

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von hpunit.

    LinkClicked mehrere Contains filtern

    Moin, ich hätte da gerne noch den Contain "youtu.be" hinzugefügt nur weiß ich nicht wie.
    Mit "Or, And, & und komma" hab ichs schon probiert, geht leider nicht.. erbitte um hilfestellung.

    VB.NET-Quellcode

    1. Private Sub outputbox_LinkClicked(ByVal sender As Object, ByVal e As System.Windows.Forms.LinkClickedEventArgs) Handles output.LinkClicked
    2. If e.LinkText.Contains("youtube.com/watch?v=") Then
    3. youtubeform.Show()
    4. youtubecache.Text = e.LinkText
    5. youtubecache.Text = e.LinkText.Replace("watch?v=", "v/")
    6. youtubeform.AxShockwaveFlash1.Movie = youtubecache.Text & "?&autoplay=1"
    7. Else
    8. Process.Start(e.LinkText)
    9. End If
    10. End Sub


    Ps.: Der Codeschnippsel ist dafür gedacht, in einem Chat alle Links mit dem Inhalt: "youtube.com/watch?v=" und "youtu.be" in einer extra Form zu öffnen, alles
    andere öffnet sich im Firefox Browser.

    Erledigt.

    So, nach rumprobieren und Threads/Google durchsuchen, doch noch zu einem Resultat gekommen.

    VB.NET-Quellcode

    1. Private Sub outputbox_LinkClicked(ByVal sender As Object, ByVal e As System.Windows.Forms.LinkClickedEventArgs) Handles output.LinkClicked
    2. If e.LinkText.Contains("youtube.com/watch?v=") Then
    3. youtubeform.Show()
    4. youtubecache.Text = e.LinkText
    5. youtubecache.Text = e.LinkText.Replace("watch?v=", "v/")
    6. youtubeform.AxShockwaveFlash1.Movie = youtubecache.Text & "?&autoplay=1"
    7. ElseIf e.LinkText.Contains("youtu.be/") Then
    8. youtubeform.Show()
    9. youtubecache.Text = e.LinkText
    10. youtubecache.Text = e.LinkText.Replace("youtu.be/", "youtube.com/v/")
    11. youtubeform.AxShockwaveFlash1.Movie = youtubecache.Text & "?&autoplay=1"
    12. Else
    13. Process.Start(e.LinkText)
    14. End If
    15. End Sub

Facebook