© 2018 Ольшевский Андрей Георгиевич обучает созданию шахматной программы в Скайп da.irk.ru

Сайт www.super-code.ru наполняется бесплатными книгами. Книги периодически редактируются

Шахматная доска на VB.NET (Visual Basic.NET) в Microsoft Visual Studio 2017 (2008, 2012, 2015)

Создайте пустую форму Form1 размером 700 на 700 и назовите ее «Шахматы» в свойстве Text

Шахматную доску

создаст программный код, формируя в цикле массив PictureBox:

Public Class Form1

     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

         Dim i As Integer, j As Integer, k As Integer, col As Color

         Dim pb(64) As PictureBox

         For i = 1 To 8

             For j = 1 To 8

                 If (i + j) Mod 2 = 0 Then col = Color.Black Else col = Color.White

                 k = k + 1

                 pb(k) = New PictureBox With {

                     .Name = "PictureBox" & i.ToString(),

                     .Location = New Point(-70 + i * 80, -70 + j * 80),

                     .Size = New Size(80, 80), 'Размеры PictureBox

                     .TabIndex = k,

                     .BackColor = col

                 }

                 Controls.Add(pb(k))

             Next j

         Next i

     End Sub

End Class

Продолжение следует...

04.11.17

© 2017 Ольшевский Андрей Георгиевич e-mail: da.irk.ru@mail.ru