array problem - Visual Basic .NET

I am trying to develop a prgram that randomly selects numbers for an
addition program, then when the check answer button is pressed it colors the
answer text field either green or red depending if the answer is correct.
When I hit the button the array variables seem to reinitialize to zero. Any
ideas why this would happen?
I have posted the vb behind code for the web page.

Public Class WebForm1

Inherits System.Web.UI.P age

Dim holder(300), answer(300) As Integer

#Region " Web Form Designer Generated Code "

'This call is required by the Web Form Designer.

<System.Diagnos tics.DebuggerSt epThrough()> Private Sub InitializeCompo nent()

End Sub

Protected WithEvents Label4 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label5 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label6 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label7 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label8 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label9 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label10 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label11 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label12 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label13 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label14 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label15 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label16 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label17 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label18 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label19 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label20 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label21 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label22 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label23 As System.Web.UI.W ebControls.Labe l

Protected WithEvents TextBox3 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox4 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox5 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox6 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox7 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox8 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox9 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox10 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox11 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox12 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Label24 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label25 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label26 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label27 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label28 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label29 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label30 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label31 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label32 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label33 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label34 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label35 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label36 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label37 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label38 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label39 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label40 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label41 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label42 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label43 As System.Web.UI.W ebControls.Labe l

Protected WithEvents TextBox13 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox14 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox15 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox16 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox17 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox18 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox19 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox20 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox21 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox22 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Label44 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label45 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label46 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label47 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label48 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label49 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label50 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label51 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label52 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label53 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label54 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label55 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label56 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label57 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label58 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label59 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label60 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label61 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label62 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label63 As System.Web.UI.W ebControls.Labe l

Protected WithEvents TextBox23 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox24 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox25 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox26 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox27 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox28 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox29 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox30 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox31 As System.Web.UI.W ebControls.Text Box

Protected WithEvents TextBox32 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Label64 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label65 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label66 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label67 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label68 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label69 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label70 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label71 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label72 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label73 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label74 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label75 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label76 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label77 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label78 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label79 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label80 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label81 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label82 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label83 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Textbox33 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox34 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox35 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox36 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox37 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox38 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox39 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox40 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox41 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox42 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Label84 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label85 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label86 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label87 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label88 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label89 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label90 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label91 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label92 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label93 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label94 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label95 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label96 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label97 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label98 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label99 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label100 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label101 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label102 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label103 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Textbox43 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox44 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox45 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox46 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox47 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox48 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox49 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox50 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox51 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox52 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox53 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox54 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox55 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox56 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox57 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox58 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox59 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox60 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox61 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox62 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox63 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox64 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox65 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox66 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox67 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox68 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox69 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox70 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox71 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox72 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox73 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox74 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox75 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox76 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox77 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox78 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox79 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox80 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox81 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Textbox82 As System.Web.UI.W ebControls.Text Box

Protected WithEvents Label104 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label105 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label106 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label107 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label108 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label109 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label110 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label111 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label112 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label113 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label114 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label115 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label116 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label117 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label118 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label119 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label120 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label121 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label122 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label123 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label124 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label125 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label126 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label127 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label128 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label129 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label130 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label131 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label132 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label133 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label134 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label135 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label136 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label137 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label138 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label139 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label140 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label141 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label142 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label143 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label144 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label145 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label146 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label147 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label148 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label149 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label150 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label151 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label152 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label153 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label154 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label155 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label156 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label157 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label158 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label159 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label160 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label161 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label162 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label163 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Label1 As System.Web.UI.W ebControls.Labe l

Protected WithEvents Button1 As System.Web.UI.W ebControls.Butt on

'NOTE: The following placeholder declaration is required by the Web Form
Designer.

'Do not delete or move it.

Private designerPlaceho lderDeclaration As System.Object

Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init

'CODEGEN: This method call is required by the Web Form Designer

'Do not modify it using the code editor.

InitializeCompo nent()

End Sub

#End Region

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
Dim x1, x2, x3, x4 As Integer

Dim ss As String

x3 = 8

x4 = 20

ss = "* "

If Not IsPostBack Then

For x2 = 4 To 163

x1 = (RanNum(x3, x4, x2))

(holder(x2)) = x1

Select Case x2

Case 4

Label4.Text = Str(x1)

Case 5

Label5.Text = Str(x1)

Case 6

Label6.Text = Str(x1)

Case 7

Label7.Text = Str(x1)

Case 8

Label8.Text = Str(x1)

Case 9

Label9.Text = Str(x1)

Case 10

Label10.Text = Str(x1)

Case 11

Label11.Text = Str(x1)

Case 12

Label12.Text = Str(x1)

