[Question] Pick random string?

[Erase]

Hey guys, I want to make a program which will be used to make the so called ''What class are you'' test. I don't want it to be advanced, and make the result depend on what you type and choose.
But I will add some stuff like What is your name, how old are you, and such. To make people feel it is real.
But what I seek is a code that makes e.g. sets the text of label1 to ''Hunter'' and label2 to some information about the hunter class.
So basicly it picks one out of the 10 different classes, and puts in the text for that class.
I made an example to show what I mean.

[Sychotix]

if memo1.text = 'Hunter' then
label1.caption := 'Hunter' //Change Label to Hunter
if memo1.text = 'Rogue' then
label1.caption := 'Rogue' // Change Label to Rogue

etc...

EDIT: Oh, and if you wanted it to randomly pick a class...
var
classnum : Integer;
begin
classnum := Random(10); //Generate a Random number greater than or equal to 0, and below 10... meaning 0-9
if classnum = 0 then
label1.caption := 'Hunter';
if classnum = 1 then
label1.caption := 'Rogue';

etc...

[maclone]

Dictionary.

[CimSlunt]

I know its onli a Demo but i would change it from "Use theier guns" to Use Ranged attacks" lol.

Cool idea tho

[Erase]

I know I know... Just made up something fast.

[Senoska]

In vb.net, don't use the method posted above.

The following code will work [tested]:

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim rand As New Random
        Dim min As Integer = 0
        Dim max As Integer = 10

        Dim returned As Integer = rand.Next(min, max)

        Select Case returned
            Case 1
                Label1.Text = "Hunter"
                Label2.Text = "Blahblahblah"
            Case 2
                Label1.Text = "Rogue"
                Label2.Text = "Cheap class."
        End Select

    End Sub