Ako si vyrobiť Scientific Calculator v jazyku Visual Basic

Visual Basic je výkonný programovací jazyk vytvorený pre Microsoft , aby bolo jednoduchšie pre používateľa bez počítačového programovania prípravy na vývoj softvéru pre počítače so systémom Windows . Vytvorenie vedeckú kalkulačku poskytuje prehľad o tom , ako vyvíjať softvér pre Visual Basic . Veci , ktoré budete potrebovať
Visual Basic 2008 Express alebo novší
Zobraziť ďalšie inštrukcie
Nastavenie projektu
1

Vytvorte nový projekt kliknutím na " Súbor " a " New Project " . Až budete vyzvaní , dať mu názov " Scientific Calculator . "

prázdny formulár používateľského rozhrania sa zobrazí na vašej kalkulačky , pridať grafické užívateľské rozhranie ( GUI ) , komponenty k nemu od sada nástrojov na ľavej strane . Budete používať dva typy komponentov : textové pole sa zobrazí výsledky a veľa tlačidiel
2

Presuňte textové pole na hornej časti kalkulátora z panela nástrojov na ľavej strane .. To bude , kde sa objavia čísla , a kde užívateľ bude písať čísla pre neskoršie výpočty .
3

Presuňte tlačidlo do formulára z panela nástrojov . V okne Vlastnosti , nájsť " text " majetok a zmeňte ju na " hriech . " Nájsť vlastnosť názov a zmeňte ju na " sinButton . " Kliknite na tlačidlo " hriech " vo forme a stlačte tlačidlo " Ctrl - C " vytvoriť kópiu tlačidla na klávesnici . Stlačte Ctrl - V kľúčovej 11krát , aby vytvorili 11 nových tlačidiel pre formuláre . Pre každé tlačidlo , zmeniť text tlačidla nasledujúce : cos , tan , pí , exp , sqrt , log , C , + , - , x , = a /, a dať mu meno , ktoré ho popisuje . Napríklad na tlačidlo " /" , zmeňte jej názov vlastnosť " divideButton . "
Robiť programovanie
4

Dvakrát kliknite " tlačidlo hriech " . To vám bude presúvať do zdrojového kódu a vytvorenie metódy pre organizovanie akcií pre manipuláciu hriech udalosti a nabehnutí kurzorom myši v ňom . Vložte nasledujúci tu :

Private Sub Button19_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button19.ClickTextBox1.Text = Math.sin ( TextBox1.Text ) End Sub

5

Double - kliknite na tlačidlo " cos " . Opäť sa to presunie do zdrojového kódu a vytvoriť metódu udalosti . Vložte nasledujúci do neho :

Private Sub Button20_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button20.ClickTextBox1.Text = Math.cos ( TextBox1.Text ) End Sub
praha 6

Double - kliknite na tlačidlo " tan " a vložte nasledujúci , rovnako ako v predchádzajúcich krokoch :

Private Sub Button21_Click ( byval sender ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button21.ClickTextBox1.Text = Math.tan ( TextBox1.Text ) End Sub
7

Double - kliknite na tlačidlo " pi" a vložte nasledujúci : klipart

Private Sub Button22_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button22.ClickTextBox1.Text = Math.PIEnd Sub
8

Double - kliknite na tlačidlo " C " a vložiť :

Private Sub Button23_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button23.ClickTextBox1.Text = " " pamäti = 0End Návrat
Programovanie Pokračovanie

9

vložte nasledujúci na samom vrchole editor zdrojového kódu :

Dim pamäti ako prevádzka DoubleDim As String

To bude držať čísel , ktoré sú potrebné v binárnej operácie a operácie , ktoré majú byť vykonané , ako je napríklad delenie alebo násobenie
10

Dvakrát kliknite na každý z binárnych ovládacích tlačidiel . ( + , - , x , /, a exp ) v poradí a vložte nasledujúci kód :

pamäť = TextBox1.Textoperation = " + "

Vymeňte prevádzkové Text s prevádzkou . Napríklad na tlačidlo " X " , nahradiť " + " s " X "
11

Double - kliknite na tlačidlo " = " a vložte nasledujúci :

Private Sub Button1_Click_1 ( byval sender ako System.Object , byval e ako System.EventArgs ) Kľuky Button1.ClickIf operation.Equals ( " + " ) ThenTextBox1.Text = pamäť + TextBox1.TextElseIf operation.Equals ( " - " ) ThenTextBox1.Text = pamäť - TextBox1.TextElseIf operation.Equals ( " X " ) ThenTextBox1.Text = pamäť * TextBox1.TextElseIf operation.Equals ( " /" ) ThenTextBox1.Text = pamäť /TextBox1 . TextElseIf operation.Equals ( " exp " ) ThenTextBox1.Text = Math.pow ( pamäť , TextBox1.Text ) End If End Sub

12

Dvakrát kliknite " ; log " tlačidlo a vložiť :

Private Sub Button24_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button24.ClickTextBox1.Text = Math.log ( TextBox1.Text ) End Sub
Stránka 13

Double - kliknite na tlačidlo " sqrt " a pasta :

Private Sub Button18_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button18.ClickTextBox1.Text = Math.Sqrt ( TextBox1.Text ) End Sub

• Predchádzajúca strana: Ako nájsť úplný názov počítača pomocou jazyka Visual Basic 
• Ďalšia strana: Ako vytvoriť makro v programe Word , ktorá bude Email vstup užívateľa Box Text