Case 13

Label13.Text = Str(x1)

Case 14

Label14.Text = ss & Str(x1)

Case 15

Label15.Text = ss & Str(x1)

Case 16

Label16.Text = ss & Str(x1)

Case 17

Label17.Text = ss & Str(x1)

Case 18

Label18.Text = ss & Str(x1)

Case 19

Label19.Text = ss & Str(x1)

Case 20

Label20.Text = ss & Str(x1)

Case 21

Label21.Text = ss & Str(x1)

Case 22

Label22.Text = ss & Str(x1)

Case 23

Label23.Text = ss & Str(x1)

Case 24

Label24.Text = Str(x1)

Case 25

Label25.Text = Str(x1)

Case 26

Label26.Text = Str(x1)

Case 27

Label27.Text = Str(x1)

Case 28

Label28.Text = Str(x1)

Case 29

Label29.Text = Str(x1)

Case 30

Label30.Text = Str(x1)

Case 31

Label31.Text = Str(x1)

Case 32

Label32.Text = Str(x1)

Case 33

Label33.Text = Str(x1)

Case 34

Label34.Text = ss & Str(x1)

Case 35

Label35.Text = ss & Str(x1)

Case 36

Label36.Text = ss & Str(x1)

Case 37

Label37.Text = ss & Str(x1)

Case 38

Label38.Text = ss & Str(x1)

Case 39

Label39.Text = ss & Str(x1)

Case 40

Label40.Text = ss & Str(x1)

Case 41

Label41.Text = ss & Str(x1)

Case 42

Label42.Text = ss & Str(x1)

Case 43

Label43.Text = ss & Str(x1)

Case 44

Label44.Text = Str(x1)

Case 45

Label45.Text = Str(x1)

Case 46

Label46.Text = Str(x1)

Case 47

Label47.Text = Str(x1)

Case 48

Label48.Text = Str(x1)

Case 49

Label49.Text = Str(x1)

Case 50

Label50.Text = Str(x1)

Case 51

Label51.Text = Str(x1)

Case 52

Label52.Text = Str(x1)

Case 53

Label53.Text = Str(x1)

Case 54

Label54.Text = ss & Str(x1)

Case 55

Label55.Text = ss & Str(x1)

Case 56

Label56.Text = ss & Str(x1)

Case 57

Label57.Text = ss & Str(x1)

Case 58

Label58.Text = ss & Str(x1)

Case 59

Label59.Text = ss & Str(x1)

Case 60

Label60.Text = ss & Str(x1)

Case 61

Label61.Text = ss & Str(x1)

Case 62

Label62.Text = ss & Str(x1)

Case 63

Label63.Text = ss & Str(x1)

Case 64

Label64.Text = Str(x1)

Case 65

Label65.Text = Str(x1)

Case 66

Label66.Text = Str(x1)

Case 67

Label67.Text = Str(x1)

Case 68

Label68.Text = Str(x1)

Case 69

Label69.Text = Str(x1)

Case 70

Label70.Text = Str(x1)

Case 71

Label71.Text = Str(x1)

Case 72

Label72.Text = Str(x1)

Case 73

Label73.Text = Str(x1)

Case 74

Label74.Text = ss & Str(x1)

Case 75

Label75.Text = ss & Str(x1)

Case 76

Label76.Text = ss & Str(x1)

Case 77

Label77.Text = ss & Str(x1)

Case 78

Label78.Text = ss & Str(x1)

Case 79

Label79.Text = ss & Str(x1)

Case 80

Label80.Text = ss & Str(x1)

Case 81

Label81.Text = ss & Str(x1)

Case 82

Label82.Text = ss & Str(x1)

Case 83

Label83.Text = ss & Str(x1)

Case 84

Label84.Text = Str(x1)

Case 85

Label85.Text = Str(x1)

Case 86

Label86.Text = Str(x1)

Case 87

Label87.Text = Str(x1)

Case 88

Label88.Text = Str(x1)

Case 89

Label89.Text = Str(x1)

Case 90

Label90.Text = Str(x1)

Case 91

Label91.Text = Str(x1)

Case 92

Label92.Text = Str(x1)

Case 93

Label93.Text = Str(x1)

Case 94

Label94.Text = ss & Str(x1)

Case 95

Label95.Text = ss & Str(x1)

Case 96

Label96.Text = ss & Str(x1)

Case 97

Label97.Text = ss & Str(x1)

Case 98

Label98.Text = ss & Str(x1)

Case 99

Label99.Text = ss & Str(x1)

Case 100

Label100.Text = ss & Str(x1)

Case 101

Label101.Text = ss & Str(x1)

Case 102

Label102.Text = ss & Str(x1)

Case 103

Label103.Text = ss & Str(x1)

Case 104

Label104.Text = Str(x1)

Case 105

