ComputerHeaven: 2011

Saturday, January 15, 2011

Kalpana Chawla

Be A Everest for all and Don't be Ever At Rest
Be A Candle In your Life To Lighten The World

Seminar Topic

3D Passwords Cordless Telephone

Softwear Mouse Intelligent Wearables

WiBro Space Theatres

XForms Slackware

Cyber crime and Instruction Detection System Signcryption

Light Tree Packet Telephony

Wearable Computers Brain Gate

Seminar Websites:
http://latestseminartopic.blogspot.com

Public Class Form1
Dim sum As Double = 0
Dim operand As String = ""
Dim value1 As Double = 0
Dim value2 As Double = 0
Private Sub btnOne_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOne.Click
txtBox1.Text += "1"
End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtBox1.TextChanged

End Sub

Private Sub btnTwo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTwo.Click
txtBox1.Text += "2"
End Sub

Private Sub btnThree_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnThree.Click
txtBox1.Text += "3"
End Sub

Private Sub btnFour_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFour.Click
txtBox1.Text += "4"
End Sub

Private Sub btnFive_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFive.Click
txtBox1.Text += "5"
End Sub

Private Sub btnSix_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSix.Click
txtBox1.Text += "6"
End Sub

Private Sub btnSeven_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSeven.Click
txtBox1.Text += "7"
End Sub

Private Sub btnEight_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEight.Click
txtBox1.Text += "8"
End Sub

Private Sub btnNine_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnNine.Click
txtBox1.Text += "9"
End Sub

Private Sub btnZero_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnZero.Click
txtBox1.Text += "0"
End Sub

Private Sub btnDot_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDot.Click
Dim btnDot As Boolean = False
If txtBox1.Text.IndexOf(".") >= 0 Then btnDot = True
If btnDot = False Then txtBox1.Text += "."
End Sub

Private Sub btnEquals_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEquals.Click
value2 = Val(txtBox1.Text)
Select Case operand
Case Is = "+"
txtBox1.Text = (value1 + value2).ToString
Case Is = "-"
txtBox1.Text = (value1 - value2).ToString
Case Is = "X"
txtBox1.Text = (value1 * value2).ToString
Case Is = "/"
If value2 <> 0 Then
txtBox1.Text = (value1 / value2).ToString
End If
End Select
End Sub

Private Sub btnPlus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPlus.Click
operand = "+"
If checkInput() = True Then value1 = CDbl(txtBox1.Text)
txtBox1.Clear()

End Sub

Private Sub btnMinus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMinus.Click
operand = "-"
If checkInput() = True Then value1 = CDbl(txtBox1.Text)
txtBox1.Clear()

End Sub

Private Sub btnTimes_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTimes.Click
operand = "X"
If checkInput() = True Then value1 = CDbl(txtBox1.Text)
txtBox1.Clear()

End Sub

Private Sub btnDivide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDivide.Click
operand = "/"
If checkInput() = True Then value1 = CDbl(txtBox1.Text)
txtBox1.Clear()

End Sub

Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
txtBox1.Clear()
sum = 0
End Sub
Private Function checkInput() As Boolean
If IsNumeric(txtBox1.Text) = True And txtBox1.Text <> "" And txtBox1.Text <> Nothing Then
Return True
Else
Return False

End If
End Function

Important Websites

Interview Question and Answers

1)Link1

Puzzles Website

2)Link2

Animation and Website

1)Link1

2)Link2

3)Link3

Job Related Website

1)Link1
2)Link2
3)Link3
4)Link4
5)Link5
6)Link6
7)Link7
8)Link8

Other Website:
Link1
Link2
Link3
Link4
Link5

General Knowledge

Important Days:

January 15-->Army Day

Sept 5-->Teachers Day

Aug 29-->National Sports Day

Nov 14-->Children's Day

Dec 23-->Farmer's Day

Apr 22-->Earth Day

Mar 8-->International Women's Day

