[VB] - Program konsolowy

[dadajszen]

Witam forumowiczów, mam pytanie odnośnie Visual Basic, czy w tym programie można jakoś stworzyć powiedzmy trainer konsolowy? Czyli po odpaleniu naszego programu włącza się konsola i pisze np F1 - NO AMMO itd itd...

[Sunnyline2]

Tak.

[dadajszen]

Czyli odpalam program i jest konsolka i ti co pisałem UP? Mógłbyś pomóc jak to zrobić

[Sunnyline2]

http://www.dotnetperls.com/console-write-vbnet

 

Czyli np.

Console.WriteLine("F1 - God Mode")

 

Aby się konsola nie zamykała użyj:

Console.ReadLine()

[dadajszen]

Tzn gdzie to mam wpisać jak mam forme?

[somanyidiots]

Po co tworzysz projekt z aplikacją okienkową skoro chcesz consolową. Przy tworzeniu projektu wybierz Console application czy tam Module.

[dadajszen]

kk dzięki, jak to mam pokolorowac np na czerwono

 

Console.WriteLine("F1 - God Mode")

 

@edit

 

Jeżeli to wkleje do mojego kodu

 

Dim s As String = Console.ReadLine()

 

To konsolka się nie zamknie po naciskaniu tych przycisków?

Skapnalem się że mam kod tylko bez funkcji klawisza . Czytałem jakieś example ale nie ogarniam ktoś chętny na pomoc?

[somanyidiots]

Parę przydatnych linków: http://www.v-basic.net/2010/07/use-colors-with-console-application.html

http://www.dotnetperls.com/console-write-vbnet

Pamiętaj że jak wybierasz np 1 z wyboru i niechcesz żeby program żądał przycisku do wyłączenia appki to musisz wrucicć do poprzedniej liniki.

[dadajszen]

W tym 1 linku jest zwykły program. W 2 nie Ma funkcji na klawisz Mogę ci dac kod na pw to byś mi dodał funkcja np na f1

[somanyidiots]

Dam ci poważną podpowiedź. Metoda Console.ReadKey(). Nie będę ci pisał programu bo to by było głupie. Sam chcesz napisać trainera a chcesz dać komuś pusty source żeby coś dopisał. Umiesz używać google, oczywiście bez obrazy. Ponieważ ja jak coś miałem zrobić szykałem w google lecz nie szukalem wpisując problem po polsku tylko po angielsku o wiele więcej znajdzie się pomocnych wątków na czasie oczywiście jeśli znasz angielski.

[dadajszen]

@UP

Wysłałem Ci kod na PW . sprawdź czy dobry ; - )

[dadajszen]

Mam taki kod( 'Moj kod' oczywiście wygląda on inaczej ale prosze zobaczyć czy dobre sa klawisze itd :

Module Module1

Sub Main()

Dim strChar As String

strChar = Console.ReadKey.F1

Mój kod

Console.WriteLine("F1 - 99999 kasy")

strChar = Console.ReadKey.F2

Mój kod

Console.WriteLine("F1 - 99999 kasy")

End Sub

End Module

 

PROSZĘ O SZYBKĄ ODP

[dadajszen]

REFRESz