VB.NET Calculator Source Code

How To Create A Calculator In VBNET

VBNET Calculator Source Code


In This VB.NET Tutorial we will See How To Make A Simple Windows Form Calculator Application With Swith  To Do The Basic Operations (+, -, /, *) And Reset To Make Another Calc Using Visual Basic.Net In Visual Studio Editor .

Part 1

                                                                          Part 2

Part 3


Part 4



Project Source Code:

    
Public Class calculator

    ' two numbers to do the calc 
    Dim num1, num2 As Double
     ' check if an operator is clicked for the first time 
    Dim oprClickCount As Integer = 0
     ' check if an operator is clicked befor 
    Dim isOprClick As Boolean = False
     ' check if equal is clicked befor 
    Dim isEqualClick As Boolean = False
     ' get the operator 
    Dim opr As String

    Private Sub calculator_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        ' add click event to all button in the form 
        For Each c As Control In Controls

            ' if the control is button 
            If c.GetType() = GetType(Button) Then
                If Not c.Text.Equals("Reset") Then
                    ' add action to the button 
                    AddHandler c.Click, AddressOf btn_Click
                End If
                

            End If

        Next

    End Sub

    ' create a button click event 
    Private Sub btn_Click(sender As Object, e As EventArgs)

        Dim button As Button = sender

        If Not isOperator(button) Then
            ' if number 
            If isOprClick Then
                ' if an opr is clicked 
                ' get and convert to double textbox text 
                num1 = Double.Parse(TextBox1.Text)
                ' clear textbox text 
                TextBox1.Text = ""
            End If

            If Not TextBox1.Text.Contains(".") Then
                ' if "." not already in the textbox 
                If TextBox1.Text.Equals("0") AndAlso Not button.Text.Equals(".") Then
                    TextBox1.Text = button.Text
                    isOprClick = False
                Else
                    TextBox1.Text += button.Text
                    isOprClick = False
                End If

            ElseIf Not button.Text.Equals(".") Then
                ' if the button is not a "." 
                TextBox1.Text += button.Text
                isOprClick = False
            End If

        Else
            ' if operator 
            If oprClickCount = 0 Then
                ' if we click on an operator for the first time 
                oprClickCount += 1
                num1 = Double.Parse(TextBox1.Text)
                opr = button.Text
                isOprClick = True

            Else
                If Not button.Text.Equals("=") Then
                    ' if the button is not "=" 
                    If Not isEqualClick Then
                        ' if "=" is not clicked befor 
                        num2 = Double.Parse(TextBox1.Text)
                        TextBox1.Text = Convert.ToString(calc(opr, num1, num2))
                        num2 = Double.Parse(TextBox1.Text)
                        opr = button.Text
                        isOprClick = True
                        isEqualClick = False

                    Else

                        isEqualClick = False
                        opr = button.Text

                    End If

                Else

                    num2 = Double.Parse(TextBox1.Text)
                    TextBox1.Text = Convert.ToString(calc(opr, num1, num2))
                    num1 = Double.Parse(TextBox1.Text)                    
                    isOprClick = True
                    isEqualClick = True

                End If

            End If

        End If


    End Sub

    ' create a function to check if the button is a number or an operator 
    Function isOperator(ByVal btn As Button) As Boolean

        Dim btnText As String
        btnText = btn.Text

        If (btnText.Equals("+") Or btnText.Equals("-") Or btnText.Equals("/") Or
            btnText.Equals("X") Or btnText.Equals("=")) Then
            Return True
        Else
            Return False
        End If

    End Function

    ' create a function to do the calc 
    Function calc(ByVal op As String, ByVal n1 As Double, ByVal n2 As Double) As Double

        Dim result As Double
        result = 0

        Select Case op

            Case "+"
                result = n1 + n2
            Case "-"
                result = n1 - n2
            Case "X"
                result = n1 * n2
            Case "/"
                If n2 <> 0 Then
                    result = n1 / n2
                End If

        End Select

        Return result

    End Function

    Private Sub ButtonReset_Click(sender As Object, e As EventArgs) Handles ButtonReset.Click

        num1 = 0
        num2 = 0
        opr = ""
        oprClickCount = 0
        isOprClick = False
        isEqualClick = False
        TextBox1.Text = "0"

    End Sub
End Class






Download Source Code








Java Transfer JTree Nodes To JTable

How To Set JTree Nodes Values Into JTable Rows Using Java NetBeans

Transfer JTree Nodes To JTable Using Java



In this Java Tutorial we will see How To Get JTree Nodes Data And Set It Into JTable Rows Using For Loop + DefaultMutableTreeNode + DefaultTreeModel On Button Click Event In Java NetBeans .




Project Source Code:

