Программное создание PictureBox с проверкой, нет ли на его месте другого PictureBox - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Здравствуйте! Нужно чтобы при нажатии кнопки создавался PictureBox с определёнными свойствами Location: x, y и SizeMode: Autosize и в него загрузилась определённая картинка. Но нужно чтобы перед этим была произведена проверка на наличие другого PictureBox на этих координатах (Location) и если на них уже имеется PictureBox, то нужно чтобы создаваемый PictureBox размещался по другим координатам, но если и там уже есть PictureBox, то по следующим и т.д. Все PictureBox'ы будут иметь одинаковый размер. Помогите, пожалуйста, с решением.

Решение задачи: «Программное создание PictureBox с проверкой, нет ли на его месте другого PictureBox»

textual
Листинг программы
Public Class Form1
 
    Dim PBcount As Integer = 0
    Dim LastPSN As New System.Drawing.Point(5, 5)
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
 
        Dim PBSize As New Size(50, 50)
 
        Me.Controls.Add(New PictureBox With { _
          .Name = "PictureBox" & PBcount + 1, _
          .Location = LastPSN, _
          .Size = PBSize, _
          .SizeMode = System.Windows.Forms.PictureBoxSizeMode.CenterImage, _
          .Image = My.Resources.broom, _
          .BackColor = System.Drawing.Color.White, _
          .BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle})
 
        If LastPSN.X + 10 + (PBSize.Width * 2) > Me.Width Then
            LastPSN.X = 5
            LastPSN.Y = LastPSN.Y + PBSize.Height + 5
        Else
            LastPSN = New System.Drawing.Point(LastPSN.X + PBSize.Width + 5, LastPSN.Y)
        End If
 
    End Sub
 
End Class

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4 из 5
Похожие ответы