Looking for help with creating a quiz app

[madmadhouse]

I have been watching a you tube video tutorial, and got this far, but it doesnt go on to say how to implement another question into the coding, I followed the tutorial all the way into later adding music and pictures and background etc, but part 6 is missing and i fell i shall never know, I am hoping there is someone out there that can help me please

'Activity module
Sub Process_Globals
   

End Sub

Sub Globals
   Dim Button1 As Button
   Dim AnsText1 As EditText
   Dim Label2 As Label

End Sub

Sub Activity_Create(FirstTime As Boolean)
   Activity.LoadLayout("q1.bal")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Button1_Click
   If AnsText1.Text.ToLowerCase = "world wide web" Then
   Label2.TextColor = Colors.Green
   Label2.Text = "Correct"
   Else
   Label2.TextColor = Colors.Red
   Label2.Text = "Wrong"
   End If
End Sub

 

[Jimmy-1974]

Thanks Ally, I will give it a shot.