Πώς να κάνω μια Scientific Calculator σε Visual Basic

Visual Basic είναι μια ισχυρή γλώσσα προγραμματισμού που δημιουργήθηκε με τη Microsoft για να καταστεί ευκολότερο για τους χρήστες χωρίς την κατάρτιση του προγραμματισμού ηλεκτρονικών υπολογιστών για την ανάπτυξη λογισμικού για υπολογιστές με Windows . Δημιουργώντας μια επιστημονική αριθμομηχανή παρέχει μια επισκόπηση του πώς να αναπτύξουν λογισμικό για τη Visual Basic . Τα πράγματα που θα χρειαστείτε
Visual Basic 2008 Express ή αργότερα
Η Εμφάνιση Περισσότερες οδηγίες
Ρύθμιση του έργου
Η

1 Δημιουργήστε ένα νέο έργο κάνοντας κλικ στο " Αρχείο" και "New Project . " Όταν σας ζητηθεί , να δώσει το όνομα « επιστημονική αριθμομηχανή . "

Μια κενή φόρμα διεπαφή χρήστη θα εμφανίζεται για τον υπολογιστή σας , προσθέστε γραφική διεπαφή χρήστη ( GUI ) στοιχεία για το από η εργαλειοθήκη στα αριστερά σας . Θα χρησιμοποιήσετε δύο τύπους εξαρτημάτων : ένα πλαίσιο κειμένου για να εμφανίσετε τα αποτελέσματα και μια δέσμη των κουμπιών 2

Σύρετε ένα πλαίσιο κειμένου στην κορυφή του υπολογιστή σας από την εργαλειοθήκη στα αριστερά . . Αυτό θα είναι αυτός όπου οι αριθμοί φαίνονται και όπου ο χρήστης θα
πληκτρολογήσετε αριθμούς για αργότερα υπολογισμό .
Η

3 Σύρετε ένα κουμπί στη φόρμα σας από την Εργαλειοθήκη . Στο παράθυρο ιδιοτήτων , βρείτε το " κείμενο" περιουσία και να αλλάξει σε " αμαρτία ". Βρείτε το ακίνητο όνομα και να αλλάξει σε " sinButton . " Κάντε κλικ στο κουμπί " αμαρτία " στη φόρμα και πατήστε " Ctrl - C " για να δημιουργήσετε ένα αντίγραφο του κουμπιού στο πληκτρολόγιο σας . Πιέστε Ctrl - V κλειδί 11 φορές για να δημιουργήσουν τις 11 νέα κουμπιά για τη φόρμα σας . Για κάθε κουμπί , αλλάξτε το κείμενο του κουμπιού με το ακόλουθο : cos , tan , pi , exp , sqrt , log , C , + , - , Χ , = και /, και να του δώσετε ένα όνομα που περιγράφει . Για παράδειγμα , για το πλήκτρο " /" , να αλλάξει το όνομά της περιουσίας του σε " divideButton . "
Εικόνων κάνει το Προγραμματισμού
Η

4 Κάντε διπλό κλικ στο " ? κουμπί αμαρτία » . Αυτό θα κινηθεί με τον πηγαίο κώδικα και να δημιουργήσει μια μέθοδο εκδήλωση για το χειρισμό εκδηλώσεις αμαρτία και τοποθετήστε το δρομέα σας μέσα σε αυτό . Επικολλήστε το ακόλουθο εκεί :

Private Sub Button19_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button19.ClickTextBox1.Text = Math.Sin ( TextBox1.Text ) End Sub

5

κάντε διπλό κλικ στο κουμπί " μαρούλι " . Για άλλη μια φορά , αυτό θα κινηθεί με τον πηγαίο κώδικα και να δημιουργήσει μια μέθοδο εκδήλωση . Επικολλήστε τον παρακάτω σε αυτό :

Private Sub Button20_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button20.ClickTextBox1.Text = Math.cos ( TextBox1.Text ) End Sub

6

κάντε διπλό κλικ στο κουμπί " μαύρισμα " και να επικολλήσετε τα ακόλουθα, όπως στα προηγούμενα βήματα :

Private Sub Button21_Click ( ByVal αποστολέα όπως System.Object , ByVal e όπως System.EventArgs ) Λαβές Button21.ClickTextBox1.Text = Math.Tan ( TextBox1.Text ) End Sub
Η

7 κάντε διπλό κλικ στο κουμπί " π" και να επικολλήσετε τα ακόλουθα :

Private Sub Button22_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button22.ClickTextBox1.Text = Math.PIEnd Sub
8

κάντε διπλό κλικ στο κουμπί "C" και επικόλληση :

Private Sub Button23_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button23.ClickTextBox1.Text = " " μνήμη = 0End Sub
εικόνων Προγραμματισμός Συνέχεια
Τετάρτη 9

Επικολλήστε τον ακόλουθο στην κορυφή της επεξεργασίας πηγαίου κώδικα :

μνήμη Dim Καθώς η λειτουργία DoubleDim Όπως String

Αυτό θα κρατήσει τους αριθμούς που απαιτούνται σε δυαδική δραστηριότητες και τη λειτουργία που πρέπει να εκτελεστεί, όπως διαίρεση ή πολλαπλασιασμό
Η 10

διπλό κλικ σε κάθε από τα κουμπιά δυαδική πράξη . ( + , - , Χ , /και exp ) με τη σειρά του και να επικολλήσετε το ακόλουθο κώδικα :

μνήμη = TextBox1.Textoperation = " + "

Αντικαταστήστε το κείμενο σε συνεργασία με τη λειτουργία . Για παράδειγμα , το κουμπί " X " , το " + " με " Χ "

11

Κάντε διπλό κλικ στο κουμπί " = " και επικόλληση του παρακάτω :

Private Sub Button1_Click_1 ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button1.ClickIf operation.Equals ( " + " ) ThenTextBox1.Text = μνήμη + TextBox1.TextElseIf operation.Equals ( " - " ) ThenTextBox1.Text = μνήμης - operation.Equals TextBox1.TextElseIf ( "Χ" ) ThenTextBox1.Text = μνήμης * operation.Equals TextBox1.TextElseIf ( " /" ) ThenTextBox1.Text = μνήμη /TextBox1 . operation.Equals TextElseIf ( " exp " ) ThenTextBox1.Text = Math.Pow ( μνήμη , TextBox1.Text ) End If

End Sub
Η 12

κάντε διπλό κλικ στο " ? κουμπί και επικόλληση log " :

Private Sub Button24_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button24.ClickTextBox1.Text = Math.Log ( TextBox1.Text ) End Sub
Τετάρτη 13

κάντε διπλό κλικ στο κουμπί " sqrt " και επικόλληση :

Private Sub Button18_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button18.ClickTextBox1.Text = Math.sqrt ( TextBox1.Text ) End Sub
Η
εικόνων