private void jButtonToJTableActionPerformed(java.awt.event.ActionEvent evt) {                                                
        // get jtree model
        DefaultTreeModel treeModel = (DefaultTreeModel) jTree1.getModel();
        // get jtable model
        DefaultTableModel tableModel = (DefaultTableModel) jTable1.getModel();
        // get jtree root
        DefaultMutableTreeNode root = (DefaultMutableTreeNode) treeModel.getRoot();

        String colName;
        
        for(int i = 0; i < treeModel.getChildCount(root); i++)
        {
            DefaultMutableTreeNode node1 = (DefaultMutableTreeNode) root.getChildAt(i);
            Object row[] = new Object[node1.getChildCount()];
            
            colName = node1.getUserObject().toString();
            
            for(int j = 0; j < node1.getChildCount(); j++){
               DefaultMutableTreeNode node2 = (DefaultMutableTreeNode) node1.getChildAt(j);
               row[j] = node2.getUserObject();
            }
            tableModel.addColumn(colName,row);
        }
        
    } 




Java Transfer JTable Data To JTree

How To Set JTable Values Into JTree Nodes Using Java NetBeans

java jtable data to jtree



In this Java Tutorial we will see How To Get JTable Rows Data And Set It Into JTree Node Using For Loop + DefaultMutableTreeNode + DefaultTreeModel On Button Click Event In Java NetBeans .




Project Source Code:

private void jButtonToJTreeActionPerformed(java.awt.event.ActionEvent evt) {                                               
       
        // create jtree root
        DefaultMutableTreeNode root = new DefaultMutableTreeNode("Table Data");
        
        // rows
        for(int i = 0; i < jTable1.getRowCount(); i++){
            
            int rowIndex = i+1;
            
            DefaultMutableTreeNode row = new DefaultMutableTreeNode("Row "+ rowIndex);
            
           // columns 
            for(int c = 0; c < jTable1.getColumnCount(); c++)
            {
                DefaultMutableTreeNode node = new DefaultMutableTreeNode(jTable1.getValueAt(i, c));
                // add data to the row
                row.add(node);
            }
            // add the row to the root
            root.add(row);
        }
        DefaultTreeModel model = new DefaultTreeModel(root);
        jTree1.setModel(model); 
    } 


OutPut:

Transfer JTable Rows Data To JTree In Java




Java Populate JTable From Multidimensional Array

How To Fill A JTable With Multidimensional Array Data Using Java NetBeans

Fill JTable From Multidimensional Array Using Java



In this Java Tutorial we will see How To Populate A JTable From A 2D Array Values Using For Loop In Java NetBeans .




Project Source Code:


public void _2DArrayToTable()
    {
    
        String[][] data = {
                             {"A1","B1","C1","D1"},
                             {"A2","B2","C2","D2"},
                             {"A3","B3","C3","D3"},
                             {"A4","B4","C4","D4"},
                             {"A5","B5","C5","D5"},
                             {"A6","B6","C6","D6"},
                             {"A7","B7","C7","D7"},
                             {"A8","B8","C8","D8"},
                             {"A9","B9","C9","D9"},
                             {"A10","B10","C10","D10"} 
                          };
        
        DefaultTableModel model = (DefaultTableModel)jTable1.getModel();
        
//        for(int i = 0; i < data.length; i++)
//        {
//            String[] row = new String[data[i].length];
//            
//            for(int j = 0; j < data[i].length; j++)
//            {
//                row[j] = data[i][j];
//            }
//            
//            model.addRow(row);
//        }
        
         for(String[] row : data){
             model.addRow(row);
         }
        
    } 


OutPut:

Populate JTable Using 2D Array In Java




Java Display Multidimensional Array Content

How To Display 2D Array Data Using Java NetBeans

Display Multidimensional Array Vaues Using Java



In this Java Tutorial we will see How To Display Values From A Multidimensional Array Into A jTextArea Using For Loop In Java NetBeans .




Project Source Code:


public void showData(){
        
        String[][] data = {
                             {"A1","B1","C1","D1","E","F","G"},
                             {"A2","B2","C2","D2","E","F","G"},
                             {"A3","B3","C3","D3","E","F","G"},
                             {"A4","B4","C4","D4"},
                             {"A5","B5","C5","D5"},
                             {"A6","B6","C6","D6"},
                             {"A7","B7","C7","D7"},
                          };
        String txt = "";
        for(int i = 0; i < data.length; i++){
            for(int c = 0; c < data[i].length; c++){
                //jTextArea1.setText(jTextArea1.getText() + "");
                txt = txt + data[i][c] + " , ";
            }
            txt = txt + "\n";
        }
        
        jTextArea1.setText(txt);
        
    }
    


OutPut:

Show 2D Array Values Using Java