fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

Einstellungen laden

Uploader:	Sebastian
Datum/Zeit:	09.06.2014 01:42:46

Dim As String ConfigFile = ExePath + "\config.txt"



Dim As Integer a, b

Dim As String c



Open ConfigFile For Input As #1

Input #1, a, b, c

Close #1



Print "Ihre Angaben waren:"

Print "Erste Zahl:  " & a

Print "Zweite Zahl: " & b

Print "Das Wort:    " & c



Print

Print "Erkennen Sie die Angaben wieder? :-)"



Print

Print "Taste zum Beenden druecken."

GetKey

End

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.