WCM Forum - vb: ungültiger bezeichner

WCM Forum (http://www.wcm.at/forum/index.php)

- Programmierung (http://www.wcm.at/forum/forumdisplay.php?f=17)

- - vb: ungültiger bezeichner (http://www.wcm.at/forum/showthread.php?t=119150)

Potassium

18.12.2003 15:06

vb: ungültiger bezeichner

hi leute
ich hab da heute wieder mal ein programm begonnen undnun häng ich da. theoretisch müssste alles stimmen aber es funzt ned. ich hab das projekt mal angehängt. wäre super wenn ihr euch das ansehen könntet.

Code:

Dim test As String

For i = 1 To 5

For h = 1 To 2

If Feld(i, h) = "Fest" Then

MsgBox Feld(i, h) & " Position: " & i & ":" & h

test = "img" & h & i

test.Picture = Bild.Picture



End If

Next h

Next i





End Sub

und die fehlermeldung:

Zitat:

UNgültiger Bezeichner

( Und deutet auf test.Picture = Bild.Picture )
ich hoffe ihr könnt mir helfen

_m3	18.12.2003 15:29

Nachdem "test" ein String ist (erste Zeile) wird er wohl keine Eigenschaft "Picture" haben, oder?

wbendl

18.12.2003 16:14

Hi!

Treffender hätte ich das auch nicht formulieren können.

mfg

WB

Potassium

18.12.2003 16:22

wie soll ich ihn den sonst dimensionieren?

flinx

18.12.2003 16:30

Wie schaut denn das 'Bild' Objekt aus?

Potassium

18.12.2003 16:32

bild is keine variable das ist ein name. solte richti eigentlich imgBild heißen. bin nur zu faul :D aber das ist im prinzip egal

flinx

18.12.2003 16:35

Zitat:

Original geschrieben von potassium
bild is keine variable das ist ein name. solte richti eigentlich imgBild heißen. bin nur zu faul :D aber das ist im prinzip egal

:confused: :confused:
Wenn du dich etwas verständlicher ausdrücken könntest, wäre es hilfreich.

Potassium

18.12.2003 16:38

Bild ist der Name eines Objekt, nämlich eines Bildplatzhalters. Richtig benannt hätte es imgBild heißen müssen, weil man vor den Namen des Objekt die Art des Obejkt schreibt. Hab ich aber nicht weil ich leider zu faul war. Falls du VB hast ist es sicher leichter zu verstehen wenn du dir das Projekt ansiehst.
btw ich hoffe das war verständlich,.;)

Sesa_Mina

18.12.2003 17:35

Mich graust vor dem Programmieransatz.

Für sowas brauchst keine Variablen-arrays sondern ein array aus Objekten.

Siehe angehängstes "Projekt"

Code:

Option Explicit ' Damit auch alle Variablen schön brav deklariert werden müssen :)



Private Sub btnZufall_Click()

   Dim X As Long

   For X = 0 To 9

      Image1(X).Picture = LampeAus.Picture

   Next

   X = Int(Rnd * 10) '0-9

   Image1(X).Picture = LampeEin.Picture

End Sub



Private Sub Form_Load()

   Dim X As Long, Y As Long

   

   Me.Show           ' <= Muss sichtbar sein sonst sieht ma dynamisch nachgeladene

                     '    controls nicht.

   Randomize Timer   ' <= brauxt nur einmal initialisieren.

   

   ' Controls dynamisch nachladen.

   For Y = 0 To 1

      For X = 0 To 4

         If (Y * 5 + X) > 0 Then

            ' Nachdem image1(0) schon existiert muss es nicht geladen werden

            Load Image1(Y * 5 + X)

            Image1(Y * 5 + X).Visible = True

            Image1(Y * 5 + X).Top = 2 + Image1(0).Height * Y

            Image1(Y * 5 + X).Left = 2 + Image1(0).Width * X

         End If

         Image1(Y * 5 + X).Picture = LampeAus.Picture

      Next

   Next

   

End Sub

Potassium

18.12.2003 17:58

vielen dank. nun geht es fröhlich weiter.

Alle Zeitangaben in WEZ +2. Es ist jetzt 14:51 Uhr.