Problem oko koda, prijavljuje gresku

Problem oko koda, prijavljuje gresku

offline
  • Pridružio: 17 Nov 2013
  • Poruke: 6
  • Gde živiš: Kraljevo

Preuzeo sam kod koji je dat u opisu video snimka sa youtube-a


Option Strict On Imports System.ComponentModel.ProgressChangedEventArgs Public Class Form1     Private Sub dig1_Click(ByVal sender As Object, ByVal e As EventArgs)         OpenFileDialog1.Title = ""         OpenFileDialog1.FileName = ""         OpenFileDialog1.ShowDialog()         PictureBox1.ImageLocation = OpenFileDialog1.FileName     End Sub     Private Sub dig2_Click(ByVal sender As Object, ByVal e As EventArgs)         BackgroundWorker1.RunWorkerAsync()     End Sub     Private Sub BackgroundWorker1_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs)         CheckForIllegalCrossThreadCalls = False         Dim Bild As Bitmap = CType(Me.PictureBox1.Image.Clone, Bitmap)         Dim width As Integer = Bild.Width - 1         Dim height As Integer = Bild.Height - 1         For x = 1 To width             For y = 1 To height                 ProgressBar1.Maximum = width * height                 BackgroundWorker1.ReportProgress(x * y)                 Dim R, G, B, A As Integer                 R = Bild.GetPixel(x, y).R                 G = Bild.GetPixel(x, y).G                 B = Bild.GetPixel(x, y).B                 A = Bild.GetPixel(x, y).A                 RichTextBox1.AppendText(R & "-" & G & "-" & B & "-" & A & "'" & x & "," & y & vbNewLine)             Next         Next         dig2.Text = dig2.Text.Substring(0, dig2.Text.Length - 1)         RichTextBox1.AppendText("|" & width & "*" & height)     End Sub Private Sub BackgroundWorker1_ProgressChanged(sender As Object, e As [color=red]System.ComponentModel.ProgressChangedEve­ntArgs[/color]) Handles BackgroundWorker1.ProgressChanged         ProgressBar1.Value = e.ProgressPercentage     End Sub End Class

prijavljuje mi gresku u ovom delu System.ComponentModel.ProgressChangedEve­ntArgs ja sam naknadno ubacio biblioteku i dalje ne radi, na istom mestu mi izbacuje gresku, sta da radim?
Hvala unapred



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Ko je trenutno na forumu
 

Ukupno su 942 korisnika na forumu :: 63 registrovanih, 5 sakrivenih i 874 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: babaroga, Bane san, bbogdan, Belac91, belov, Ben Roj, bigvlada, Bubimir, Cigi, crazydkure, Dambi, dane007, Dare, dendrit86, Dimitrise93, Django777, djboj, Djuro2000, Dovla 1980, DrNeoCortex, dzoni19, Folkstar, GeoM, Georgius, Griffon vulture, HogarStrashni, IAR80, Joja, JOntra, Josef, Lieutenant, MarkoD, markomacii9, MB120mm, Mi lao shu, Milan A. Nikolic, MiloradKomadic, Mskok, Najax, Nemanja.M, nenad81, neutrino, nick79, Oblički, Pilence, repac, ruso, S2M, samsung, Silvertooth, singa, smerch, solic, Srle993, stalker22, starlights, superwhy, takini, UAV operator, x011, zeo, Zorge, Zukov