|
-
Mar 24th, 2002, 08:04 AM
#1
Thread Starter
Not NoteMe
Dynamic Control Creation???
Hi all, I am making a tile based game, where various objects (picture boxes) move around the screen. All was well untill i tried to run my game our school computers. They are very slow, and the game played terribly.
To get around this i made all my pictureboxes into shapes, and removed all lines with .picture in them. This is a really annoying as on most computers the game runs perfectly, and the shapes just make it look lame.
What i want to know, is how can i have a messagebox appear, which asks the user if they want the pictures or not, and then create either a picturebox or a shape object, which the rest of my code will reference correctly.
This is what i have tried so far...
Dim Bang(1000) As Object ' don't know how to use dynamic arrays yet
~~~
form1_load()
a = MsgBox("Do you want to use pictures?", vbYesNo + vbQuestion, "Pictures")
If a = vbYes Then
UsePictures = True
Else
UsePictures = False
End If
If UsePictures = True Then
Bang(0) = frmDocument.Controls.Add("vb.picturebox", "Bang", frmDocument)
else
Bang(0) = frmDocument.Controls.Add("vb.shape", "Bang", frmDocument)
Any help would be much appreciated.
___
SLH
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|