8c763a2e |
1 | <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _\r |
2 | Partial Class Blackjack\r |
3 | Inherits System.Windows.Forms.Form\r |
4 | \r |
5 | 'Form overrides dispose to clean up the component list.\r |
6 | <System.Diagnostics.DebuggerNonUserCode()> _\r |
7 | Protected Overrides Sub Dispose(ByVal disposing As Boolean)\r |
8 | Try\r |
9 | If disposing AndAlso components IsNot Nothing Then\r |
10 | components.Dispose()\r |
11 | End If\r |
12 | Finally\r |
13 | MyBase.Dispose(disposing)\r |
14 | End Try\r |
15 | End Sub\r |
16 | \r |
17 | 'Required by the Windows Form Designer\r |
18 | Private components As System.ComponentModel.IContainer\r |
19 | \r |
20 | 'NOTE: The following procedure is required by the Windows Form Designer\r |
21 | 'It can be modified using the Windows Form Designer. \r |
22 | 'Do not modify it using the code editor.\r |
23 | <System.Diagnostics.DebuggerStepThrough()> _\r |
24 | Private Sub InitializeComponent()\r |
25 | Me.CmdHit = New System.Windows.Forms.Button()\r |
26 | Me.CmdDeal = New System.Windows.Forms.Button()\r |
27 | Me.CmdSplit = New System.Windows.Forms.Button()\r |
28 | Me.CmdDoubleDown = New System.Windows.Forms.Button()\r |
29 | Me.CmdStand = New System.Windows.Forms.Button()\r |
30 | Me.TxtTotal = New System.Windows.Forms.TextBox()\r |
31 | Me.LblTotal = New System.Windows.Forms.Label()\r |
32 | Me.LblBet = New System.Windows.Forms.Label()\r |
33 | Me.TxtBet = New System.Windows.Forms.TextBox()\r |
34 | Me.TxtPlayerCard1 = New System.Windows.Forms.TextBox()\r |
35 | Me.TxtPlayerCard2 = New System.Windows.Forms.TextBox()\r |
36 | Me.TxtPlayerCard3 = New System.Windows.Forms.TextBox()\r |
37 | Me.TxtPlayerCard4 = New System.Windows.Forms.TextBox()\r |
38 | Me.TxtPlayerCard5 = New System.Windows.Forms.TextBox()\r |
39 | Me.LblYou = New System.Windows.Forms.Label()\r |
40 | Me.LblStatus = New System.Windows.Forms.Label()\r |
41 | Me.LblDesc1 = New System.Windows.Forms.Label()\r |
42 | Me.LblDesc2 = New System.Windows.Forms.Label()\r |
43 | Me.LblDesc3 = New System.Windows.Forms.Label()\r |
44 | Me.LblDealer = New System.Windows.Forms.Label()\r |
45 | Me.TxtSplit5 = New System.Windows.Forms.TextBox()\r |
46 | Me.TxtSplit4 = New System.Windows.Forms.TextBox()\r |
47 | Me.TxtSplit3 = New System.Windows.Forms.TextBox()\r |
48 | Me.TxtSplit2 = New System.Windows.Forms.TextBox()\r |
49 | Me.TxtSplit1 = New System.Windows.Forms.TextBox()\r |
50 | Me.TxtDealerCard5 = New System.Windows.Forms.TextBox()\r |
51 | Me.TxtDealerCard4 = New System.Windows.Forms.TextBox()\r |
52 | Me.TxtDealerCard3 = New System.Windows.Forms.TextBox()\r |
53 | Me.TxtDealerCard2 = New System.Windows.Forms.TextBox()\r |
54 | Me.TxtDealerCard1 = New System.Windows.Forms.TextBox()\r |
55 | Me.LblDesc4 = New System.Windows.Forms.Label()\r |
56 | Me.CmdRules = New System.Windows.Forms.Button()\r |
57 | Me.SuspendLayout()\r |
58 | '\r |
59 | 'CmdHit\r |
60 | '\r |
61 | Me.CmdHit.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
62 | Me.CmdHit.Location = New System.Drawing.Point(28, 497)\r |
63 | Me.CmdHit.Name = "CmdHit"\r |
64 | Me.CmdHit.Size = New System.Drawing.Size(97, 42)\r |
65 | Me.CmdHit.TabIndex = 0\r |
66 | Me.CmdHit.Text = "Hit"\r |
67 | Me.CmdHit.UseVisualStyleBackColor = True\r |
68 | '\r |
69 | 'CmdDeal\r |
70 | '\r |
71 | Me.CmdDeal.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
72 | Me.CmdDeal.Location = New System.Drawing.Point(440, 497)\r |
73 | Me.CmdDeal.Name = "CmdDeal"\r |
74 | Me.CmdDeal.Size = New System.Drawing.Size(97, 42)\r |
75 | Me.CmdDeal.TabIndex = 1\r |
76 | Me.CmdDeal.Text = "Deal"\r |
77 | Me.CmdDeal.UseVisualStyleBackColor = True\r |
78 | '\r |
79 | 'CmdSplit\r |
80 | '\r |
81 | Me.CmdSplit.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
82 | Me.CmdSplit.Location = New System.Drawing.Point(337, 497)\r |
83 | Me.CmdSplit.Name = "CmdSplit"\r |
84 | Me.CmdSplit.Size = New System.Drawing.Size(97, 42)\r |
85 | Me.CmdSplit.TabIndex = 2\r |
86 | Me.CmdSplit.Text = "Split"\r |
87 | Me.CmdSplit.UseVisualStyleBackColor = True\r |
88 | '\r |
89 | 'CmdDoubleDown\r |
90 | '\r |
91 | Me.CmdDoubleDown.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
92 | Me.CmdDoubleDown.Location = New System.Drawing.Point(234, 497)\r |
93 | Me.CmdDoubleDown.Name = "CmdDoubleDown"\r |
94 | Me.CmdDoubleDown.Size = New System.Drawing.Size(97, 42)\r |
95 | Me.CmdDoubleDown.TabIndex = 3\r |
96 | Me.CmdDoubleDown.Text = "Double Down"\r |
97 | Me.CmdDoubleDown.UseVisualStyleBackColor = True\r |
98 | '\r |
99 | 'CmdStand\r |
100 | '\r |
101 | Me.CmdStand.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
102 | Me.CmdStand.Location = New System.Drawing.Point(131, 497)\r |
103 | Me.CmdStand.Name = "CmdStand"\r |
104 | Me.CmdStand.Size = New System.Drawing.Size(97, 42)\r |
105 | Me.CmdStand.TabIndex = 4\r |
106 | Me.CmdStand.Text = "Stand"\r |
107 | Me.CmdStand.UseVisualStyleBackColor = True\r |
108 | '\r |
109 | 'TxtTotal\r |
110 | '\r |
111 | Me.TxtTotal.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
112 | Me.TxtTotal.Location = New System.Drawing.Point(660, 460)\r |
113 | Me.TxtTotal.Name = "TxtTotal"\r |
114 | Me.TxtTotal.ReadOnly = True\r |
115 | Me.TxtTotal.Size = New System.Drawing.Size(136, 26)\r |
116 | Me.TxtTotal.TabIndex = 5\r |
117 | Me.TxtTotal.Text = "100"\r |
118 | '\r |
119 | 'LblTotal\r |
120 | '\r |
121 | Me.LblTotal.AutoSize = True\r |
122 | Me.LblTotal.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
123 | Me.LblTotal.ForeColor = System.Drawing.SystemColors.ControlLightLight\r |
124 | Me.LblTotal.Location = New System.Drawing.Point(556, 460)\r |
125 | Me.LblTotal.Name = "LblTotal"\r |
126 | Me.LblTotal.Size = New System.Drawing.Size(98, 20)\r |
127 | Me.LblTotal.TabIndex = 6\r |
128 | Me.LblTotal.Text = "Your money:"\r |
129 | '\r |
130 | 'LblBet\r |
131 | '\r |
132 | Me.LblBet.AutoSize = True\r |
133 | Me.LblBet.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
134 | Me.LblBet.ForeColor = System.Drawing.SystemColors.ControlLightLight\r |
135 | Me.LblBet.Location = New System.Drawing.Point(575, 492)\r |
136 | Me.LblBet.Name = "LblBet"\r |
137 | Me.LblBet.Size = New System.Drawing.Size(79, 20)\r |
138 | Me.LblBet.TabIndex = 7\r |
139 | Me.LblBet.Text = "Enter bet:"\r |
140 | '\r |
141 | 'TxtBet\r |
142 | '\r |
143 | Me.TxtBet.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
144 | Me.TxtBet.Location = New System.Drawing.Point(660, 494)\r |
145 | Me.TxtBet.Name = "TxtBet"\r |
146 | Me.TxtBet.Size = New System.Drawing.Size(136, 26)\r |
147 | Me.TxtBet.TabIndex = 8\r |
148 | '\r |
149 | 'TxtPlayerCard1\r |
150 | '\r |
151 | Me.TxtPlayerCard1.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
152 | Me.TxtPlayerCard1.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
153 | Me.TxtPlayerCard1.Location = New System.Drawing.Point(30, 342)\r |
154 | Me.TxtPlayerCard1.Multiline = True\r |
155 | Me.TxtPlayerCard1.Name = "TxtPlayerCard1"\r |
156 | Me.TxtPlayerCard1.ReadOnly = True\r |
157 | Me.TxtPlayerCard1.Size = New System.Drawing.Size(94, 125)\r |
158 | Me.TxtPlayerCard1.TabIndex = 9\r |
159 | Me.TxtPlayerCard1.Visible = False\r |
160 | Me.TxtPlayerCard1.WordWrap = False\r |
161 | '\r |
162 | 'TxtPlayerCard2\r |
163 | '\r |
164 | Me.TxtPlayerCard2.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
165 | Me.TxtPlayerCard2.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
166 | Me.TxtPlayerCard2.Location = New System.Drawing.Point(134, 342)\r |
167 | Me.TxtPlayerCard2.Multiline = True\r |
168 | Me.TxtPlayerCard2.Name = "TxtPlayerCard2"\r |
169 | Me.TxtPlayerCard2.ReadOnly = True\r |
170 | Me.TxtPlayerCard2.Size = New System.Drawing.Size(94, 125)\r |
171 | Me.TxtPlayerCard2.TabIndex = 10\r |
172 | Me.TxtPlayerCard2.Visible = False\r |
173 | Me.TxtPlayerCard2.WordWrap = False\r |
174 | '\r |
175 | 'TxtPlayerCard3\r |
176 | '\r |
177 | Me.TxtPlayerCard3.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
178 | Me.TxtPlayerCard3.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
179 | Me.TxtPlayerCard3.Location = New System.Drawing.Point(237, 342)\r |
180 | Me.TxtPlayerCard3.Multiline = True\r |
181 | Me.TxtPlayerCard3.Name = "TxtPlayerCard3"\r |
182 | Me.TxtPlayerCard3.ReadOnly = True\r |
183 | Me.TxtPlayerCard3.Size = New System.Drawing.Size(94, 125)\r |
184 | Me.TxtPlayerCard3.TabIndex = 11\r |
185 | Me.TxtPlayerCard3.Visible = False\r |
186 | Me.TxtPlayerCard3.WordWrap = False\r |
187 | '\r |
188 | 'TxtPlayerCard4\r |
189 | '\r |
190 | Me.TxtPlayerCard4.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
191 | Me.TxtPlayerCard4.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
192 | Me.TxtPlayerCard4.Location = New System.Drawing.Point(340, 342)\r |
193 | Me.TxtPlayerCard4.Multiline = True\r |
194 | Me.TxtPlayerCard4.Name = "TxtPlayerCard4"\r |
195 | Me.TxtPlayerCard4.ReadOnly = True\r |
196 | Me.TxtPlayerCard4.Size = New System.Drawing.Size(94, 125)\r |
197 | Me.TxtPlayerCard4.TabIndex = 12\r |
198 | Me.TxtPlayerCard4.Visible = False\r |
199 | Me.TxtPlayerCard4.WordWrap = False\r |
200 | '\r |
201 | 'TxtPlayerCard5\r |
202 | '\r |
203 | Me.TxtPlayerCard5.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
204 | Me.TxtPlayerCard5.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
205 | Me.TxtPlayerCard5.Location = New System.Drawing.Point(443, 342)\r |
206 | Me.TxtPlayerCard5.Multiline = True\r |
207 | Me.TxtPlayerCard5.Name = "TxtPlayerCard5"\r |
208 | Me.TxtPlayerCard5.ReadOnly = True\r |
209 | Me.TxtPlayerCard5.Size = New System.Drawing.Size(94, 125)\r |
210 | Me.TxtPlayerCard5.TabIndex = 13\r |
211 | Me.TxtPlayerCard5.Visible = False\r |
212 | Me.TxtPlayerCard5.WordWrap = False\r |
213 | '\r |
214 | 'LblYou\r |
215 | '\r |
216 | Me.LblYou.AutoSize = True\r |
217 | Me.LblYou.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
218 | Me.LblYou.ForeColor = System.Drawing.SystemColors.ControlLightLight\r |
219 | Me.LblYou.Location = New System.Drawing.Point(592, 384)\r |
220 | Me.LblYou.Name = "LblYou"\r |
221 | Me.LblYou.Size = New System.Drawing.Size(87, 37)\r |
222 | Me.LblYou.TabIndex = 14\r |
223 | Me.LblYou.Text = "YOU"\r |
224 | '\r |
225 | 'LblStatus\r |
226 | '\r |
227 | Me.LblStatus.AutoSize = True\r |
228 | Me.LblStatus.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
229 | Me.LblStatus.ForeColor = System.Drawing.Color.Cyan\r |
230 | Me.LblStatus.Location = New System.Drawing.Point(574, 281)\r |
231 | Me.LblStatus.Name = "LblStatus"\r |
232 | Me.LblStatus.Size = New System.Drawing.Size(147, 25)\r |
233 | Me.LblStatus.TabIndex = 15\r |
234 | Me.LblStatus.Text = "Current status"\r |
235 | '\r |
236 | 'LblDesc1\r |
237 | '\r |
238 | Me.LblDesc1.AutoSize = True\r |
239 | Me.LblDesc1.Font = New System.Drawing.Font("Old English Text MT", 48.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
240 | Me.LblDesc1.Location = New System.Drawing.Point(50, 204)\r |
241 | Me.LblDesc1.Name = "LblDesc1"\r |
242 | Me.LblDesc1.Size = New System.Drawing.Size(469, 77)\r |
243 | Me.LblDesc1.TabIndex = 16\r |
244 | Me.LblDesc1.Text = "BLACKJACK"\r |
245 | '\r |
246 | 'LblDesc2\r |
247 | '\r |
248 | Me.LblDesc2.AutoSize = True\r |
249 | Me.LblDesc2.Font = New System.Drawing.Font("Lucida Calligraphy", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
250 | Me.LblDesc2.Location = New System.Drawing.Point(81, 281)\r |
251 | Me.LblDesc2.Name = "LblDesc2"\r |
252 | Me.LblDesc2.Size = New System.Drawing.Size(394, 21)\r |
253 | Me.LblDesc2.TabIndex = 17\r |
254 | Me.LblDesc2.Text = "H17 Split to 2 No double after split"\r |
255 | '\r |
256 | 'LblDesc3\r |
257 | '\r |
258 | Me.LblDesc3.AutoSize = True\r |
259 | Me.LblDesc3.Font = New System.Drawing.Font("Lucida Calligraphy", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
260 | Me.LblDesc3.Location = New System.Drawing.Point(88, 305)\r |
261 | Me.LblDesc3.Name = "LblDesc3"\r |
262 | Me.LblDesc3.Size = New System.Drawing.Size(395, 21)\r |
263 | Me.LblDesc3.TabIndex = 18\r |
264 | Me.LblDesc3.Text = "Blackjack pays 3:2 Insurance pays 2:1"\r |
265 | '\r |
266 | 'LblDealer\r |
267 | '\r |
268 | Me.LblDealer.AutoSize = True\r |
269 | Me.LblDealer.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
270 | Me.LblDealer.ForeColor = System.Drawing.SystemColors.ControlLightLight\r |
271 | Me.LblDealer.Location = New System.Drawing.Point(592, 68)\r |
272 | Me.LblDealer.Name = "LblDealer"\r |
273 | Me.LblDealer.Size = New System.Drawing.Size(144, 37)\r |
274 | Me.LblDealer.TabIndex = 19\r |
275 | Me.LblDealer.Text = "DEALER"\r |
276 | '\r |
277 | 'TxtSplit5\r |
278 | '\r |
279 | Me.TxtSplit5.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
280 | Me.TxtSplit5.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
281 | Me.TxtSplit5.Location = New System.Drawing.Point(444, 209)\r |
282 | Me.TxtSplit5.Multiline = True\r |
283 | Me.TxtSplit5.Name = "TxtSplit5"\r |
284 | Me.TxtSplit5.ReadOnly = True\r |
285 | Me.TxtSplit5.Size = New System.Drawing.Size(94, 125)\r |
286 | Me.TxtSplit5.TabIndex = 24\r |
287 | Me.TxtSplit5.Visible = False\r |
288 | Me.TxtSplit5.WordWrap = False\r |
289 | '\r |
290 | 'TxtSplit4\r |
291 | '\r |
292 | Me.TxtSplit4.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
293 | Me.TxtSplit4.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
294 | Me.TxtSplit4.Location = New System.Drawing.Point(341, 209)\r |
295 | Me.TxtSplit4.Multiline = True\r |
296 | Me.TxtSplit4.Name = "TxtSplit4"\r |
297 | Me.TxtSplit4.ReadOnly = True\r |
298 | Me.TxtSplit4.Size = New System.Drawing.Size(94, 125)\r |
299 | Me.TxtSplit4.TabIndex = 23\r |
300 | Me.TxtSplit4.Visible = False\r |
301 | Me.TxtSplit4.WordWrap = False\r |
302 | '\r |
303 | 'TxtSplit3\r |
304 | '\r |
305 | Me.TxtSplit3.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
306 | Me.TxtSplit3.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
307 | Me.TxtSplit3.Location = New System.Drawing.Point(238, 209)\r |
308 | Me.TxtSplit3.Multiline = True\r |
309 | Me.TxtSplit3.Name = "TxtSplit3"\r |
310 | Me.TxtSplit3.ReadOnly = True\r |
311 | Me.TxtSplit3.Size = New System.Drawing.Size(94, 125)\r |
312 | Me.TxtSplit3.TabIndex = 22\r |
313 | Me.TxtSplit3.Visible = False\r |
314 | Me.TxtSplit3.WordWrap = False\r |
315 | '\r |
316 | 'TxtSplit2\r |
317 | '\r |
318 | Me.TxtSplit2.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
319 | Me.TxtSplit2.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
320 | Me.TxtSplit2.Location = New System.Drawing.Point(135, 209)\r |
321 | Me.TxtSplit2.Multiline = True\r |
322 | Me.TxtSplit2.Name = "TxtSplit2"\r |
323 | Me.TxtSplit2.ReadOnly = True\r |
324 | Me.TxtSplit2.Size = New System.Drawing.Size(94, 125)\r |
325 | Me.TxtSplit2.TabIndex = 21\r |
326 | Me.TxtSplit2.Visible = False\r |
327 | Me.TxtSplit2.WordWrap = False\r |
328 | '\r |
329 | 'TxtSplit1\r |
330 | '\r |
331 | Me.TxtSplit1.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
332 | Me.TxtSplit1.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
333 | Me.TxtSplit1.Location = New System.Drawing.Point(31, 209)\r |
334 | Me.TxtSplit1.Multiline = True\r |
335 | Me.TxtSplit1.Name = "TxtSplit1"\r |
336 | Me.TxtSplit1.ReadOnly = True\r |
337 | Me.TxtSplit1.Size = New System.Drawing.Size(94, 125)\r |
338 | Me.TxtSplit1.TabIndex = 20\r |
339 | Me.TxtSplit1.Visible = False\r |
340 | Me.TxtSplit1.WordWrap = False\r |
341 | '\r |
342 | 'TxtDealerCard5\r |
343 | '\r |
344 | Me.TxtDealerCard5.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
345 | Me.TxtDealerCard5.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
346 | Me.TxtDealerCard5.Location = New System.Drawing.Point(444, 30)\r |
347 | Me.TxtDealerCard5.Multiline = True\r |
348 | Me.TxtDealerCard5.Name = "TxtDealerCard5"\r |
349 | Me.TxtDealerCard5.ReadOnly = True\r |
350 | Me.TxtDealerCard5.Size = New System.Drawing.Size(94, 125)\r |
351 | Me.TxtDealerCard5.TabIndex = 29\r |
352 | Me.TxtDealerCard5.Visible = False\r |
353 | Me.TxtDealerCard5.WordWrap = False\r |
354 | '\r |
355 | 'TxtDealerCard4\r |
356 | '\r |
357 | Me.TxtDealerCard4.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
358 | Me.TxtDealerCard4.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
359 | Me.TxtDealerCard4.Location = New System.Drawing.Point(341, 30)\r |
360 | Me.TxtDealerCard4.Multiline = True\r |
361 | Me.TxtDealerCard4.Name = "TxtDealerCard4"\r |
362 | Me.TxtDealerCard4.ReadOnly = True\r |
363 | Me.TxtDealerCard4.Size = New System.Drawing.Size(94, 125)\r |
364 | Me.TxtDealerCard4.TabIndex = 28\r |
365 | Me.TxtDealerCard4.Visible = False\r |
366 | Me.TxtDealerCard4.WordWrap = False\r |
367 | '\r |
368 | 'TxtDealerCard3\r |
369 | '\r |
370 | Me.TxtDealerCard3.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
371 | Me.TxtDealerCard3.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
372 | Me.TxtDealerCard3.Location = New System.Drawing.Point(238, 30)\r |
373 | Me.TxtDealerCard3.Multiline = True\r |
374 | Me.TxtDealerCard3.Name = "TxtDealerCard3"\r |
375 | Me.TxtDealerCard3.ReadOnly = True\r |
376 | Me.TxtDealerCard3.Size = New System.Drawing.Size(94, 125)\r |
377 | Me.TxtDealerCard3.TabIndex = 27\r |
378 | Me.TxtDealerCard3.Visible = False\r |
379 | Me.TxtDealerCard3.WordWrap = False\r |
380 | '\r |
381 | 'TxtDealerCard2\r |
382 | '\r |
383 | Me.TxtDealerCard2.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
384 | Me.TxtDealerCard2.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
385 | Me.TxtDealerCard2.Location = New System.Drawing.Point(135, 30)\r |
386 | Me.TxtDealerCard2.Multiline = True\r |
387 | Me.TxtDealerCard2.Name = "TxtDealerCard2"\r |
388 | Me.TxtDealerCard2.ReadOnly = True\r |
389 | Me.TxtDealerCard2.Size = New System.Drawing.Size(94, 125)\r |
390 | Me.TxtDealerCard2.TabIndex = 26\r |
391 | Me.TxtDealerCard2.Visible = False\r |
392 | Me.TxtDealerCard2.WordWrap = False\r |
393 | '\r |
394 | 'TxtDealerCard1\r |
395 | '\r |
396 | Me.TxtDealerCard1.BackColor = System.Drawing.SystemColors.ButtonHighlight\r |
397 | Me.TxtDealerCard1.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))\r |
398 | Me.TxtDealerCard1.Location = New System.Drawing.Point(31, 30)\r |
399 | Me.TxtDealerCard1.Multiline = True\r |
400 | Me.TxtDealerCard1.Name = "TxtDealerCard1"\r |
401 | Me.TxtDealerCard1.ReadOnly = True\r |
402 | Me.TxtDealerCard1.Size = New System.Drawing.Size(94, 125)\r |
403 | Me.TxtDealerCard1.TabIndex = 25\r |
404 | Me.TxtDealerCard1.Visible = False\r |
405 | Me.TxtDealerCard1.WordWrap = False\r |
406 | '\r |
407 | 'LblDesc4\r |
408 | '\r |
409 | Me.LblDesc4.AutoSize = True\r |
410 | Me.LblDesc4.Location = New System.Drawing.Point(543, 521)\r |
411 | Me.LblDesc4.Name = "LblDesc4"\r |
412 | Me.LblDesc4.Size = New System.Drawing.Size(377, 13)\r |
413 | Me.LblDesc4.TabIndex = 30\r |
414 | Me.LblDesc4.Text = "Please enter an even number. Otherwise your winnings may be rounded down."\r |
415 | '\r |
416 | 'CmdRules\r |
417 | '\r |
418 | Me.CmdRules.Location = New System.Drawing.Point(812, 460)\r |
419 | Me.CmdRules.Name = "CmdRules"\r |
420 | Me.CmdRules.Size = New System.Drawing.Size(68, 56)\r |
421 | Me.CmdRules.TabIndex = 31\r |
422 | Me.CmdRules.Text = "Rules (Help)"\r |
423 | Me.CmdRules.UseVisualStyleBackColor = True\r |
424 | '\r |
425 | 'Blackjack\r |
426 | '\r |
427 | Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)\r |
428 | Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font\r |
429 | Me.BackColor = System.Drawing.Color.OliveDrab\r |
430 | Me.ClientSize = New System.Drawing.Size(918, 545)\r |
431 | Me.Controls.Add(Me.CmdRules)\r |
432 | Me.Controls.Add(Me.LblDesc4)\r |
433 | Me.Controls.Add(Me.TxtDealerCard5)\r |
434 | Me.Controls.Add(Me.TxtDealerCard4)\r |
435 | Me.Controls.Add(Me.TxtDealerCard3)\r |
436 | Me.Controls.Add(Me.TxtDealerCard2)\r |
437 | Me.Controls.Add(Me.TxtDealerCard1)\r |
438 | Me.Controls.Add(Me.TxtSplit5)\r |
439 | Me.Controls.Add(Me.TxtSplit4)\r |
440 | Me.Controls.Add(Me.TxtSplit3)\r |
441 | Me.Controls.Add(Me.TxtSplit2)\r |
442 | Me.Controls.Add(Me.TxtSplit1)\r |
443 | Me.Controls.Add(Me.LblDealer)\r |
444 | Me.Controls.Add(Me.LblDesc3)\r |
445 | Me.Controls.Add(Me.LblDesc2)\r |
446 | Me.Controls.Add(Me.LblDesc1)\r |
447 | Me.Controls.Add(Me.LblStatus)\r |
448 | Me.Controls.Add(Me.LblYou)\r |
449 | Me.Controls.Add(Me.TxtPlayerCard5)\r |
450 | Me.Controls.Add(Me.TxtPlayerCard4)\r |
451 | Me.Controls.Add(Me.TxtPlayerCard3)\r |
452 | Me.Controls.Add(Me.TxtPlayerCard2)\r |
453 | Me.Controls.Add(Me.TxtPlayerCard1)\r |
454 | Me.Controls.Add(Me.TxtBet)\r |
455 | Me.Controls.Add(Me.LblBet)\r |
456 | Me.Controls.Add(Me.LblTotal)\r |
457 | Me.Controls.Add(Me.TxtTotal)\r |
458 | Me.Controls.Add(Me.CmdStand)\r |
459 | Me.Controls.Add(Me.CmdDoubleDown)\r |
460 | Me.Controls.Add(Me.CmdSplit)\r |
461 | Me.Controls.Add(Me.CmdDeal)\r |
462 | Me.Controls.Add(Me.CmdHit)\r |
463 | Me.MaximizeBox = False\r |
464 | Me.MaximumSize = New System.Drawing.Size(934, 583)\r |
465 | Me.MinimumSize = New System.Drawing.Size(934, 583)\r |
466 | Me.Name = "Blackjack"\r |
467 | Me.Text = "Blackjack"\r |
468 | Me.ResumeLayout(False)\r |
469 | Me.PerformLayout()\r |
470 | \r |
471 | End Sub\r |
472 | Friend WithEvents CmdHit As System.Windows.Forms.Button\r |
473 | Friend WithEvents CmdDeal As System.Windows.Forms.Button\r |
474 | Friend WithEvents CmdSplit As System.Windows.Forms.Button\r |
475 | Friend WithEvents CmdDoubleDown As System.Windows.Forms.Button\r |
476 | Friend WithEvents CmdStand As System.Windows.Forms.Button\r |
477 | Friend WithEvents TxtTotal As System.Windows.Forms.TextBox\r |
478 | Friend WithEvents LblTotal As System.Windows.Forms.Label\r |
479 | Friend WithEvents LblBet As System.Windows.Forms.Label\r |
480 | Friend WithEvents TxtBet As System.Windows.Forms.TextBox\r |
481 | Friend WithEvents TxtPlayerCard1 As System.Windows.Forms.TextBox\r |
482 | Friend WithEvents TxtPlayerCard2 As System.Windows.Forms.TextBox\r |
483 | Friend WithEvents TxtPlayerCard3 As System.Windows.Forms.TextBox\r |
484 | Friend WithEvents TxtPlayerCard4 As System.Windows.Forms.TextBox\r |
485 | Friend WithEvents TxtPlayerCard5 As System.Windows.Forms.TextBox\r |
486 | Friend WithEvents LblYou As System.Windows.Forms.Label\r |
487 | Friend WithEvents LblStatus As System.Windows.Forms.Label\r |
488 | Friend WithEvents LblDesc1 As System.Windows.Forms.Label\r |
489 | Friend WithEvents LblDesc2 As System.Windows.Forms.Label\r |
490 | Friend WithEvents LblDesc3 As System.Windows.Forms.Label\r |
491 | Friend WithEvents LblDealer As System.Windows.Forms.Label\r |
492 | Friend WithEvents TxtSplit5 As System.Windows.Forms.TextBox\r |
493 | Friend WithEvents TxtSplit4 As System.Windows.Forms.TextBox\r |
494 | Friend WithEvents TxtSplit3 As System.Windows.Forms.TextBox\r |
495 | Friend WithEvents TxtSplit2 As System.Windows.Forms.TextBox\r |
496 | Friend WithEvents TxtSplit1 As System.Windows.Forms.TextBox\r |
497 | Friend WithEvents TxtDealerCard5 As System.Windows.Forms.TextBox\r |
498 | Friend WithEvents TxtDealerCard4 As System.Windows.Forms.TextBox\r |
499 | Friend WithEvents TxtDealerCard3 As System.Windows.Forms.TextBox\r |
500 | Friend WithEvents TxtDealerCard2 As System.Windows.Forms.TextBox\r |
501 | Friend WithEvents TxtDealerCard1 As System.Windows.Forms.TextBox\r |
502 | Friend WithEvents LblDesc4 As System.Windows.Forms.Label\r |
503 | Friend WithEvents CmdRules As System.Windows.Forms.Button\r |
504 | \r |
505 | End Class\r |