Ξεκινήστε ένα νέο έργο της Visual Basic , κάνοντας κλικ στο "Αρχείο" στην επάνω αριστερή γωνία του παραθύρου VB6 και κάνοντας κλικ στο " Νέο " και , στη συνέχεια, επιλέξτε την επιλογή "Standard EXE " .
2
Κάντε διπλό κλικ στη φόρμα που εμφανίζεται να ανοίξει τον πηγαίο κώδικα της φόρμας . Γράψτε τον απαραίτητο κώδικα για να ρυθμίσετε τις δύο μεταβλητές που θα πρέπει να καταδείξουν τη διαφορά ανάμεσα σε μια διαδικασία και μια λειτουργία σε VB6 στο μηδέν
Για παράδειγμα : .
Δημ. TestPrcdr As Integer
Dim TestFnctn As Integer
TestPrcdr = 0
TestFnctn = 0
εικόνων 3
Γράψτε μια απλή διαδικασία που θα χορηγούν μόνο μια τιμή σε ένα . μεταβλητή
Για παράδειγμα :
Sub Test ( )
Δημ. TestPrcdr ως Ακέραιος
TestPrcdr = 5
End Sub
Φτηνές 4
Γράψτε μια απλή λειτουργία που θα χορηγούν ότι η λειτουργία μιας τιμής
Για παράδειγμα : .
TestFnctn Function ( ) As Integer
Dim Test Όπως ακέραιος
Test = 5
TestFnctn = Test
Function End
5
Γράψτε ένα κομμάτι του κώδικα που θα εμφανίζει τις μεταβλητές για τις οποίες θα έχουν δώσει αξία . Πληκτρολογήστε " Form1.show " τότε παραλείψτε μια γραμμή και τον τύπο "Print [ το όνομα της μεταβλητής σας] " σε αυτή τη γραμμή και , στη συνέχεια, πληκτρολογήστε "Print [ το όνομα της λειτουργίας σας] " στην επόμενη ? Πληκτρολογήστε όλα αυτά στον πηγαίο κώδικα για τη φόρμα σας
για παράδειγμα : .
Form1.show
Εκτύπωση TestPrcdr
Εκτύπωση TestFnctn
Η 6
λειτουργία σας πρόγραμμα , κάνοντας κλικ στο εικονίδιο που μοιάζει με ένα κουμπί αναπαραγωγής στη γραμμή εργαλείων σας ( κοντά στο επάνω μέρος του παραθύρου ) . Λειτουργία σας θα επιστρέψει την τιμή που θα ανατεθεί , αλλά τη διαδικασία σας , επειδή δεν δημιουργεί αξία για να χρησιμοποιηθεί έξω από μόνη της , θα επιστρέψει ένα μηδενικό .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα