Scholieren.com forum

Scholieren.com forum (https://forum.scholieren.com/index.php)
-   Software & Hardware (https://forum.scholieren.com/forumdisplay.php?f=20)
-   -   [VB] With Types (https://forum.scholieren.com/showthread.php?t=269846)

dafelix 05-11-2002 10:07

[VB] With Types
 
Ok ik d8 ff slim te zijn door deze code te gebruiken:

Code:

Private Function Turn(Player As String)
If Player = "Player3" Then
 With Player3
Else
 With Player2
End If

.Bot = True
End With

MsgBox Player2.Bot & " - " & Player3.Bot
End Function

Private Sub Form_Load()
Turn ("Player3")
End Sub

Alleen mag dit niet :(. moet ik nu persee steeds Player3.Bot & Player2.Bot doen, of kan dit anders op een makkeiljke manier?

Marcade 05-11-2002 22:52

Citaat:

dafelix schreef:
Ok ik d8 ff slim te zijn door deze code te gebruiken
?!?!!?? Gewoon een array gebruiken ofzo?

Player().bot ?

Code:

Private Function Turn(iPlayerNr AS INTEGER)

 Player(iPlayerNr).bot=true

MsgBox Player(2).Bot & " - " & Player(3).Bot
End Function

Private Sub Form_Load()
Turn 3
End Sub

?!? :confused:

dafelix 06-11-2002 09:59

hmmm geen slecht id. zal ff proberen, tnxz

Marcade 07-11-2002 08:19

Citaat:

dafelix schreef:
hmmm geen slecht id. zal ff proberen, tnxz
:p


Alle tijden zijn GMT +1. Het is nu 17:41.

Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.