Merhaba arkadaşlar öncelikle Toolbox'ımızda boş bir yere sağ tıklayarak Choose Items > COM Components kısmından Shockwave Flash Objectimizi ekleyelim
Daha sonra bir buton ekleyip butonumuza çift tıklayalım ve kodumuzu ekleyelim
PHP:
Public Class Form1
Dim degistir As String
Dim link As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
link = "http://www.youtube.com/watch?v=9bZkp7q19f0"
degistir = link.Replace("watch?v=", "v/")
AxShockwaveFlash1.Movie = degistir
End Sub
End Class
Son düzenleme:
