Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #107.70K
1 Posted Topic
Try this... Dim Shapes(16) As PictureBox For i = 1 To 16 Shapes(i) = New PictureBox With Shapes(i) .Name = pbn .BackColor = SystemColors.Control 'Color.Green .BackgroundImage = New Bitmap(My.Resources.led_blk) .BackgroundImageLayout = ImageLayout.Zoom .Size = New Size(20, 20) .Visible = True .Location = New Point( 23 * i, 50) End With …
The End.