i am getting a 'system not set to an instance of an object' nullreference error when i run the following function:
spikes as an array is declared globally as: dim spikes(100) as control
any help is welcome
Code:
Function collisioncheck()
spikes(1) = spike1
spikes(2) = spike2
spikes(3) = spike3
spikes(4) = spike4
spikes(5) = spike5
spikes(6) = spike6
spikes(7) = spike7
spikes(8) = spike8
spikes(9) = spike9
spikes(10) = spike10
spikes(11) = spike11
spikes(12) = spike12
spikes(13) = spike13
spikes(14) = spike14
spikes(15) = spike15
spikes(16) = spike16
spikes(17) = spike17
spikes(18) = spike18
spikes(19) = spike19
spikes(20) = spike20
spikes(21) = spike21
spikes(22) = spike22
spikes(23) = spike23
spikes(24) = spike24
spikes(25) = spike25
spikes(26) = spike26
spikes(27) = spike27
spikes(28) = spike28
spikes(29) = spike29
spikes(30) = spike30
spikes(31) = spike31
spikes(32) = spike32
spikes(33) = spike33
spikes(34) = spike34
spikes(35) = spike35
spikes(36) = spike36
spikes(37) = spike37
spikes(38) = spike38
spikes(39) = spike39
spikes(40) = spike40
spikes(41) = spike41
spikes(42) = spike42
spikes(43) = spike43
spikes(44) = spike44
spikes(45) = spike45
spikes(46) = spike46
spikes(47) = spike47
spikes(48) = spike48
spikes(49) = spike49
spikes(50) = spike50
spikes(51) = spike51
spikes(52) = spike52
spikes(53) = spike53
spikes(54) = spike54
spikes(56) = spike56
spikes(57) = spike57
spikes(58) = spike58
spikes(59) = spike59
spikes(60) = spike60
spikes(61) = spike61
spikes(62) = spike62
spikes(63) = spike63
spikes(64) = spike64
spikes(65) = spike65
spikes(66) = spike66
spikes(67) = spike67
spikes(68) = spike68
spikes(69) = spike69
spikes(70) = spike70
spikes(71) = spike71
spikes(72) = spike72
spikes(73) = spike73
spikes(74) = spike74
spikes(75) = spike75
spikes(76) = spike76
spikes(77) = spike77
spikes(78) = spike78
spikes(79) = spike79
spikes(80) = spike80
spikes(81) = spike81
spikes(82) = spike82
spikes(83) = spike83
spikes(84) = spike84
spikes(85) = spike85
spikes(86) = spike86
spikes(87) = spike87
spikes(88) = spike88
spikes(89) = spike89
spikes(90) = spike90
spikes(91) = spike91
spikes(92) = spike92
spikes(93) = spike93
spikes(94) = spike94
spikes(95) = spike95
spikes(96) = spike96
spikes(97) = spike97
spikes(98) = spike98
spikes(99) = spike99
spikes(0) = spike100
spikes(100) = guy
Dim dude As Control = guy
For Each s As Control In spikes
If s IsNot dude AndAlso s.Bounds.IntersectsWith(dude.Bounds) Then
collision = True
Exit For
Else
collision = False
End If
Next
Return collision
End Functionany help is welcome