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