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

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

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

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

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

textual
Листинг программы
  1. Public Class Form1
  2.  
  3.     Dim PBcount As Integer = 0
  4.     Dim LastPSN As New System.Drawing.Point(5, 5)
  5.  
  6.     Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
  7.  
  8.         Dim PBSize As New Size(50, 50)
  9.  
  10.         Me.Controls.Add(New PictureBox With { _
  11.           .Name = "PictureBox" & PBcount + 1, _
  12.           .Location = LastPSN, _
  13.           .Size = PBSize, _
  14.           .SizeMode = System.Windows.Forms.PictureBoxSizeMode.CenterImage, _
  15.           .Image = My.Resources.broom, _
  16.           .BackColor = System.Drawing.Color.White, _
  17.           .BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle})
  18.  
  19.         If LastPSN.X + 10 + (PBSize.Width * 2) > Me.Width Then
  20.             LastPSN.X = 5
  21.             LastPSN.Y = LastPSN.Y + PBSize.Height + 5
  22.         Else
  23.             LastPSN = New System.Drawing.Point(LastPSN.X + PBSize.Width + 5, LastPSN.Y)
  24.         End If
  25.  
  26.     End Sub
  27.  
  28. End Class

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


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

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

9   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы