Οι γλώσσες προγραμματισμού έχουν εξελιχθεί από τα punchcards.
Η απλή γλώσσα προγραμματισμού QBasic κυκλοφόρησε με κάθε υπολογιστή DOS στη δεκαετία του 1980 και στις αρχές της δεκαετίας του '90. Έκτοτε, η γλώσσα Visual Basic της Microsoft την αντικατέστησε, επιτρέποντας στους χομπίστες να γράφουν προγράμματα που χρησιμοποιούν τη διεπαφή των Windows αντί για τη γραμμή εντολών. Ωστόσο, οι δύο γλώσσες είναι σε μεγάλο βαθμό συμβατές, επιτρέποντάς σας να μετατρέψετε εύκολα τον κώδικα QBasic στην πιο τρέχουσα γλώσσα.
Βήμα 1
Μετονομάστε την επέκταση αρχείου του προγράμματος QBasic από ".bas" σε ".txt" και αγνοήστε τυχόν προειδοποιητικά μηνύματα.
Το βίντεο της ημέρας
Βήμα 2
Ανοίξτε τη Visual Basic και κάντε διπλό κλικ στο "Κουμπί" στην εργαλειοθήκη για να το προσθέσετε στη φόρμα σας. Αλλάξτε την ιδιότητα κειμένου του κουμπιού στο δεξιό πλαίσιο σε "Έναρξη".
Βήμα 3
Κάντε διπλό κλικ στο κουμπί για να ανοίξετε την κωδικοσελίδα του. Επιλέξτε «Επεξεργασία» > «Εισαγωγή αρχείου» και επιλέξτε το αρχείο κειμένου κώδικα QBasic. Αυτό θα κάνει τον κωδικό QBasic να εκτελεστεί όταν ο χρήστης κάνει κλικ στο κουμπί Έναρξη.
Βήμα 4
Τροποποιήστε τον κώδικα QBasic ώστε να συμμορφώνεται με τα πρότυπα της Visual Basic. Σημειώστε την παρουσία οποιωνδήποτε γραμμών που μοιάζουν με τα ακόλουθα:
IF INKEY$ = ΕΙΣΟΔΟΣ ΤΟΤΕ ΜΠΗΠ "Εισαγάγετε έναν αριθμό"; Ζ
Αντικαταστήστε τα με τις ακόλουθες γραμμές κώδικα της Visual Basic, προσαρμόζοντας τα ονόματα των μεταβλητών και τα μηνύματα προτροπής όπως απαιτείται:
Εάν KeyAscii = 65, τότε Beep EndIf Z = InputBox ("Εισαγάγετε έναν αριθμό")
Καταργήστε τυχόν δηλώσεις "ΟΘΟΝΗ" και αντικαταστήστε την εντολή "WINDOW" με "Κλίμακα".
Βήμα 5
Κάντε κλικ στο πράσινο βέλος στη γραμμή εργαλείων για να εκτελέσετε το πρόγραμμα. Εάν όλα λειτουργούν σωστά, κάντε κλικ στο κουμπί "Έναρξη" για εκτέλεση. Εάν λάβετε ένα μη αναγνωρισμένο σφάλμα εντολής, συμβουλευτείτε την τεκμηρίωση της Visual Basic για να βρείτε την κατάλληλη αντικατάσταση που θα χρησιμοποιήσετε στη θέση της παρωχημένης εντολής QBasic.