Label105.Text = Str(x1)

Case 106

Label106.Text = Str(x1)

Case 107

Label107.Text = Str(x1)

Case 108

Label108.Text = Str(x1)

Case 109

Label109.Text = Str(x1)

Case 110

Label110.Text = Str(x1)

Case 111

Label111.Text = Str(x1)

Case 112

Label112.Text = Str(x1)

Case 113

Label113.Text = Str(x1)

Case 114

Label114.Text = ss & Str(x1)

Case 115

Label115.Text = ss & Str(x1)

Case 116

Label116.Text = ss & Str(x1)

Case 117

Label117.Text = ss & Str(x1)

Case 118

Label118.Text = ss & Str(x1)

Case 119

Label119.Text = ss & Str(x1)

Case 120

Label120.Text = ss & Str(x1)

Case 121

Label121.Text = ss & Str(x1)

Case 122

Label122.Text = ss & Str(x1)

Case 123

Label123.Text = ss & Str(x1)

Case 124

Label124.Text = Str(x1)

Case 125

Label125.Text = Str(x1)

Case 126

Label126.Text = Str(x1)

Case 127

Label127.Text = Str(x1)

Case 128

Label128.Text = Str(x1)

Case 129

Label129.Text = Str(x1)

Case 130

Label130.Text = Str(x1)

Case 131

Label131.Text = Str(x1)

Case 132

Label132.Text = Str(x1)

Case 133

Label133.Text = Str(x1)

Case 134

Label134.Text = ss & Str(x1)

Case 135

Label135.Text = ss & Str(x1)

Case 136

Label136.Text = ss & Str(x1)

Case 137

Label137.Text = ss & Str(x1)

Case 138

Label138.Text = ss & Str(x1)

Case 139

Label139.Text = ss & Str(x1)

Case 140

Label140.Text = ss & Str(x1)

Case 141

Label141.Text = ss & Str(x1)

Case 142

Label142.Text = ss & Str(x1)

Case 143

Label143.Text = ss & Str(x1)

Case 144

Label144.Text = Str(x1)

Case 145

Label145.Text = Str(x1)

Case 146

Label146.Text = Str(x1)

Case 147

Label147.Text = Str(x1)

Case 148

Label148.Text = Str(x1)

Case 149

Label149.Text = Str(x1)

Case 150

Label150.Text = Str(x1)

Case 151

Label151.Text = Str(x1)

Case 152

Label152.Text = Str(x1)

Case 153

Label153.Text = Str(x1)

Case 154

Label154.Text = ss & Str(x1)

Case 155

Label155.Text = ss & Str(x1)

Case 156

Label156.Text = ss & Str(x1)

Case 157

Label157.Text = ss & Str(x1)

Case 158

Label158.Text = ss & Str(x1)

Case 159

Label159.Text = ss & Str(x1)

Case 160

Label160.Text = ss & Str(x1)

Case 161

Label161.Text = ss & Str(x1)

Case 162

Label162.Text = ss & Str(x1)

Case 163

Label163.Text = ss & Str(x1)

End Select

answer(x2 - 1) = holder(x2) + holder(x2 + 10)

Next x2

answer(x2 - 1) = holder(x2) + holder(x2 + 10)

End If

answer(x2 - 1) = holder(x2) + holder(x2 + 10)

End Sub

Private Sub TextBox1_TextCh anged(ByVal sender As System.Object, ByVal e As
System.EventArg s)

End Sub

Public Sub Button1_Click(B yVal sender As System.Object, ByVal e As
System.EventArg s)

If answer(3) = Val(TextBox3.Te xt) Then

TextBox3.BackCo lor = System.Drawing. Color.Green

Else

TextBox3.BackCo lor = System.Drawing. Color.Green

End If

End Sub

Public Function RanNum(ByVal minnum As Integer, ByVal maxnum As Integer,
ByVal place As Integer) As Integer

'initialize an array to hold the random numbers

Dim minholder(300) As Integer

'initialize random number generator

Dim r As New Random(System.D ateTime.Now.Mil lisecond)

Dim x As Integer

For x = 1 To 300

minholder(x) = r.Next(minnum, maxnum)

Next x

Return minholder(place )

End Function

Public Sub Button2_Click(B yVal sender As System.Object, ByVal e As
System.EventArg s)

End Sub

End Class
Thanks in advance ,

GL

Dec 4 '05 #1

Subscribe Reply

1519

Cor Ligthert [MVP]

GL,

It makes no sense to sent your complete code in a message if it is ASPX.vb
Without the accoording ASPX page it is not possible to debug it.

As well is it at least for me unreadable now, will you please copy as you do
this this first in a notebook and than copy and paste in your newsreader
message. Now it is in my newsreader unreadable or I should do a lot of work
to delete all blank rows and than even to much for a newsgroup. I think
that is a job better be done by you.

