Project
Project
OF
CONTENTS
VB.NET
Programming........................................2
.NET FRAMEWORK............................................3
CLR (Common Language Runtime).........................................5
MSIL (Microsoft Intermediate Language)..................7
Common Language Specification..............................7
.NET Framework Class Library.................................................8
.NET Assemblies......................................................9
WITH
Page 1 of 27
Page 2 of 27
V B .Net Programming
Function Overloading
Multi-Threading
Structured Error Handling
Creating NT Services
VB.NET not backward compatible with VB 6.
VB.Net ds ckjs esa foLrkj ls tkuus ls igys ge dqN
.Net Framework
.Net Framework ekbkslkWV ds vuqlkj ,d u;k
izksxzkejkas
dks
,slh
lqfo/kk;as
gSA
VB.Net dk mi;ksx djrs le; vki fdlh Hkh nwljh
Page 6 of 27
nsrk gSA .Net esa cukbZ xbZ executabls dks CLR vyx ls
invoke djus ds ctk; Lo;a gh invoke djrk gSA
CLR Architecture
CLR ds 3 eq[; vax gSa%
1. Common Type System
2. MSIL
3. Managed Apps
Page 7 of 27
6 Type Safety: One language should not cross with other language's data type.
Page 8 of 27
b.
7 Garbage Collection: Extra codes that are not going to execute on CPU.
8 Common Type System: .Net framework languages share same data types.
Page 9 of 27
ldrh gSA Metadata dk ms'; code dks .Net Framework dks describe
djuk gSA
Common Language Specification
Page 10 of 27
gSA Standard GUI components tSls buttons, textboxes, menus, scrollbars, etc.
vkfn event handling ds lkFk QkWeZ esa Mkys tk ldrs
gSaA blds eq[; components,
Base Class: Networking, security, I/O, files, etc. Data and XML Classes
Web Services/UI
Windows UI gSA
.NET Assemblies
tc .Net, Codes dks ;wfuV esa xzqi djrh gS] rks bls
Assemblies dgk tkrk gSA Assembly esa ,d flaxy Qkby
Page 14 of 27
Page 15 of 27
CPU independent instructions set nsrk gSA ;s instruction set CPU }kjk
execute fd;s tkrs gSaA
Page 16 of 27
Page 17 of 27
Solution Explorer
Tabs Bar
Working Area
Properties
Error List
Status Bar
xsd
Page 18 of 27
Page 20 of 27
gSa]
mls
properties
}kjk
uke
(LCD)
nsrs
gSaA
Page 21 of 27
Page 22 of 27
As System.Object, ByVal e As
As System.Object, ByVal e As
As System.Object, ByVal e As
As System.Object, ByVal e As
As System.Object, ByVal e As
Page 23 of 27
End If
End Sub
Private Sub n8_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles n8.Click
If LCD.Text = "0" Then
LCD.Text = "8"
ElseIf LCD.Text = temp Then
LCD.Text = "8"
ElseIf LCD.Text = result Then
LCD.Text = "8"
Else
LCD.Text = LCD.Text & "8"
End If
End Sub
Private Sub n9_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles n9.Click
If LCD.Text = "0" Then
LCD.Text = "9"
ElseIf LCD.Text = temp Then
LCD.Text = "9"
ElseIf LCD.Text = result Then
LCD.Text = "9"
Else
LCD.Text = LCD.Text & "9"
End If
End Sub
Private Sub n0_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles n0.Click
If LCD.Text = "0" Then
LCD.Text = "0"
ElseIf LCD.Text = temp Then
LCD.Text = "0"
ElseIf LCD.Text = result Then
LCD.Text = "0"
Else
LCD.Text = LCD.Text & "0"
End If
End Sub
Private Sub bc_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles bc.Click
If LCD.Text = "0" Then
LCD.Text = "0"
ElseIf LCD.Text = temp Then
LCD.Text = "0"
Else
LCD.Text = LCD.Text & "00"
End If
End Sub
Private Sub bac_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles bac.Click
LCD.Text = "0"
End Sub
Private Sub badd_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles badd.Click
FirstNumber = LCD.Text
temp = FirstNumber
Operation = "+"
End Sub
Private Sub bsub_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles bsub.Click
FirstNumber = LCD.Text
Page 24 of 27
temp = FirstNumber
Operation = "-"
End Sub
Private Sub bmult_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles bmult.Click
FirstNumber = LCD.Text
temp = FirstNumber
Operation = "*"
End Sub
Private Sub bdiv_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles bdiv.Click
FirstNumber = LCD.Text
temp = FirstNumber
Operation = "/"
End Sub
Private Sub Calculator_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
End Sub
Private Sub babout_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles babout.Click
AboutBox1.Show()
End Sub
End Class
Page 25 of 27
1. Splash Screen
3.
4. Aboutbox1 (Name : About Calculator)
5.
Page 27 of 27