C#.NET-1
C#.NET-1
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace Conditional3
{
class Program
{
static void Main(string[] args)
{
int i = 1;
Console.WriteLine("1 to 10 Numbers");
while(i<=10)
{
Console.WriteLine(i);
i++;
}
Console.ReadLine();
}
}
}
********************OUTPUT********************
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace Conditional4
{
class Program
{
static void Main(string[] args)
{
int n, i;
Console.WriteLine("Enter the number");
n = Convert.ToInt32(Console.ReadLine());
********************OUTPUT********************
using System;
class Test
{
static public void Main()
{
string x = "Shree medha Degree";
string y = "BCA";
if (x == y)
{
Console.WriteLine("Both strings are equal..!!");
}
else
{
Console.WriteLine("Both strings are not equal..!!");
}
Console.ReadLine();
}
}
********************OUTPUT********************
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace Conditional5
{
class Program
{
static void Main(string[] args)
{
int a, b, c;
char op;
Console.WriteLine("Enter the values of A and B");
a = Convert.ToInt32(Console.ReadLine());
b = Convert.ToInt32(Console.ReadLine());
Console.WriteLine(1.Addition(+)\n2.Subtraction()\n3.Multiplication(*)\n4.Divison(/)\
n5.Modulus(%)");
Console.WriteLine("Enter the operation");
op = Convert.ToChar(Console.ReadLine());
switch (op)
{
case '+': c = a + b;
Console.WriteLine("Addition =" + c);
break;
case '-': c = a - b;
Console.WriteLine("Subtraction =" + c);
break;
case '*': c = a * b;
Console.WriteLine("Multiplication =" + c);
break;
case '/': c = a / b;
Console.WriteLine("Division =" + c);
break;
case '%': c = a % b;
Console.WriteLine("Mod =" + c);
break;
default: Console.WriteLine("you entered wrong operator");
break;
}
Console.ReadLine();
}
}
}
using System;
using System.Windows.Forms;
namespace WindowsControls
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
********************OUTPUT********************
********************OUTPUT********************
End Sub
End Sub
End Sub
End Sub
End Class
********************OUTPUT********************
End Sub
Form2.vb :
Public Class Form2
End Class
using System;
public class Student
{
String name;
String course;
int age;
String address;
using System;
public class Address
{
public string addressLine, city, state;
public Address(string addressLine, string city, string state)
{
this.addressLine = addressLine;
this.city = city;
this.state = state;
}
}
public class Employee
{
public int id;
public string name;
public Address address;//Employee HAS-A Address
public Employee(int id, string name, Address address)
{
this.id = id;
this.name = name;
this.address = address;
}
public void display()
{
Console.WriteLine(id + " " + name+ "\n " +address.addressLine +"\n"+address.city
+"\n"+address.state);
}
}
public class TestAggregation
{
public static void Main(string[] args)
{
Address a1 = new Address("Fort, Main Road", "Ballari", "Karnataka");
Employee e1 = new Employee(1, "Girirajshekar", a1);
e1.display();
Console.ReadLine();
}
}
using System;
public class Shape
{
public virtual void draw()
{
Console.WriteLine("drawing...");
}
}
public class Rectangle : Shape
{
public override void draw()
{
Console.WriteLine("drawing rectangle...");
}
}
public class Circle : Shape
{
public override void draw()
{
Console.WriteLine("drawing circle...");
}
}
public class TestPolymorphism
{
public static void Main()
{
Shape s;
s = new Shape();
s.draw();
s = new Rectangle();
s.draw();
s = new Circle();
s.draw();
Console.ReadLine();
}
}
********************OUTPUT********************
Connection String:
Select Visual Basic Left side Panel and Right Side Windows Forms App
Add 4 Buttons from tools Change ‘Text ‘ Properties Buttons as per design.
depositfrm.Show()
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Dim withdrawfrm As New Withdraw
withdrawfrm.Show()
End Sub
In Solution Explorer Select Project Bank Right Click >Add New Windows Forms 4
times > Named Create, Deposit,Withdraw,Balance
Write Code:
Imports
System.Data.SqlClient
Public Class Create
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim constring As String = "Data Source=(localdb)\MSSQLLocalDB;Initial
Catalog=Csharplab;Integrated Security=True;Connect
Timeout=30;Encrypt=False;TrustServerCertificate=False;ApplicationIntent=Read
Write;MultiSubnetFailover=False"
Dim con As New SqlConnection() con.ConnectionString =
constring
Dim qry As String = "Insert into [dbo].Bank values('" + txtName.Text + "','" +
txtAccno.Text + "','" + txtAccType.Text + "'," + txtAmount.Text + "," + txtPin.Text + ")"
con.Open()
Textbox1(name)- txtAccNo
Textbox2 (name)- txtAmount
Button (Text) – Deposit
Write Code:
Imports System.Data.SqlClient
Public Class Deposit
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
End Class
Design Withdraw form as specified above Change Textbox Properties and Label
Properties
Imports System.Data.SqlClient
Public Class Withdraw
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim
constring As String = "Data Source=(localdb)\MSSQLLocalDB;Initial
Catalog=Csharplab;Integrated Security=True;Connect
Timeout=30;Encrypt=False;TrustServerCertificate=False;ApplicationIntent=ReadWrite;
Mult iSubnetFailover=False"
Dim con As New SqlConnection() con.ConnectionString = constring
Dim qry As String = "Update [dbo].bank set amount=amount-" + txtAmount.Text + "
where Accno='" + txtAccNo.Text + "' and Pin=" + txtPin.Text + ""
con.Open()
Dim cmd As New SqlCommand(qry, con)
Dim res As Integer
res = cmd.ExecuteNonQuery() If res = 1 Then
MsgBox("Amount Withdrwan successfully!")
End If
con.Close()
End Sub
End Class
Write Code:
Imports System.Data.SqlClient
Public Class Balance
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim
constring As String = "Data Source=(localdb)\MSSQLLocalDB;Initial
Catalog=Csharplab;Integrated Security=True;Connect
Timeout=30;Encrypt=False;TrustServerCertificate=False;ApplicationIntent=ReadWrite;
Mult iSubnetFailover=False"
Dim con As New SqlConnection() con.ConnectionString = constring
Dim qry As String = "Select amount from [dbo].bank where Accno='" + txtAccNo.Text +
"' and Pin=" + txtPin.Text + ""
con.Open()
Dim cmd As New SqlCommand(qry, con)
Dim balance As Object balance = cmd.ExecuteScalar()
MsgBox("Available Balance=" + balance.ToString()) con.Close()
End Sub
End Class