Hallo iedereen,
Voor mijn po informatica ben ik een soort zeeslagje aan het maken maar begin vast te raken bij het maken van het zogenaamde grid. Mijn idee is eigenlijk om een veld te maken van 10 bij 10 pictureboxjes en deze declareren in een array (dit is ook gelukt) en wanneer je vervolgens op een pictureboxje klikt je de coordinaten van het grid kan zodat je deze later door kan sturen in een tcp client.dit is een opzet (3 bij 3 om even alls te coderen)

en de pictureboxjes hebben allemaal de naam x(x-coordinaat)y(y-coordinaat). Hierbij heb ik dus deze code geschreven maar schiet niet veel meer op. Ik loop op het weergeven van de coordinaten vast en talloze uren op google hebben mij niks wijzer gemaakt.. dit is alvorens mijn code
heeft iemand een idee
Voor mijn po informatica ben ik een soort zeeslagje aan het maken maar begin vast te raken bij het maken van het zogenaamde grid. Mijn idee is eigenlijk om een veld te maken van 10 bij 10 pictureboxjes en deze declareren in een array (dit is ook gelukt) en wanneer je vervolgens op een pictureboxje klikt je de coordinaten van het grid kan zodat je deze later door kan sturen in een tcp client.dit is een opzet (3 bij 3 om even alls te coderen)
en de pictureboxjes hebben allemaal de naam x(x-coordinaat)y(y-coordinaat). Hierbij heb ik dus deze code geschreven maar schiet niet veel meer op. Ik loop op het weergeven van de coordinaten vast en talloze uren op google hebben mij niks wijzer gemaakt.. dit is alvorens mijn code
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Public Class Form1 Public grid(3, 3) As PictureBox Public pbnaam As String Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For x = 1 To 3 For y = 1 To 3 pbnaam = "x" & x & "y" & y grid(x, y) = DirectCast(Me.Controls.Find(pbnaam, True)(0), PictureBox) Next Next End Sub Private Sub arrayclick Handles grid(x,y) MsgBox("x component =" & x & ", y component =" & y, ) End Sub End Class |
heeft iemand een idee
