WebBrowserdan PictureBox’a direk resim aktarmak

Private Sub Command1_Click()
Dim O as Object
Set O = WebBrowser1.Document.body.createControlRange()
Call O.Add(WebBrowser1.Document.All("verificationImg"))
Call O.execCommand("Copy")
Set Picture1.Picture = Clipboard.GetData
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "https://adslkota.turktelekom.com.tr/adslkota/login_tr.jsp"
End Sub

Delphi ile Animated BMP’den istenilen resim parçasını almak




Animated Bmp den istenilen resim parçasını almak

Visual basic 6 ile Txt to Listbox




Dim veriler As String
Open App.Path & "\test.txt" For Input As #1
Do While Not EOF(1)
Input #1, veriler
list1.AddItem veriler
Loop
Close #1