1 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
\r
2 Partial Class Blackjack
\r
3 Inherits System.Windows.Forms.Form
\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
9 If disposing AndAlso components IsNot Nothing Then
\r
10 components.Dispose()
\r
13 MyBase.Dispose(disposing)
\r
17 'Required by the Windows Form Designer
\r
18 Private components As System.ComponentModel.IContainer
\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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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