Πώς να δημιουργήσετε μια αριθμομηχανή με Visual Basic & ArcGIS

Εξοικονομήστε χρόνο με την οικοδόμηση μια προσαρμοσμένη υπολογιστή στο δικό σας αντίγραφο του ArcGIS , ένα πρόγραμμα που διαχειρίζεται γεωγραφικών πληροφοριών και την ενσωματώνει στην μηχανική και άλλες εφαρμογές . ArcGIS σας επιτρέπει να δημιουργήσετε μακροεντολές χρησιμοποιώντας τη γλώσσας προγραμματισμού Visual Basic . Αν έχετε γνώσεις προγραμματισμού , μπορείτε στη συνέχεια να ενσωματώσει μια ποικιλία λειτουργιών , όπως ένα απλό κομπιουτεράκι , στο περιβάλλον εργασίας του ArcGIS , αφαιρώντας την ανάγκη για εναλλαγή μεταξύ των προγραμμάτων για τις συχνά χρησιμοποιούμενες λειτουργίες . Οδηγίες
Η

1 Κάντε κλικ στο " Εργαλεία > Μακροεντολές > Visual Basic Editor " μενού επιλογών στο ArcGIS για να ανοίξετε το Visual Basic editor macro . Στο πρόγραμμα επεξεργασίας , κάντε κλικ στην επιλογή "Εισαγωγή > ενότητα . " Ονομάστε την ενότητα " Υπολογιστής ". Κάντε κλικ στο " Insert> Form " και το όνομα του εντύπου " frmCalc . " Αυτό ανοίγει μια κενή φόρμα και μια εργαλειοθήκη που περιέχουν ελέγχει μπορείτε να προσθέσετε στη φόρμα . 2

Προσθέστε τους ελέγχους που απαιτούνται για τις λειτουργίες αριθμομηχανή που χρειάζεστε . Για παράδειγμα , μια απλή αριθμομηχανή χρειάζεται μόνο ένα πλαίσιο κειμένου και πέντε κουμπιά εντολών . Επιλέξτε το πλαίσιο κειμένου . Στο παράθυρο "Ιδιότητες" , αλλάξτε την ιδιότητα Κείμενο σε " 0 " χωρίς τα εισαγωγικά , και το "Όνομα" ιδιότητα " txtDisplay " χωρίς τα εισαγωγικά . Επιλέξτε ένα κουμπί εντολής και να του " Λεζάντα " ιδιότητα " + " και "Όνομα" του να " cmdAdd . " Ρύθμιση λεζάντες των υπόλοιπων κουμπιών εντολών να " - ", " * ", ? . " /" και το " = " και τα ονόματά τους να « cmdSubtract ", " cmdMultiply , " " cmdDivide " και " cmdResult " αντίστοιχα
εικόνων 3

κάντε διπλό κλικ στη μονάδα " Υπολογιστής " για να ανοίξετε το παράθυρο κώδικα . Πληκτρολογήστε τον ακόλουθο κώδικα : Φορτίο frmCalcDim αριθμό ως DoubleDim χειριστή όπως String
Η

4 Κάντε διπλό κλικ στη φόρμα για να ανοίξετε το παράθυρο κώδικα . Πληκτρολογήστε τον ακόλουθο κώδικα : αριθμός = 0operator = " "
5

Κάντε διπλό κλικ στο κουμπί "" + εντολή για να ανοίξει το παράθυρο κώδικα και πληκτρολογήστε τον ακόλουθο κώδικα : αριθμός = txtDisplay . TexttxtDisplay.Text = " 0 " χειριστής = " + "
Η 6

κωδικό Επικόλληση από το " cmdAdd " στο παράθυρο κώδικα για τα κουμπιά εντολών που εκπροσωπούν τις άλλες τρεις πράξεις , αντικαθιστώντας το " + . " στην τελευταία γραμμή με τον φορέα εκμετάλλευσης που αντιστοιχεί σε κάθε πλήκτρο - για παράδειγμα , ο χειριστής = " * " για " cmdMultiply "
Η

7 κάντε διπλό κλικ στο " = " ? κουμπί εντολής για να ανοίξετε το παράθυρο κώδικα και πληκτρολογήστε τον ακόλουθο κώδικα : Εάν ο λειτουργός = " + " Thennumber = αριθμός + txtDisplay.TextElseIf χειριστή = " - " Thennumber = αριθμός - χειριστή txtDisplay.TextElseIf = " * " Thennumber = αριθμός * χειριστή txtDisplay.TextElseIf = " /" Thennumber = αριθμός /txtDisplay.TextEnd IftxtDisplay.Text = αριθμός
8

Κλείστε το Visual Basic Editor , σώζοντας την ενότητα και τη μορφή , εφόσον ζητηθεί . Στο ArcGIS , κάντε κλικ στο μενού " Εργαλεία > Προσαρμογή " . Επιλέξτε την καρτέλα " Εντολές " . Στο " Κατηγορίες ", επιλέξτε " Μακροεντολές ". Μακροεντολές σας εμφανίζονται στα δεξιά . Κάντε κλικ και σύρετε το εικονίδιο δίπλα στο " Υπολογιστής " macro να το τοποθετήσετε σε μια από τις γραμμές εργαλείων του ArcGIS . Κάντε κλικ στο νέο κουμπί " Toolbar " για να εκτελέσετε προσαρμοσμένη υπολογιστή σας .
Η
εικόνων