Eli kun tätä yksinkertaista ohjelmaa kutsuu vaikka komentoriviltä/batista, niin pitäisi sen sitten kirjoittaa komentoriville ensimmäinen sille annettu parametri ja verrata käyttäjän painamiin näppäimiin sille seuraavina annettuja parametreja (käyttöesimerkki myöhemmin).
Tämä on konsoliohjelma.
Sub Main() Dim parametrit() As String = System.Environment.GetCommandLineArgs() 'parametrit System.Console.Write(Replace(parametrit(1), "_", " ")) 'korvataan ekasta parametrista alayhdysviivat välilyönneillä ja printataan koko homma Dim k As System.ConsoleKeyInfo 'nappula mitä on painettu Do k = System.Console.ReadKey() 'odotetaan näppäimenpainallusta For i = 2 To parametrit.Length - 1 'käydään silmukassa läpi loput parametrit If k.KeyChar = parametrit(i) Then System.Environment.Exit(i - 1) 'jos nappula löytyy parametreista, poistutaan ja käyttäydytään choicen tavoin Next Loop 'loopataan jos ei tullut oikeaa näppäintä End Sub
Käyttö:
@ECHO OFF Choice Valitse_kyllä_(k)_tai_ei_(e). k e ECHO. IF %ERRORLEVEL% == 1 ECHO Valitsit kyllä. IF %ERRORLEVEL% == 2 ECHO Valitsit ei. PAUSE >NUL
Aihe on jo aika vanha, joten et voi enää vastata siihen.