Wie man einen wissenschaftlichen Rechner in Visual Basic
Visual Basic ist eine leistungsfähige Programmiersprache erstellt an Microsoft für Benutzer ohne Computer Programmierschulung zur Entwicklung von Software für Windows PCs erleichtern. Erstellen einen wissenschaftlichen Taschenrechner bietet eine Übersicht über die Entwicklung von Software für Visual Basic.
Anweisungen
Einrichten des Projekts
1 Erstellen Sie ein neues Projekt, indem Sie auf "Datei" und "Neues Projekt". Wenn Sie aufgefordert werden, geben Sie ihm den Namen "Wissenschaftlicher Taschenrechner."
Fügen Sie ein leeres Benutzerformular Schnittstelle erscheint für Ihre Rechner, Komponenten der grafischen Benutzeroberfläche (GUI) zu aus der Toolbox auf der linken Seite. Sie verwenden zwei Arten von Komponenten: eine Textbox Ergebnisse und eine Reihe von Schaltflächen angezeigt.
2 Ziehen Sie ein TextBox-Steuerelement an die Spitze der Taschenrechner aus der Toolbox auf der linken Seite. Dies wird sein, wo die Zahlen angezeigt werden und wo der Benutzer Zahlen für spätere Berechnungen geben wird.
3 Ziehen Sie eine Schaltfläche aus der Toolbox in das Formular. Finden Sie im Eigenschaftenfeld die Eigenschaft "Text" zu, und ändern sie, um "sündigen." Finde die Name-Eigenschaft, und ändern Sie es in "SinButton." Klicken Sie im Formular "Sünde", und drücken Sie "STRG-C", um eine Kopie der Schaltfläche in Ihrer Tastatur. Drücken Sie STRG + V 11 Mal die 11 neuen Schaltflächen für Ihr Formular zu erstellen. Für jede Schaltfläche ändern den Text der Schaltfläche den folgenden: cos, tan, exp, Pi, Sqrt, log, C, +, -, X, = und /, und geben sie einen Namen, das es beschreibt. Beispielsweise für die Schaltfläche "/" ändern Sie seine Name-Eigenschaft in "DivideButton."
Die Programmierung zu tun
4 Doppelklicken Sie auf die Schaltfläche "Sünde". Dies bewegt Sie zur Quelle code eine Ereignismethode für den Umgang mit Sünde Ereignisse erstellen und platzieren Sie den Cursor innerhalb es. Fügen Sie Folgendes gibt:
Private Sub Button19_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button19.Click TextBox1.Text = Math.Sin(TextBox1.Text) End Sub
5
Doppelklicken Sie auf die Schaltfläche "cos". Wieder einmal wird wechseln Sie auf den Source-Code und eine Ereignismethode zu erstellen. Fügen Sie Folgendes hinein:
Private Sub Button20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button20.Click TextBox1.Text = Math.Cos(TextBox1.Text) End Sub
6
Doppelklicken Sie auf den Button "tan" und fügen Sie Folgendes ein, wie in den vorherigen Schritten:
Private Sub Button21_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button21.Click TextBox1.Text = Math.Tan(TextBox1.Text) End Sub
7
Doppelklicken Sie auf die Schaltfläche "Pi" und fügen Sie den folgenden:
Private Sub Button22_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button22.Click TextBox1.Text = Math.PI End Sub
8
Doppelklicken Sie auf die Taste "C" und einfügen:
Private Sub Button23_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button23.Click TextBox1.Text = "" memory = 0 End Sub
Programmierung weiter
9 Fügen Sie Folgendes an der Spitze der Quellcode-Editor:
Dim memory As Double Dim operation As String
Dies wird Zahlen enthalten, die in binäre Operationen und den Betrieb benötigt werden, wie Division oder Multiplikation ausgeführt werden.
10 Doppelklicken Sie auf den binären Operation-Buttons (+,-, X, /, und exp) wiederum und fügen Sie den folgenden Code:
memory = TextBox1.Text operation = "+"
Ersetzen Sie den Vorgang mit dem Betrieb. Beispiel für die Schaltfläche "X" ersetzen "+" mit "X".
11 Doppelklicken Sie auf die Schaltfläche "=" und fügen Sie den folgenden:
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If operation.Equals("+") Then TextBox1.Text = memory + TextBox1.Text ElseIf operation.Equals("-") Then TextBox1.Text = memory - TextBox1.Text ElseIf operation.Equals("X") Then TextBox1.Text = memory * TextBox1.Text ElseIf operation.Equals("/") Then TextBox1.Text = memory / TextBox1.Text ElseIf operation.Equals("exp") Then TextBox1.Text = Math.Pow(memory, TextBox1.Text) End If
End Sub
12
Doppelklicken Sie auf die Schaltfläche "Protokoll" und einfügen:
Private Sub Button24_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button24.Click TextBox1.Text = Math.Log(TextBox1.Text) End Sub
13
Doppelklicken Sie auf die Schaltfläche "Sqrt" und einfügen:
Private Sub Button18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) behandelt Button18.Click
TextBox1.Text = Math.Sqrt(TextBox1.Text) End Sub