make a calculator yourself on visual basic program

Another essential program is calculator we use it many times in a day. But do you even try to make it yourself I mean calculator ha ha ha ha don’t afraid I will help you to make a nice calculator. I am sure that you will be success to make it yourself. To do this work you will need a visual basic software.


Another essential program is calculator we use it many times in a day. But do you even try to make it yourself I mean calculator ha ha ha ha don’t afraid I will help you to make a nice calculator. I am sure that you will be success to make it yourself. To do this work you will need a visual basic software. So at first install it to your personal computer.  Now open visual basic windows and arrange the code given bottom and enjoy it.  
Don’t copy it go and click download button to get this code.
Option Explicit
Dim Operand1 As Double, Operand2 As Double
Dim Operator As String
Dim ClearDisplay As Boolean
Private Sub ClearBttn_Click()
Display.Caption = ""
End Sub

Private Sub Digits_Click(Index As Integer)
If ClearDisplay Then
Display.Caption = ""
ClearDisplay = False
End If
Display.Caption = Display.Caption + Digits(Index).Caption
End Sub

Private Sub Div_Click()
Operand1 = Val(Display.Caption)
Operator = "/"
Display.Caption = ""
End Sub

Private Sub DotBttn_Click()
If ClearDisplay Then
Display.Caption = ""
ClearDisplay = False
End If
If InStr(Display.Caption, ".") Then
Exit Sub
Else
Display.Caption = Display.Caption + "."
End If
End Sub

Private Sub Equals_Click()
Dim result As Double

On Error GoTo ErrorHandler
Operand2 = Val(Display.Caption)
If Operator = "+" Then result = Operand1 + Operand2
If Operator = "-" Then result = Operand1 – Operand2
If Operator = "*" Then result = Operand1 * Operand2
If Operator = "/" And Operand2 <> "0" Then result = Operand1 / Operand2
Display.Caption = result
ClearDisplay = True
Exit Sub
ErrorHandler:
Dim intMsg As Integer
intMsg = MsgBox("The operation resulted in the following error" _
& vbCrLf & Err.Description, vbOKCancel)

Display.Caption = "ERROR " & intMsg
ClearDisplay = True
End Sub

Private Sub Form_Load()

End Sub

Private Sub Minus_Click()
Operand1 = Val(Display.Caption)
Operator = "-"
Display.Caption = ""
End Sub

Private Sub Over_Click()
If Val(Display.Caption) <> 0 Then Display.Caption = 1 / Val(Display.Caption)
End Sub

Private Sub Plus_Click()
Operand1 = Val(Display.Caption)
Operator = "+"
Display.Caption = ""
End Sub

Private Sub PlusMinus_Click()
Display.Caption = -Val(Display.Caption)
End Sub

Private Sub Times_Click()
Operand1 = Val(Display.Caption)
Operator = "*"
Display.Caption = ""
End Sub
                                          
                                      DOWNLOAD THIS CODE

COMMENTS

BLOGGER: 3
Loading...
Name

add-ons,2,adobe Photoshop,1,advance excel,2,android,1,animated gadget,2,article writer,1,articles,1,author,1,bangla song,1,banglalink,1,bengali ghost story,2,blog design,8,blog template,2,blogdesign,14,blogspot,13,bootable,1,calendar,1,chatting software,1,code,2,color,1,comment box,2,commenter,1,computer,10,converter,1,CSS,2,customize start menu,1,data recovery,1,design,1,desktop fun,1,desktop fun tool,1,desktop toy,2,download,3,drive,1,earn money,4,easy online job,1,easy way to earn,1,editing,1,email,1,email subscription,2,english,3,error reporting,1,excel,3,facebook,3,file management,1,firefox,1,flash,1,free internet,1,free software,3,freelancing,2,friend request,1,fun,3,gadget,5,ghost story,2,gmail,1,google,2,gp modem,1,grameenphone,1,hide,1,html,4,html/java,4,if function,1,installation,1,instant article wizard,1,java,3,keyboard,1,labels gadget,1,language,1,locker,1,logo,1,logo design,1,menu bar,1,microsoft,2,minute workers,1,mobile,2,mobile browsers,1,mobile site,1,mobile software,2,modem,2,mouse effect,1,notepad,1,online earning,2,online photo editor,1,online tools,1,opera,1,paints,1,password,1,password recovery,2,pdf,1,pdf story,1,pendrive,4,photo editor,2,posts and comments counter,1,power on,1,premium software,3,premium template,1,protection,1,ram,1,recent post,1,recover data,1,regedit,4,related posts,3,ringtone,1,robi,1,run commend,2,security,1,shutdown,1,social share,5,software,6,speedup,2,story,1,task bar,1,tips,4,tooltip effect,1,tricks,22,tutorial,4,twitter,1,uc,1,unique articles,1,video,1,visual basic,1,web design,6,website,1,widget,5,win 7,3,win xp,3,windows,4,write protection,1,youtube,1,
ltr
item
COMPUTER TIPS WORLD BD | BLOG DESIGN | GADGETS | HTML: make a calculator yourself on visual basic program
make a calculator yourself on visual basic program
Another essential program is calculator we use it many times in a day. But do you even try to make it yourself I mean calculator ha ha ha ha don’t afraid I will help you to make a nice calculator. I am sure that you will be success to make it yourself. To do this work you will need a visual basic software.
http://3.bp.blogspot.com/-L9Un_SMHcO4/UABdZnPSapI/AAAAAAAAAEU/MnrzkKJ4HoU/s320/Calculator.jpg
http://3.bp.blogspot.com/-L9Un_SMHcO4/UABdZnPSapI/AAAAAAAAAEU/MnrzkKJ4HoU/s72-c/Calculator.jpg
COMPUTER TIPS WORLD BD | BLOG DESIGN | GADGETS | HTML
http://tipsworldbd.blogspot.com/2012/07/make-calculator-yourself-on-visual.html
http://tipsworldbd.blogspot.com/
http://tipsworldbd.blogspot.com/
http://tipsworldbd.blogspot.com/2012/07/make-calculator-yourself-on-visual.html
true
7792348032898020469
UTF-8
Loaded All Posts Not found any posts VIEW ALL Readmore Reply Cancel reply Delete By Home PAGES POSTS View All RECOMMENDED FOR YOU LABEL ARCHIVE SEARCH ALL POSTS Not found any post match with your request Back Home Sunday Monday Tuesday Wednesday Thursday Friday Saturday Sun Mon Tue Wed Thu Fri Sat January February March April May June July August September October November December Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec just now 1 minute ago $$1$$ minutes ago 1 hour ago $$1$$ hours ago Yesterday $$1$$ days ago $$1$$ weeks ago more than 5 weeks ago Followers Follow THIS CONTENT IS PREMIUM Please share to unlock Copy All Code Select All Code All codes were copied to your clipboard Can not copy the codes / texts, please press [CTRL]+[C] (or CMD+C with Mac) to copy