varför funkar inte detta?

4 svar · 198 visningar · startad av Anders84 12 feb. 2003

Anders84Medlem sedan nov. 200226 inlägg

Frågan12 feb. 2003 15:49#1

Private Sub Picture1_Click()
If intTemp5 = intTemp1 Then
MsgBox "Hejsan" & vbCrLf & "Hejsan" & vbCrLf & "Hejsan", 1, "Hejsan"
Else
'
End If
End Sub`

När jag klickar på bilden även när dom inte är samma så kommer medelande rutan upp där de står hejsan. vad gör jag för fel?

MVH Anders

Engine^Medlem sedan dec. 20003 887 inlägg

12 feb. 2003 16:26#2

Du är i fel scope förmodligen och då är varken intTemp5 eller intTemp1 initierade och följdaktligen lika.

Gör dom globala eller skicka med värdena eller liknande :)

Anders84Medlem sedan nov. 200226 inlägg

12 feb. 2003 19:50#3

Och hur gör jag de på lämpligaste sätt?

MVH Anders

Engine^Medlem sedan dec. 20003 887 inlägg

13 feb. 2003 14:50#4

Private intTemp1 As Integer

Lägg det utanför dina subbar/funktioner, så deklareras det globalt...

Anders84Medlem sedan nov. 200226 inlägg

13 feb. 2003 16:15#5

Tack!! de funkade så

MVH Anders