2 quicks questions

[karasz]

question 1) what is flash called? like the program you need to start making the movies everyone uses?

2) how do i make a random number generator for up to 50? (im setting up a poker tourney and need to put everyone at a table, so im going to give them a number and place the first ten numbers at table one... and so on)

[BurstStudio]

At 10/25/03 04:30 PM, karasz wrote: 1) what is flash called?

Ummm... it's called Flash...

2) how do i make a random number generator for up to 50?

random(50)+1 will make a random number between 1 and 50

[karasz]

just making sure its not called something huge and referred to as just flash...

and i need like the actual code for microsoft VB... the cheap one you can use from microsoft word...

i know its the pussy way but i dont care

[The-GrandMaster]

Sub Random()

Dim Random

Random = CStr(Int(Rnd() * 50))

End Sub

[karasz]

ok i guess that was the randomizer for the command button.... how do i make it show up on the screen?

basically i need the whole code for it...

sorry for any inconvience... i know its not very hard... but i cant remember it at all

[XXGhettoXX]

Answer 1: Macromedia Flash mx
Answer 2: I dont do this much so do what they say.

[The-GrandMaster]

Sub Random()

Dim Random, Msg, Style, Title, Box

Random = CStr(Int(Rnd() * 50))

Msg = "Your Number is " & Random

Style = vbokonly

Title = "Random Number"

Box = MsgBox(Msg, Style, Title)

End Sub

[High-Roller]

jeezoloweez, grandmaster, pretty smart w/the computa language

[Iamthom]

lol here ya go

Random Number Program

made it in 5 secs to save u 5 secs of ur life, aint that nice of me? lol

[The-GrandMaster]

At 10/25/03 10:51 PM, Stiron wrote: jeezoloweez, grandmaster, pretty smart w/the computa language

Not half as smart as some of the people who post here!

[The-GrandMaster]

A better version:

Sub Random()

Start: Dim Random, Msg, Style, Title, Box

Random = CStr(Int(Rnd() * 50))

Msg = "Your Number is " & Random

Style = vbRetryCancel

Title = "Random Number"

Box = MsgBox(Msg, Style, Title)

If Box = vbRetry Then GoTo Start

End Sub

[karasz]

two more things... the msgbox doesnt pop up

and the link doesnt do anything...

sorry for being a pain in the ass guys

[The-GrandMaster]

At 10/25/03 11:20 PM, karasz wrote: two more things... the msgbox doesnt pop up

and the link doesnt do anything...

sorry for being a pain in the ass guys

The MsgBox worked on my computer, anyway, I'll email you one I just made in VB.

[The-GrandMaster]

At 10/25/03 11:20 PM, karasz wrote: two more things... the msgbox doesnt pop up

and the link doesnt do anything...

sorry for being a pain in the ass guys

Try:

Sub CommandButton1_Click()

Start: Dim Random, Msg, Style, Title, Box

Random = CStr(Int(Rnd() * 50))

Msg = "Your Number is " & Random

Style = vbRetryCancel

Title = "Random Number"

Box = MsgBox(Msg, Style, Title)

If Box = vbRetry Then GoTo Start

End Sub

[The-GrandMaster]

At 10/25/03 11:20 PM, karasz wrote: two more things... the msgbox doesnt pop up

and the link doesnt do anything...

sorry for being a pain in the ass guys

Lol your link takes you back to this topic!

[karasz]

gracias good sir...

thank you very much...

[Iamthom]

heh, u know vb well and yet u dont know how to fix the link thing???? It always does that, especially if ur on aol, all u have to do it right click , copy shortcut, then minimize or open a new window (ie) and do it that way (i forget if open link in new window works though)

[The-GrandMaster]

At 10/26/03 12:29 AM, karasz wrote: gracias good sir...

thank you very much...

It was no problem, glad to help!