问题描述
如何从以下代码以粗体引发事件?
Public Sub init()
pb =新PictureBox(7 ,7){}
brd =新板()
对于i作为整数= 0到7
对于j作为整数= 0到7
pb(i,j)=新PictureBox()
如果brd.getbcolor(i,j)= 2那么
我。 pb(i,j).BackColor = System.Drawing.Color.White
Else
Me.pb(i,j).BackColor = System.Drawing.Color。银色
结束如果
Me.pb(i,j).Location = New System.Drawing.Point(30 + i * 60,10 + j * 60)
Me.pb(i,j).Name =pb1
Me.pb(i,j).Size = New System.Drawing.Size(60,60 )
Me.pb(i,j).TabIndex = i
Me.pb( i,j).TabStop = False
Me.Controls.AddRange(New System.Windows.Forms.Control(){Me.pb(i,j)})
下一页
下一页
lb =新ListBox()
Me.lb.Location =新System.Drawing.Point(530,10)
Me.lb.Name =lb
Me.lb.Size = New System.Drawing.Size(150,500)
Me.lb.TabIndex = 64
Me.lb.TabStop = False
Me.Controls.AddRange(New Control(){Me.lb})
label1 =新标签()
Me.label1.Location =新System.Drawing.Point(10,30)
Me.label1.Name =label1
Me.label1.Size = New System.Drawing.Size(20,20)
Me.label1.TabIndex = 65
Me.label1.TabStop = False
Me.label1.Font = New System.Drawing.Font(Microsoft Sans Seri f,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label1.Text =1
Me.Controls.AddRange(New Control(){Me.label1})
label2 =新标签()
Me.label2。 Location = New System.Drawing.Point(10,90)
Me.label2.Name =label2
Me.label2.Size = New System.Drawing.Size (20,20)
Me.label2.TabIndex = 65
Me.label2.TabStop = False
Me.label2.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label2.Text =2
Me.Controls.AddRange(New Control(){Me.label2})
label3 =新标签()
Me.label3.Location = New System.Drawing.Point(10,150)
M e.label3.Name =label3
Me.label3.Size = New System.Drawing.Size(20,20)
Me.label3.TabIndex = 65
Me.label3.TabStop = False
Me.label3.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle。 Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label3.Text =3
Me.Controls.AddRange(New Control(){Me .label3})
label4 =新标签()
Me.label4.Location = New System.Drawing.Point(10,210 )
Me.label4.Name =label4
Me.label4.Size = New System.Drawing.Size(20,20)
Me.label4.TabIndex = 65
Me.label4.TabStop = False
Me.label4.Font = New System.Drawing.Font(Microsoft Sans Serif, 14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByt e(162))
label4.Text =4
Me.Controls.AddRange(新控制(){Me.label4})
label5 =新标签()
Me.label5.Location = New System.Drawing.Point(10,270)
Me .label5.Name =label5
Me.label5.Size = New System.Drawing.Size(20,20)
Me.label5.TabIndex = 65
Me.label5.TabStop = False
Me.label5.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular ,System.Drawing.GraphicsUnit.Point,CByte(162))
label5.Text =5
Me.Controls.AddRange(New Control(){Me。 label5})
label6 =新标签()
Me.label6.Location = New System.Drawing.Point(10,330)
Me.label6.Name =label6
Me.label6.Size = New System.Drawing .Size(20,20)
Me.label6.TabIndex = 65
Me.label6.TabStop = False
Me.label6.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label6.Text = 6
Me.Controls.AddRange(新控制(){Me.label6})
label7 =新标签()
Me.label7.Location = New System.Drawing.Point(10,390)
Me.label7.Name =label7
Me .label7.Size = New System.Drawing.Size(20,20)
Me.label7.TabIndex = 65
Me.label7.TabStop = False
Me.label7.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label7.Text =7
Me.Controls .AddRange(New Control(){Me.label7})
label8 =新标签()
Me.label8.Location = New System.Drawing.Point(10,450)
Me.label8.Name =label8
Me.label8.Size = New System.Drawing.Size(20, 20)
Me.label8.TabIndex = 65
Me.label8.TabStop = False
Me.label8.Font = New System.Drawing .Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
label8.Text =8
Me.Controls.AddRange(New Control(){Me.label8})
labelh =新标签()
Me.labelh.Location = New System.Drawing.Point(50,490)
Me.labelh.Name =labelh
Me.labelh.Size = New System.Drawing.Size(20,20)
Me.labelh.TabIndex = 65
Me.labelh.TabStop = False
Me.labelh.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit .Point,CByte(162))
labelh.Text =h
Me.Controls.AddRange(New Control(){Me.labelh})
labelg =新标签()
Me.labelg.Location =新System.Drawing.Point(110,490)
Me.labelg.Name =labelg
Me.labelg.Size = New System.Drawing.Size(20,30)
Me.labelg.TabIndex = 65
Me.labelg.TabStop = False
Me.labelg.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing。 FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
labelg.Text =g
Me.Controls.AddRange(New Control() {Me.labelg})
labelf = N. ew Label()
Me.labelf.Location = New System.Drawing.Point(175,490)
Me.labelf.Name =labelf
Me.labelf.Size = New System.Drawing.Size(20,20)
Me.labelf.TabIndex = 65
Me.labelf.TabStop =错误
Me.labelf.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162) ))
labelf.Text =f
Me.Controls.AddRange(New Control(){Me.labelf})
labele =新标签()
Me.labele.Location = New System.Drawing.Point(230,490)
Me.labele。 Name =labele
Me.labele.Size = New System.Drawing.Size(20,20)
Me.labele.TabIndex = 65
Me.labele.TabStop = False
Me.labele.Font = New System.Dr awing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
labele.Text =e
Me.Controls.AddRange(New Control(){Me.labele})
labeld =新标签()
Me.labeld.Location = New System.Drawing.Point(290,490)
Me.labeld.Name =labeld
Me.labeld.Size = New System.Drawing.Size(20,20)
Me.labeld.TabIndex = 65
Me.labeld.TabStop = False
Me.labeld.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
labeld.Text =d
Me.Controls.AddRange(New Control(){Me.labeld})
labelc =新标签()
Me.labelc.Location = New System.Drawing.Point( 350,490)
Me.labelc.Name =labelc
Me.labelc.Size = New System.Drawing.Size(20,20)
Me.labelc.TabIndex = 65
Me.labelc.TabStop = False
Me.labelc.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
labelc.Text =c
Me.Controls.AddRange(New Control(){Me.labelc})
labelb =新标签()
Me.labelb。 Location = New System.Drawing.Point(410,490)
Me.labelb.Name =labelb
Me.labelb.Size = New System.Drawing.Size (20,20)
Me.labelb.TabIndex = 65
Me.labelb.TabStop = False
Me.labelb.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F,System.Drawing.FontStyle.Regular,Syst em.Drawing.GraphicsUnit.Point,CByte(162))
labelb.Text =b
Me.Controls.AddRange(New Control(){Me.labelb })
labela =新标签()
Me.labela.Location = New System.Drawing.Point(470,490)
Me.labela.Name =labela
Me.labela.Size = New System.Drawing.Size(20,20)
Me .labela.TabIndex = 65
Me.labela.TabStop = False
Me.labela.Font = New System.Drawing.Font(Microsoft Sans Serif,14.0F ,System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CByte(162))
labela.Text =a
Me.Controls.AddRange (New Control(){Me.labela})
Me.AutoScaleBaseSize = New System.Drawing.Size(5,13)
Me.ClientSize = New System.Drawing.Size(700,520)
Me.Name =ChessForm
Me.Text =Scoontz Chess
Me.Load + = New System.EventHandler(AddressOf Me.FormChess_Load)
Me.pb(0,0).Click + = New System.EventHandler(AddressOf pb_Click1)
Me.pb(1,0).Click + = New System.EventHandler(AddressOf pb_Click2)
Me.pb(2,0).Click + = New System.EventHandler(AddressOf pb_Click3)
Me.pb(3,0).Click + = New System。 EventHandler(AddressOf pb_Click4)
Me.pb(4,0).Click + = New System.EventHandler(AddressOf pb_Click5)
Me.pb(5,0)。单击+ = New System.EventHandler(AddressOf pb_Click6)
Me.pb(6,0).Click + = New System.EventHandler(AddressOf pb_Click7)
Me.pb (7,0).Click + = New System.EventHandler(AddressOf pb_Click8)
Me.pb(0,1).Click + = New System.EventHandler( AddressOf pb_Click9)
Me.pb(1,1)。点击+ = Ne w System.EventHandler(AddressOf pb_Click10)
Me.pb(2,1).Click + = New System.EventHandler(AddressOf pb_Click11)
Me.pb(3, 1).Click + = New System.EventHandler(AddressOf pb_Click12)
Me.pb(4,1).Click + = New System.EventHandler(AddressOf pb_Click13)
Me.pb(5,1).Click + = New System.EventHandler(AddressOf pb_Click14)
Me.pb(6,1).Click + = New System.EventHandler(AddressOf pb_Click15)
Me.pb(7,1).Click + = New System.EventHandler(AddressOf pb_Click16)
Me.pb(0,2) .Click + = New System.EventHandler(AddressOf pb_Click17)
Me.pb(1,2).Click + = New System.EventHandler(AddressOf pb_Click18)
Me。 pb(2,2).Click + = New System.EventHandler(AddressOf pb_Click19)
Me.pb(3,2).Click + = New System.EventHandler(AddressOf pb_Click20)
Me.pb(4,2)。点击+ =新的System.EventHandler(AddressOf pb_Click21)
Me.pb(5,2).Click + = New System.EventHandler(AddressOf pb_Click22)
Me.pb(6, 2).Click + = New System.EventHandler(AddressOf pb_Click23)
Me.pb(7,2).Click + = New System.EventHandler(AddressOf pb_Click24)
Me.pb(0,3).Click + = New System.EventHandler(AddressOf pb_Click25)
Me.pb(1,3).Click + = New System .EventHandler(AddressOf pb_Click26)
Me.pb(2,3).Click + = New System.EventHandler(AddressOf pb_Click27)
Me.pb(3,3) .Click + = New System.EventHandler(AddressOf pb_Click28)
Me.pb(4,3).Click + = New System.EventHandler(AddressOf pb_Click29)
Me。 pb(5,3).Click + = New System.EventHandler(AddressOf pb_Click30)
Me.pb(6,3).Click + = New System.EventHandler(AddressOf pb_Click31)
Me.pb(7,3)。点击+ = New System.EventHandler(AddressOf pb_Click32)
Me.pb(0,4).Click + = New System.EventHandler(AddressOf pb_Click33)
Me.pb(1,4).Click + = New System.EventHandler(AddressOf pb_Click34)
Me.pb(2,4).Click + = New System.EventHandler(AddressOf pb_Click35 )
Me.pb(3,4)。Click + = New System.EventHandler(AddressOf pb_Click36)
Me.pb(4,4).Click + = New System.EventHandler(AddressOf pb_Click37)
Me.pb(5,4).Click + = New System.EventHandler(AddressOf pb_Click38)
Me.pb(6,4 ).Click + = New System.EventHandler(AddressOf pb_Click39)
Me.pb(7,4).Click + = New System.EventHandler(AddressOf pb_Click40)
Me.pb(0,5).Click + = New System.EventHandler(AddressOf pb_Click41)
Me.pb(1,5).Click + = New System。 EventHandler(AddressOf pb_Click42)
Me.pb (2,5).Click + = New System.EventHandler(AddressOf pb_Click43)
Me.pb(3,5).Click + = New System.EventHandler(AddressOf pb_Click44)
Me.pb(4,5).Click + = New System.EventHandler(AddressOf pb_Click45)
Me.pb(5,5).Click + = New System.EventHandler(AddressOf pb_Click46 )
Me.pb(6,5)。Click + = New System.EventHandler(AddressOf pb_Click47)
Me.pb(7,5).Click + = New System.EventHandler(AddressOf pb_Click48)
Me.pb(0,6).Click + = New System.EventHandler(AddressOf pb_Click49)
Me.pb(1,6).Click + = New System.EventHandler(AddressOf pb_Click50)
Me.pb(2,6).Click + = New System.EventHandler(AddressOf pb_Click51)
Me.pb(3,6)。Click + = New System.EventHandler(AddressOf pb_Click52)
Me.pb(4,6)。点击+ =新系统。 EventHandler(AddressOf pb_Click53)
我。 pb(5,6).Click + = New System.EventHandler(AddressOf pb_Click54)
Me.pb(6,6).Click + = New System.EventHandler(AddressOf pb_Click55)
Me.pb(7,6)。点击+ = New System.EventHandler(AddressOf pb_Click56)
Me.pb(0,7)。点击+ = New System.EventHandler(AddressOf pb_Click57)
Me.pb(1,7).Click + = New System.EventHandler(AddressOf pb_Click58)
Me.pb( 2,7)。Click + = New System.EventHandler(AddressOf pb_Click59)
Me.pb(3,7).Click + = New System.EventHandler(AddressOf pb_Click60)
Me.pb(4,7).Click + = New System.EventHandler(AddressOf pb_Click61)
Me.pb(5,7).Click + = New System.EventHandler(AddressOf pb_Click62)
Me.pb(6,7).Click + = New System.EventHandler(AddressOf pb_Click63)
Me.pb(7,7).Click + = New System .EventHandler(AddressOf pb_Click64)
E. nd Sub
How to raise an event from the following code in bold?
Public Sub init()
pb = New PictureBox(7, 7) {}
brd = New Board()
For i As Integer = 0 To 7
For j As Integer = 0 To 7
pb(i, j) = New PictureBox()
If brd.getbcolor(i, j) = 2 Then
Me.pb(i, j).BackColor = System.Drawing.Color.White
Else
Me.pb(i, j).BackColor = System.Drawing.Color.Silver
End If
Me.pb(i, j).Location = New System.Drawing.Point(30 + i * 60, 10 + j * 60)
Me.pb(i, j).Name = "pb1"
Me.pb(i, j).Size = New System.Drawing.Size(60, 60)
Me.pb(i, j).TabIndex = i
Me.pb(i, j).TabStop = False
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.pb(i, j)})
Next
Next
lb = New ListBox()
Me.lb.Location = New System.Drawing.Point(530, 10)
Me.lb.Name = "lb"
Me.lb.Size = New System.Drawing.Size(150, 500)
Me.lb.TabIndex = 64
Me.lb.TabStop = False
Me.Controls.AddRange(New Control() {Me.lb})
label1 = New Label()
Me.label1.Location = New System.Drawing.Point(10, 30)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(20, 20)
Me.label1.TabIndex = 65
Me.label1.TabStop = False
Me.label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label1.Text = "1"
Me.Controls.AddRange(New Control() {Me.label1})
label2 = New Label()
Me.label2.Location = New System.Drawing.Point(10, 90)
Me.label2.Name = "label2"
Me.label2.Size = New System.Drawing.Size(20, 20)
Me.label2.TabIndex = 65
Me.label2.TabStop = False
Me.label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label2.Text = "2"
Me.Controls.AddRange(New Control() {Me.label2})
label3 = New Label()
Me.label3.Location = New System.Drawing.Point(10, 150)
Me.label3.Name = "label3"
Me.label3.Size = New System.Drawing.Size(20, 20)
Me.label3.TabIndex = 65
Me.label3.TabStop = False
Me.label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label3.Text = "3"
Me.Controls.AddRange(New Control() {Me.label3})
label4 = New Label()
Me.label4.Location = New System.Drawing.Point(10, 210)
Me.label4.Name = "label4"
Me.label4.Size = New System.Drawing.Size(20, 20)
Me.label4.TabIndex = 65
Me.label4.TabStop = False
Me.label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label4.Text = "4"
Me.Controls.AddRange(New Control() {Me.label4})
label5 = New Label()
Me.label5.Location = New System.Drawing.Point(10, 270)
Me.label5.Name = "label5"
Me.label5.Size = New System.Drawing.Size(20, 20)
Me.label5.TabIndex = 65
Me.label5.TabStop = False
Me.label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label5.Text = "5"
Me.Controls.AddRange(New Control() {Me.label5})
label6 = New Label()
Me.label6.Location = New System.Drawing.Point(10, 330)
Me.label6.Name = "label6"
Me.label6.Size = New System.Drawing.Size(20, 20)
Me.label6.TabIndex = 65
Me.label6.TabStop = False
Me.label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label6.Text = "6"
Me.Controls.AddRange(New Control() {Me.label6})
label7 = New Label()
Me.label7.Location = New System.Drawing.Point(10, 390)
Me.label7.Name = "label7"
Me.label7.Size = New System.Drawing.Size(20, 20)
Me.label7.TabIndex = 65
Me.label7.TabStop = False
Me.label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label7.Text = "7"
Me.Controls.AddRange(New Control() {Me.label7})
label8 = New Label()
Me.label8.Location = New System.Drawing.Point(10, 450)
Me.label8.Name = "label8"
Me.label8.Size = New System.Drawing.Size(20, 20)
Me.label8.TabIndex = 65
Me.label8.TabStop = False
Me.label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
label8.Text = "8"
Me.Controls.AddRange(New Control() {Me.label8})
labelh = New Label()
Me.labelh.Location = New System.Drawing.Point(50, 490)
Me.labelh.Name = "labelh"
Me.labelh.Size = New System.Drawing.Size(20, 20)
Me.labelh.TabIndex = 65
Me.labelh.TabStop = False
Me.labelh.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labelh.Text = "h"
Me.Controls.AddRange(New Control() {Me.labelh})
labelg = New Label()
Me.labelg.Location = New System.Drawing.Point(110, 490)
Me.labelg.Name = "labelg"
Me.labelg.Size = New System.Drawing.Size(20, 30)
Me.labelg.TabIndex = 65
Me.labelg.TabStop = False
Me.labelg.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labelg.Text = "g"
Me.Controls.AddRange(New Control() {Me.labelg})
labelf = New Label()
Me.labelf.Location = New System.Drawing.Point(175, 490)
Me.labelf.Name = "labelf"
Me.labelf.Size = New System.Drawing.Size(20, 20)
Me.labelf.TabIndex = 65
Me.labelf.TabStop = False
Me.labelf.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labelf.Text = "f"
Me.Controls.AddRange(New Control() {Me.labelf})
labele = New Label()
Me.labele.Location = New System.Drawing.Point(230, 490)
Me.labele.Name = "labele"
Me.labele.Size = New System.Drawing.Size(20, 20)
Me.labele.TabIndex = 65
Me.labele.TabStop = False
Me.labele.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labele.Text = "e"
Me.Controls.AddRange(New Control() {Me.labele})
labeld = New Label()
Me.labeld.Location = New System.Drawing.Point(290, 490)
Me.labeld.Name = "labeld"
Me.labeld.Size = New System.Drawing.Size(20, 20)
Me.labeld.TabIndex = 65
Me.labeld.TabStop = False
Me.labeld.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labeld.Text = "d"
Me.Controls.AddRange(New Control() {Me.labeld})
labelc = New Label()
Me.labelc.Location = New System.Drawing.Point(350, 490)
Me.labelc.Name = "labelc"
Me.labelc.Size = New System.Drawing.Size(20, 20)
Me.labelc.TabIndex = 65
Me.labelc.TabStop = False
Me.labelc.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labelc.Text = "c"
Me.Controls.AddRange(New Control() {Me.labelc})
labelb = New Label()
Me.labelb.Location = New System.Drawing.Point(410, 490)
Me.labelb.Name = "labelb"
Me.labelb.Size = New System.Drawing.Size(20, 20)
Me.labelb.TabIndex = 65
Me.labelb.TabStop = False
Me.labelb.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labelb.Text = "b"
Me.Controls.AddRange(New Control() {Me.labelb})
labela = New Label()
Me.labela.Location = New System.Drawing.Point(470, 490)
Me.labela.Name = "labela"
Me.labela.Size = New System.Drawing.Size(20, 20)
Me.labela.TabIndex = 65
Me.labela.TabStop = False
Me.labela.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CByte(162))
labela.Text = "a"
Me.Controls.AddRange(New Control() {Me.labela})
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(700, 520)
Me.Name = "ChessForm"
Me.Text = "Scoontz Chess"
Me.Load += New System.EventHandler(AddressOf Me.FormChess_Load)
Me.pb(0, 0).Click += New System.EventHandler(AddressOf pb_Click1)
Me.pb(1, 0).Click += New System.EventHandler(AddressOf pb_Click2)
Me.pb(2, 0).Click += New System.EventHandler(AddressOf pb_Click3)
Me.pb(3, 0).Click += New System.EventHandler(AddressOf pb_Click4)
Me.pb(4, 0).Click += New System.EventHandler(AddressOf pb_Click5)
Me.pb(5, 0).Click += New System.EventHandler(AddressOf pb_Click6)
Me.pb(6, 0).Click += New System.EventHandler(AddressOf pb_Click7)
Me.pb(7, 0).Click += New System.EventHandler(AddressOf pb_Click8)
Me.pb(0, 1).Click += New System.EventHandler(AddressOf pb_Click9)
Me.pb(1, 1).Click += New System.EventHandler(AddressOf pb_Click10)
Me.pb(2, 1).Click += New System.EventHandler(AddressOf pb_Click11)
Me.pb(3, 1).Click += New System.EventHandler(AddressOf pb_Click12)
Me.pb(4, 1).Click += New System.EventHandler(AddressOf pb_Click13)
Me.pb(5, 1).Click += New System.EventHandler(AddressOf pb_Click14)
Me.pb(6, 1).Click += New System.EventHandler(AddressOf pb_Click15)
Me.pb(7, 1).Click += New System.EventHandler(AddressOf pb_Click16)
Me.pb(0, 2).Click += New System.EventHandler(AddressOf pb_Click17)
Me.pb(1, 2).Click += New System.EventHandler(AddressOf pb_Click18)
Me.pb(2, 2).Click += New System.EventHandler(AddressOf pb_Click19)
Me.pb(3, 2).Click += New System.EventHandler(AddressOf pb_Click20)
Me.pb(4, 2).Click += New System.EventHandler(AddressOf pb_Click21)
Me.pb(5, 2).Click += New System.EventHandler(AddressOf pb_Click22)
Me.pb(6, 2).Click += New System.EventHandler(AddressOf pb_Click23)
Me.pb(7, 2).Click += New System.EventHandler(AddressOf pb_Click24)
Me.pb(0, 3).Click += New System.EventHandler(AddressOf pb_Click25)
Me.pb(1, 3).Click += New System.EventHandler(AddressOf pb_Click26)
Me.pb(2, 3).Click += New System.EventHandler(AddressOf pb_Click27)
Me.pb(3, 3).Click += New System.EventHandler(AddressOf pb_Click28)
Me.pb(4, 3).Click += New System.EventHandler(AddressOf pb_Click29)
Me.pb(5, 3).Click += New System.EventHandler(AddressOf pb_Click30)
Me.pb(6, 3).Click += New System.EventHandler(AddressOf pb_Click31)
Me.pb(7, 3).Click += New System.EventHandler(AddressOf pb_Click32)
Me.pb(0, 4).Click += New System.EventHandler(AddressOf pb_Click33)
Me.pb(1, 4).Click += New System.EventHandler(AddressOf pb_Click34)
Me.pb(2, 4).Click += New System.EventHandler(AddressOf pb_Click35)
Me.pb(3, 4).Click += New System.EventHandler(AddressOf pb_Click36)
Me.pb(4, 4).Click += New System.EventHandler(AddressOf pb_Click37)
Me.pb(5, 4).Click += New System.EventHandler(AddressOf pb_Click38)
Me.pb(6, 4).Click += New System.EventHandler(AddressOf pb_Click39)
Me.pb(7, 4).Click += New System.EventHandler(AddressOf pb_Click40)
Me.pb(0, 5).Click += New System.EventHandler(AddressOf pb_Click41)
Me.pb(1, 5).Click += New System.EventHandler(AddressOf pb_Click42)
Me.pb(2, 5).Click += New System.EventHandler(AddressOf pb_Click43)
Me.pb(3, 5).Click += New System.EventHandler(AddressOf pb_Click44)
Me.pb(4, 5).Click += New System.EventHandler(AddressOf pb_Click45)
Me.pb(5, 5).Click += New System.EventHandler(AddressOf pb_Click46)
Me.pb(6, 5).Click += New System.EventHandler(AddressOf pb_Click47)
Me.pb(7, 5).Click += New System.EventHandler(AddressOf pb_Click48)
Me.pb(0, 6).Click += New System.EventHandler(AddressOf pb_Click49)
Me.pb(1, 6).Click += New System.EventHandler(AddressOf pb_Click50)
Me.pb(2, 6).Click += New System.EventHandler(AddressOf pb_Click51)
Me.pb(3, 6).Click += New System.EventHandler(AddressOf pb_Click52)
Me.pb(4, 6).Click += New System.EventHandler(AddressOf pb_Click53)
Me.pb(5, 6).Click += New System.EventHandler(AddressOf pb_Click54)
Me.pb(6, 6).Click += New System.EventHandler(AddressOf pb_Click55)
Me.pb(7, 6).Click += New System.EventHandler(AddressOf pb_Click56)
Me.pb(0, 7).Click += New System.EventHandler(AddressOf pb_Click57)
Me.pb(1, 7).Click += New System.EventHandler(AddressOf pb_Click58)
Me.pb(2, 7).Click += New System.EventHandler(AddressOf pb_Click59)
Me.pb(3, 7).Click += New System.EventHandler(AddressOf pb_Click60)
Me.pb(4, 7).Click += New System.EventHandler(AddressOf pb_Click61)
Me.pb(5, 7).Click += New System.EventHandler(AddressOf pb_Click62)
Me.pb(6, 7).Click += New System.EventHandler(AddressOf pb_Click63)
Me.pb(7, 7).Click += New System.EventHandler(AddressOf pb_Click64)
End Sub
推荐答案
这篇关于如何举办活动?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!