make a label box in vb : help

[iTTaleem]

Hi Every one ,
on monday i have to submit my assignment i need ur help in this regard

make a label box in vb

one label box

and only one

and one text button

okay

so, when the user clicks on the next button

a question should display in that label box

he/she click again, the second question displays

so on..

15 questions should display

my teacher she showed some thing like this but that doesnt work .

Private Sub cmdNext_Click()
Dim intQuestion As Integer
Dim intQ1 As Integer
Dim intQ2 As Integer

intQuestion = intQuestion + 1

If intQuestion = intQ1 Then
lblQuestion.Caption = "Which country has the most people?"
ElseIf intQuestion = intQ2 Then
lblQuestion.Caption = "What is the biggest, ocean or a lake?"
End If



End Sub

can any one tell me how to do so ? i will be thank full to him / her
waiting

[TcM]

Ok so here is my solution. IGNORE THE TEACHER'S CODE, takes too long!

What you need is to use an array of 15 'slots'. So declare one array of 15 and one integer. Now whenever the user clicks the integer will be increased by + 1 (like in the example of your teacher) and that integer will be the 'slot' number reference.

If you don't know how to do anything specific please post back here. I will help you with it. But it is your homework and you should at least show me some efforts for me to help you (i.e. show me some beginning code, and not your teacher's)

[iTTaleem]

well i tried this my self but didnt worked

Dim intQ1 As Integer
Dim intQ2 As Integer

those to must have a value
declare it on your next button


on your form_load event put this


intQ1 = 1
intQ2 = 2
intQ3 = 3
(and so )
private_Sub cmdNext_click()


if intQuestion=1 then
lblQuestion.Caption = "Which country has the most people?"
ElseIf intQuestion = intQ2 Then
lblQuestion.Caption = "What is the biggest, ocean or a lake?"
(and so on)


(lastly)
intQuestion = intQuestion + 1
end if
end sub

can u plz give me a code or any other tip that work i will be thank full to u

[TcM]

Well.... As I told you use an array

as I told you, you need to use an array. To make an array you should use something like this:

Dim QuestionArray(1 To 5) As String

Then declare a normal integer

Then declare ever 'slot' of the array with the question, like this:

QuestionArray(1) = "Question One"
QuestionArray(2) = "Question Two"

etc...

Then with every click increase that integer, for example I used a variable i like this:

i = i + 1

and then finally write the question in the label like this:

Label1.Caption = (QuestionArray(i))

Now As you have 15 questions, if you continue clicking the button for more than 15 times it will show an error, you can fix that with a conditional statement