Visual Basic é uma linguagem de programação poderosa criada para a Microsoft para tornar mais fácil para os usuários sem treinamento programação de computadores para desenvolver software para computadores com Windows. Criando uma calculadora científica fornece uma visão geral de como desenvolver software para o Visual Basic. Coisas que você precisa
Visual Basic 2008 Express ou mais tarde
Show Mais instruções
Configurando o projeto
1

Crie um novo projeto , clicando em " Arquivo" e "New Project ". Quando solicitado , dar-lhe o nome de " calculadora científica . "

Uma forma de interface de usuário em branco será exibido para a sua calculadora , adicione interface gráfica do usuário (GUI) componentes para ele a partir caixa de ferramentas à sua esquerda. Você vai usar dois tipos de componentes: uma caixa de texto para exibir os resultados e um monte de botões
2

Arraste uma caixa de texto para o topo da sua calculadora da caixa de ferramentas do lado esquerdo. . Este será onde os números aparecem e onde o usuário irá
digitar números para a computação mais tarde.
3

Arraste um botão em sua forma a partir da caixa de ferramentas. Na caixa de propriedades , localize a propriedade "text" e mude para "pecado". Encontre a propriedade nome e mude -o para " sinButton . " Clique no botão "pecado" na forma e pressione " Ctrl- C "para fazer uma cópia do botão no seu teclado. Pressione Ctrl -V chave 11 vezes para criar os novos botões 11 para a sua forma . Para cada botão , alterar o texto do botão com o seguinte: cos , tan, pi, exp, sqrt , log , C, +, - , X, = e /, e dar-lhe um nome que descreve. Por exemplo, para o botão "/" , altere a propriedade nome para " divideButton ".
Fazer a programação
4

Clique duas vezes no " ; botão pecado " . Isto irá levá-lo para o código-fonte e criar um método de evento para manipular eventos de pecado e colocar o cursor dentro dele. Cole o seguinte lá:

Private Sub Button19_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button19.ClickTextBox1.Text = Math.Sin ( TextBox1.Text ) End Sub

5

Dê um duplo clique no botão " cos " . Mais uma vez , isso vai movê-lo para o código-fonte e criar um método de evento . Cole o seguinte para ele :

Private Sub Button20_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button20.ClickTextBox1.Text = Math.cos ( TextBox1.Text ) End Sub

6

Dê um duplo clique no botão " bronzeado " e cole o seguinte, como nas etapas anteriores :

Private Sub Button21_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button21.ClickTextBox1.Text = Math.tan ( TextBox1.Text ) End Sub
7

Dê um duplo clique no botão "pi" e cole o seguinte : Private Sub

Button22_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button22.ClickTextBox1.Text = Math.PIEnd Sub
8

Dê um duplo clique no botão "C" e colar:

Private Sub Button23_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button23.ClickTextBox1.Text = "" de memória = 0End Sub
Programação Continuação

9

cole o seguinte no topo do editor de código-fonte :

memória Dim operação DoubleDim as String

Isto irá manter os números que são necessários em binário operações e da operação a ser realizada , como a divisão ou multiplicação
10

clique duas vezes em cada um dos botões de operação binários. ( +, - , X, /, e exp) , por sua vez e cole o código seguinte código:

memória = TextBox1.Textoperation = "+ "

Substituir o texto operação com a operação. Por exemplo, para o botão "X" , substitua "+" com "X"
11

Dê um duplo clique no botão " =" e cole o seguinte :

Private Sub Button1_Click_1 (sender System.Object , ByVal e As System.EventArgs ) Handles operation.Equals Button1.ClickIf ( "+ ") ThenTextBox1.Text = Memória + TextBox1.TextElseIf operation.Equals ( "-") ThenTextBox1.Text = Memória - operation.Equals TextBox1.TextElseIf ( "X") ThenTextBox1.Text = memória * operation.Equals TextBox1.TextElseIf ( " /") ThenTextBox1.Text = Memória /TextBox1 . operation.Equals TextElseIf ( "VAL" ) ThenTextBox1.Text = Math.Pow (memória, TextBox1.Text ) End If End Sub

12

clique duas vezes no " , botão e colar log " :

Private Sub Button24_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button24.ClickTextBox1.Text = Math.Log ( TextBox1.Text ) End Sub < br >
13

Dê um duplo clique no botão " sqrt " e colar:

Private Sub Button18_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button18.ClickTextBox1.Text = Math.Sqrt ( TextBox1.Text ) End Sub