In this case is probably only your load part and button part and the
declaration of the array needed.

Cor

Dec 4 '05 #2

Similar topics

3266

New functions in .NET 2.0 ???

by: Federico G. Babelis | last post by:

Hi All: I have this line of code, but the syntax check in VB.NET 2003 and also in VB.NET 2005 Beta 2 shows as unknown: Dim local4 As Byte Fixed(local4 = AddressOf dest(offset)) CType(local4, Short) = CType(src, Short)

.NET Framework

4804

Passing derived class object array in place of base class object array

by: justanotherguy63 | last post by:

Hi, I am designing an application where to preserve the hierachy and for code substitability, I need to pass an array of derived class object in place of an array of base class object. Since I am using vector class(STL), the compiler does not allow me to do this. I do realize there is a pitfall in this approach(size of arrays not matching etc), but I wonder how to get around this problem. I have a class hierachy with abstract base...

C / C++

2218

simple c array help needed

by: ritchie | last post by:

Hi, I am writing to ask if anyone can see why my array is not being sorted correctly? It's an array of 4 elements(ints 1,2,3,4) but after calling the selection sort it comes back sorted as 1,1,2,4. I have narrowed it down to the sort function. I'm almost positive

C / C++

4614

Array of Pointers

by: Gerald | last post by:

I have a problem with an array of pointers. In a program I'm writing, I have to read a file, containing thousands of short lines. The content of another file will be compared against each line later on. Before that happens there has been a problem that causes a crash of the program. This is a little program "test.exe" I wrote to test what happens. compiler: mingw 3.1.01 for win32 command line

C / C++

5527

how to store strings of any length into an array of type char*?

by: arkobose | last post by:

my earlier post titled: "How to input strings of any lengths into arrays of type: char *array ?" seems to have created a confusion. therefore i paraphrase my problem below. consider the following program: #include<stdio.h> #define SIZE 1 int main()

C / C++

204

13075

gcc: pointer to array

by: Alexei A. Frounze | last post by:

Hi all, I have a question regarding the gcc behavior (gcc version 3.3.4). On the following test program it emits a warning: #include <stdio.h> int aInt2 = {0,1,2,4,9,16}; int aInt3 = {0,1,2,4,9};

C / C++

10718

Problem Sending VB6 Byte Array to C#...help?

by: intrepid_dw | last post by:

Hello, all. I've created a C# dll that contains, among other things, two functions dealing with byte arrays. The first is a function that returns a byte array, and the other is intended to receive a byte array as one of its parameters. The project is marked for COM interop, and that all proceeds normally. When I reference the type library in the VB6 project, and write the code to call the function that returns the byte array, it works

by: Leszek | last post by:

Hi. Is it possible in javascript to operate on an array without knowing how mamy elements it has? What i want to do is sending an array to a script, and this script should add all values from that array Could you show me a little example how to do this? Thanks.

Javascript

7416

create a dynamic array of pointers with initial values of NULL

by: sandy | last post by:

I need (okay, I want) to make a dynamic array of my class 'Directory', within my class Directory (Can you already smell disaster?) Each Directory can have subdirectories so I thought to put these in an array. The application compiles but aborts without giving me any useful information. What I suspect is happening is infinite recursion. Each Directory object creates an array of Subdirectories each of which has an array of...

C / C++

1985

Array filtering

by: assgar | last post by:

Hi Seasons Greetings Its back, I am being haunted. I thought I had resolved this problem but I am intermittently the receving the warnings below. This code consist of a 1) HTML form, 2) a display function on the HTML form and

PHP

9554

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look ! Part I. Meaning of...

General

9377

Changing the language in Windows 10

by: Hystou | last post by:

Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...

Windows Server

9925

The easy way to turn off automatic updates for Windows 10/11

by: Hystou | last post by:

Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...

Windows Server

7358

Access Europe - Using VBA to create a class based on a table - Wed 1 May

by: isladogs | last post by:

The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...

Microsoft Access / VBA

6640

Couldn’t get equations in html when convert word .docx file to html file in C#.

by: conductexam | last post by:

I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert into image. Globals.ThisAddIn.Application.ActiveDocument.Select();...

C# / C Sharp

5266

Trying to create a lan-to-lan vpn between two differents networks

by: TSSRALBI | last post by:

Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...

Networking - Hardware / Configuration

5405

Windows Forms - .Net 8.0

by: adsilva | last post by:

A Windows Forms form does not have the event Unload, like VB6. What one acts like?

Visual Basic .NET

3509

How to add payments to a PHP MySQL app.

by: muto222 | last post by:

How can i add a mobile payment intergratation into php mysql website.

PHP

2788

Comprehensive Guide to Website Development in Toronto: Expert Insights from BSMN Consultancy

by: bsmnconsultancy | last post by:

In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...

General