Jan 1-->Global Family Day

Jan 12-->National Youth Day

Important Scientists:

Aeroplane-->Orville and Wright

Ball-point Pen-->L. and G.Brio

Bicycle-->Macmillan

Chloroform-->Simpson

Electric Lamp-->Thomas Alva Edison.

Foundain Pen-->L.E.Waterman.

Penicillin-->Sir Alexander Flemming.

Refrigerator-->J.Perkins.

Safety Pin-->William Hunt.

Telephone-->Graham Bell.

WashingMachine-->HurleyMachine Co.

Thermometer-->Galileo Galilei

India:

No State Chief MinisterName

1 Andhra Pradesh N. Kiran Kumar Reddy

2 Arunachal Pradesh Dorjee Khandu

3 Assam Tarun Kumar Gogoi

4 Bihar Nitish Kumar

5 Chhattisgarh Raman Singh

6 Delhi Sheila Dikshit

7 Goa Digambar Kamat

8 Gujarat Narendra Modi

9 Haryana Bhupinder Singh Hooda

10 Himachal Pradesh Prem Kumar Dhumal

11 Jammu & Kashmir Omar Abdullah

12 Jharkhand Arjun Munda

13 Karnataka B. S. Yeddyurappa

15 Madhya Pradesh Shivraj Singh Chauhan

16 Maharashtra Prithviraj Chavan

17 Manipur Okram Ibobi Singh

18 Meghalaya Mukul Sangma

19 Mizoram Lal Thanhawla

20 Nagaland Neiphiu Rio

21 Odisha Naveen Patnaik

22 Pondicherry V. Vaithilingam

23 Punjab Parkash Singh Badal

24 Rajasthan Ashok Gehlot

25 Sikkim Pawan Kumar Chamling

26 Tamil Nadu M. Karunanidhi

27 Tripura Manik Sarkar

28 Uttarakhand Ramesh Pokhriyal

29 Uttar Pradesh Mayawati

30 West Bengal Buddhadeb Bhattacharjee

Top Ten Software Companies

List Of Company:

TCS

Infosys

Wipro
Satyam

HCL Technologies

Patni Computer Systems Ltd.

i-flex Solutions

Tech.Mahindra

Perot Systems TSI Ltd.

L & T Infotech

1.TCS:

TCS was Founded in the Year 1968.

S.Ramadorai is the CEO and MD of TCS

2.Infosys:

INFOSYS was founded in the Year 1981.

Kris GopalaKrishnan and NR Narayana Murthy.

3.Wipro:

Mr.Azim Premji is the Chairman of Wipro Company.

4.Satyam Computer Services:

Satyam was founded in the Year 1987.
Ramalinga Raju is the Chairman of Company.

5.HCL Technologies:

HCL was founded in the year 1976.

Shiv-nadar is the Chairman of the Company.

6. Patni Computer Systems Ltd:

Patni was founded in the Year 18 Sep 2003.

Narendra K Patni is the Chairman of the Company.

7.i-flex Solutions:

Rajesh Hukku is the Chairman of i-flex Company.

8. Tech Mahindra:

Anand Mahindra is the Chairman of Tech Mahindra.

9.Perot System TSI Ltd:

10.L & T Infotech(Larsen and Toubro Ltd):

This Company was Founded in the Year 1st April 1997.

A M Naik is the Chairman of the Company.

Details of company
Additional Details

Other Companies:

Dell---->Michael s Dell

Intel---->Craig Barrette

Microsoft Corporation--->BillGates

Ingaram Micro Inc--->Dale Laurance

Friday, January 14, 2011

Others BlogSpots

Muralidharan Sir

Ellakiya

Saravanan
Bala

Six Ways To Happy

Free u'r Heart;From Hate.

Free u'r Mind;From Worry.

Live Simple.

Expect Less.

Always Smile.

Don't see What Do Others.

Be Confident In u'r Way.