Small basic ulaz datoteke

Nedavno sam počeo raditi igricu u Microsoft Small Basicu i naišao sam na jedan problem.

Programski kod:

' Ovo je uvodni meni

TextWindow.WriteLine("------------------")
TextWindow.WriteLine("Moja prva igra")
TextWindow.WriteLine("------------------")

TextWindow.WriteLine("1) Nova igra")
TextWindow.WriteLine("2) Pravila")
TextWindow.WriteLine("3) Izlaz")
TextWindow.WriteLine("-------------------")

uvodni_meni = TextWindow.ReadNumber()

If uvodni_meni = "1" Then
TextWindow.Clear()
  File.ReadContents("C:\Users\JOSIP\Desktop\Dokumenti\Igra\Odabir igrača.sb")
EndIf

If uvodni_meni = "2" Then
TextWindow.Clear()
  File.ReadContents("C:\Users\JOSIP\Desktop\Dokumenti\Igra\Pravila.sb")
EndIf

If uvodni_meni = "3" Then
Program.End()
EndIf

Ako upišem 3 radi mi, ali ako upišem 1 ili 2 napiše mi samo Press any key to continue, a  Odabir igrača.sb i  Pravila.sb postoje.

U čem sam pogriješio i sa kojom operacijom trebam zamijeniti ReadContents() da mi se učita Pravila.sb program.

Unaprijed hvala.

  Sada mi ispiše programski kod, a ne izvršava program.

Kako ti je već rečeno to uopće nemožeš preko Small Basica! Prvo pogledaj što radi File.ReadContents(...), nemožeš tako!

Rekao sam da nemožeš? A ja to radim, u http://jkelava6projects.wordpress.com/small-dock/ !

Samo sigurno ne koristim File.ReadContents(...), nego SPProcess.Start(...), za što ti očigledno treba SayPlus ekstenzija.

Vjerojatno može i neka druga ekstenzija, ali SayPlus je po meni odličan.

Kako god bilo, to ja nebi ni slučajno tako. Postaviš varijablu mode = 1 na početku programa, i imaš while petlju while mode > 0, a u njoj za svaki meni / igru staviš

If mode = broj_menija_ili_igre Then

  naredbe inicijalizaije ' najčešće gr.clear(), pa gumbi, ili crtanje :D

  While mode = broj_...

   Program.Delay(10) ' tu se mogu ubaciti još neke stvari ( provjere, updatei, ako se radi o igri )
  EndWhile

  naredbe završetka ' ako je potrbno

EndIf 

Jasno, onaj vanjski while mode > 0 se može riješiti i s goto, na par načina.

Vidi više:
Ekstenzije
SayPlus