Merhaba arkadaşlar çalıştırmak istediğim bir vb kodu var fakat Event 'Load' cannot be found. c:\users\abc\documents\visual studio 2013\Projects\Load\Load\Class1.vb
hatası alıyorum visual basic konusunda oldukça acemiyim yardım edebilirseniz çok sevinirim, çalıştırmak istediğim kod aşağıda;

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load(hata aldığım yer)

Dim arr() As Integer = {16, 22, 23, 24, 25, 26, 28, 30, 31, 39, 43, 45, 49, 51, 55, 75, 85}
Dim i = 0
Dim j = 0
Dim count = 0
Dim filerd As System.IO.FileStream

For i = 0 To 16

For j = 1 To 5
filerd = New System.IO.FileStream("C:\Mdata\cs" & arr(i) & "0" & j & ".arff", IO.FileMode.Open, IO.FileAccess.Read)
Dim lala As New System.IO.StreamReader(filerd)
Dim str As String = ""
While str.CompareTo("@data")
str = lala.ReadLine
count += 1
End While

Dim filewr As System.IO.FileStream
filewr = New System.IO.FileStream("C:\Mdata\cs" & arr(i) & "0" & j & "a.arff", IO.FileMode.Create, IO.FileAccess.Write)
Dim wrt As New System.IO.StreamWriter(filewr)
wrt.WriteLine("@relation cs16")
wrt.WriteLine("@attribute phonenumber_oid numeric")
wrt.WriteLine("@attribute description_no {1,2,3}")
wrt.WriteLine("@attribute direction_no {1,2,3}")
wrt.WriteLine("@attribute month_day {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,2 0,21,22,23,24,25,26,27,28,29,30,31}")
wrt.WriteLine("@attribute day_no {1,2,3,4,5,6,7}")
wrt.WriteLine("@attribute stimes numeric")
wrt.WriteLine("@attribute duration numeric")
wrt.WriteLine("@attribute pid {yes,no}")
wrt.WriteLine("@data")
While lala.Peek > -1
count += 1
str = lala.ReadLine
Dim tmp As String() = str.Split(",")
Dim str_to_write = tmp(0) & "," & tmp(2) & "," & tmp(3) & "," & tmp(4) & "," & tmp(5) & "," & tmp(6) & "," & tmp(7) & "," & tmp(8)
wrt.WriteLine(str_to_write)
End While
wrt.Close()

filewr.Close()

Next


Next

End Sub
End Class