Well, I've got the basic layout for the adventure game. The playing area is going to be a form with two text boxes. One for input, one for output. There are also other forms, such as the inventory and start form.

The input is going to be like this. For example, let's say the user wanted to look at the tree:

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim Look, Tree
Look = InStr(Text1, "look")
Tree = InStr(Text1, "tree")

If (Look > 0 And Tree > 0) And (KeyAscii = 13) Then
Text1.Text = ""
Text2.Text = ("Description of tree")
ElseIf KeyAscii = 13 Then
Text2.Text = ("I don't understand")
Text1.Text = ""
End If
End Sub

To move from screen to screen, I'll simply call a new procedure. So if there's two rooms, a castle and a forest, there would be two procedures. If the user types "north" or "south", then the game would change to the appropriate procedure.

So... what I want to know is, is this a good way of doing an adventure game? Should I use arrays, or API calls? I'd appreciate any help I could get on this, as I would like to start making adventure games that are coded correctly.