Question

Need help!!! I need two programs that use one common database.. One program using a Visual Basic windows form using textboxes for data input (first name, last name, phone, email) and it should save the info into an SQL database when a save button is clicked. Second program using a C# windows form that has a drop down menu with all the names that have been saved into the database, when one name is clicked all their information should pop up in a message box.

Answer 1

For Database, SQL Server Database has been used

1. Open sql server management studio, Select Master database , Open a new query window
2. First A database has been created by command
USE TestDB
3. Create the table by given field name

USE TestDB
CREATE TABLE Student
(
     
   first_name varchar (50) NULL,
   last_name varchar (50) NULL,
   phone varchar (50) NULL,
   email varchar (50) NULL
)

  

4. Then using Visual basic win form a project (DBAdd) created

New Project ► Recent Sort by: Default Search (Ctrl+E) Installed Type: Visual Basic A project for creating an application wit Windows user interface ► Visual C# Visual Basic Windows Universal Windows Desktop ► Web Office/SharePoint .NET Core .NET Standard Cloud Extensibility Test WCF Workflow Visual C++ Visual F# WPF App (.NET Framework) VE Windows Forms App (.NET... G Console App (.NET Framework) 5. Class Library (.NET Framework) o Windows Service (.NET Framework) Empty Project (.NET Framework) A WPF Browser App (.NET Framework) i WPF User Control Library (.NET... 1. WPF Custom Control Library (.NET... Windows Forms Control Library... Not finding what you are looking for? Open Visual Studio Installer Name DBAdd

Form1.vb Form1.vb [Design] + X - Form1 o x First Name Last Name Phone Email Submit

Name of each text Field is changed by property window

First Name : txtfname

Last name : txtlname

Phone :txtphone

Mail id : txtmail

Name of Button : btnSubmit

CODE

Imports System.Data
Imports System.Data.SqlClient
Public Class Form1

'' Button Add Code
Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.Click

'' Exception handeling , if any Exception Occurs
Try
''Connection string for sql server
'' Server= SQL serve Instance Name
'' Database = Data base Name
'' User Id= Sql server User id
'' Password = SQL server login password

Dim connectionString As String = "Server=AKSHAYA\SQL12;Database=TestDB;User Id=sa;Password=Sa1234#"

Using cn As New SqlConnection(connectionString)
cn.Open()
Dim cmd As New SqlCommand()
''INSERT COMMAND WITH PARAMETER
cmd.CommandText = "INSERT INTO Student(first_name, last_name, phone, email) VALUES(@first_name, @last_name, @phone, @email)"

'' DEFINE PARAMETER FOR first_name
Dim param1 As New SqlParameter()
param1.ParameterName = "@first_name"
param1.Value = txtfname.Text.Trim() '' get Data from Field , Trim eliminates extra space
cmd.Parameters.Add(param1)

'' DEFINE PARAMETER FOR last_name
Dim param2 As New SqlParameter()
param2.ParameterName = "@last_name"
param2.Value = txtlname.Text.Trim() '' get Data from Field
cmd.Parameters.Add(param2)

'' DEFINE PARAMETER FOR phone
Dim param3 As New SqlParameter()
param3.ParameterName = "@phone"
param3.Value = txtphone.Text.Trim() '' get Data from Field
cmd.Parameters.Add(param3)

'' DEFINE PARAMETER FOR email
Dim param4 As New SqlParameter()
param4.ParameterName = "@email"
param4.Value = txtmail.Text.Trim() '' get Data from Field
cmd.Parameters.Add(param4)

cmd.Connection = cn '' Specify Connection object
cmd.ExecuteNonQuery() ''Execute the insertion query
cn.Close()
'' show success message
MessageBox.Show("Data insert success")
End Using

Catch ex As Exception '' when Exception occurs
MessageBox.Show(ex.Message.ToString)
End Try
End Sub
End Class

SCREEN SHOT CODE

Imports System.Data Imports System.Data.SqlClient 1 reference Public Class Form1 " Button Add Code O references Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd. Click "Exception handeling, if any Exception Occurs Try Connection string for sql server "Server= SQL serve Instance Name "Database = Data base Name "User Id= Sql server User id "Password = SQL server login password Dim connectionString As String = "Server=- 6 2 12;Database=TestDB;User Id=sa; Password=5a1234#" Using cn As New SqlConnection(connectionString) cn.Open() Dim cmd As New SqlCommand() "'INSERT COMMAND WITH PARAMETER cmd.CommandText = "INSERT INTO Student (first_name, last_name, phone, email) VALUES(@first_name, @last_name, @phone, @email)" DEFINE PARAMETER FOR first_name Dim param1 As New SqlParameter() param1. ParameterName = "@first_name" param1.Value = txtfname.Text. Trim) cmd.Parameters.Add(param1) "get Data from Field, Trim eliminates extra space

DEFINE PARAMETER FOR last_name Dim param2 As New SqlParameter() param2. ParameterName = "@last_name" param2.Value = txtlname.Text.Trim() "get Data from Field cmd.Parameters.Add(param2) "DEFINE PARAMETER FOR phone Dim param3 As New SqlParameter() param3. ParameterName = "@phone" param3.Value = txtphone. Text.Trim() "get Data from Field cmd.Parameters.Add(param3) "DEFINE PARAMETER FOR email Dim param4 As New SqlParameter() param4.ParameterName = "@email" param4.Value = txtmail.Text.Trim( "get Data from Field cmd.Parameters.Add(param4) cmd.Connection = cn "Specify Connection object cmd.ExecuteNonQuery() ''Execute the insertion query cn.Close() " Show success message MessageBox.Show("Data insert success") End Using Catch ex As Exception " when Exception occurs MessageBox.Show(ex.Message.ToString) End Try End Sub End Class

5. To fetch data from table using C# winform a project (DBGet) created

New Project ? x Recent Sort by: Default Search (Ctrl+E) Installed 03 Visual C# Get Started Windows Universal Windows Desktop ► Web Office/SharePoint .NET Core .NET Standard Android Apple TV Apple Watch Cloud Cross-Platform Extensibility iOS Extensions DLL ---O.IN. Not finding what you are looking for? Open Visual Studio Installer C# 5 CV E.!! El Blank App (Universal Windows) Mobile App (Xamarin.Forms) WPF App (.NET Framework) Windows Forms App (.NET.... Console App (.NET Core) Console App (.NET Framework) Class Library (.NET Standard) Class Library (.NET Framework) ASP.NET Core Web Application ASP.NET Web Application (.NET... Shared Project Class Library (Legacy Portable) Class Library (Universal Windows) El Windows Runtime Componen Type: Visual C# of WCF Service Application A project for creating an application with a Windows Forms user interface ) Unit Test App (Universal Winde < Azure Functions Coded UI Test Project (Universi Xamarin.UlTest Cross-Platform x Excel 2013 and 2016 VSTO Wor # O i W x O ASP.NET Reports Web Site Outlook 2013 and 2016 VSTO A Reports Application Word 2013 and 2016 VSTO Doc Excel 2010 VSTO Workbook Outlook 2010 VSTO Add-in 9.!! El Name: DBGet

The form is designed

Form1.cs Form1.cs (Design) + X Form1 Dox Name

The combobox id change to cmbName

CODE

using System;
using System.Data;
using System.Windows.Forms;
using System.Data.SqlClient;

namespace DBGet
{
public partial class Form1 : Form
{
//Specifying connection path to Database
string connectionString = "Server=AKSHAYA\\SQL12;Database=TestDB;User Id=sa;Password=Sa1234#";
public Form1()
{
InitializeComponent();
}

private void Form1_Load(object sender, EventArgs e)
{
try//Handels any Exception
{
// Select Query for table Student
string Sql = "select ( first_name+ ' ' + last_name) Name, phone, email from Student";
// first_name and last_name concatenated to a single field as "Name"

//Using the connection string create Connection instance
using (SqlConnection con = new SqlConnection(connectionString))
{
//Create a Data Adatapter to fetch data from table
using (SqlDataAdapter sda = new SqlDataAdapter(Sql, con))
{
//Fill the DataTable with records from Table.
DataTable dt = new DataTable();
sda.Fill(dt);

//Insert the Default Item to DataTable.
DataRow row = dt.NewRow();
row[1] = 0;
row[0] = "Please select";
dt.Rows.InsertAt(row, 0);

//Assign DataTable as DataSource.
//cmbName is id Combox on Form Design

cmbName.DisplayMember = "Name";
cmbName.ValueMember = "phone";
//Phone No as unique field, it more significant for searching, so binded as value field
cmbName.DataSource = dt;

}
}
}
catch
{ }
}
//Method invoked when selection changed of combobox "cmbName"
private void cmbName_SelectedIndexChanged(object sender, EventArgs e)
{
try
{
//Select query by getting value propery from comboBox cmbName
string Sql = "select first_name,last_name, phone, email from Student where phone ='" + cmbName.SelectedValue +"'" ;

using (SqlConnection con = new SqlConnection(connectionString))
{
using (SqlDataAdapter sda = new SqlDataAdapter(Sql, con))
{
//Fill the DataTable with records from Table.
DataTable dt = new DataTable();
sda.Fill(dt);

//Display Data concatenated to a message string variable
string msg = "First Name="+ dt.Rows[0]["first_name"] + "\nLast Name=" + dt.Rows[0]["last_name"] +
"\nPhone=" + dt.Rows[0]["phone"] + "\nMail = " + dt.Rows[0]["email"] ;

//Display the variable
MessageBox.Show(msg);

}
}

}
catch
{   
}
} // end of selection event
} // end of Form1 class
}

SCREENSHOT CODE

using System; using System.Data; using System.Windows.Forms; using System.Data.SqlClient; namespace DBGet 3 references public partial class Form1 : Form 1/Specifying connection path to Database string connectionString = "Server=AKSHAYA \SQL12; Database=TestDB;User Id=sa; Password=5a1234#"; 1 reference public Form1() InitializeComponent(); 1 reference private void Form1_Load(object sender, EventArgs e) try//Handels any Exception // Select Query for table Student string Sql = "select ( first_name+ ' ' + last_name) Name, phone, email from Student"; // first_name and last_name concatenated to a single field as "Name" //Using the connection string create Connection instance using (SqlConnection con = new SqlConnection(connectionString)) 1/Create a Data Adatapter to fetch data from table using (SqlDataAdapter sda = new SqlDataAdapter(Sql, con))

//Fill the DataTable with records from Table. DataTable dt = new DataTable(); sda.Fill(dt); //Insert the Default Item to DataTable. DataRow row = dt. NewRow(); row[1] = 0; row[0] = "Please select"; dt.Rows. InsertAt(row, 0); 1/Assign DataTable as DataSource. //cmbName is id Combox on Form Design cmbName.DisplayMember = "Name"; cmbName.ValueMember = "phone"; //Phone No as unique field, it more significant for searching, so binded as value field cmbName. DataSource = dt; catch //Method invoked when selection changed of combobox "cmbName" 1 reference private void cmbName_SelectedIndexChanged(object sender, EventArgs e) try

1/Select query by getting value propery from comboBox cmbName string Sql = "select first_name, last_name, phone, email from Student where phone'" + CmbName. SelectedValue +"""; using (SqlConnection con = new SqlConnection(connectionString)) using (SqlDataAdapter sda = new SqlDataAdapter(Sql, con)) //Fill the DataTable with records from Table. DataTable dt = new DataTable(); sda.Fill(dt); //Display Data concatenated to a message string variable string msg = "First Name="+ dt.Rows[0]["first_name"] + "\nLast Name=" + dt. Rows[]["last_name"] + "\nPhone=" + dt. Rows[]["phone"] + "\nMail = " + dt.Rows[0]["email"); //Display the variable MessageBox.Show(msg); catch } // end of selection event } // end of Form1 class

OUT PUT

1. INSERTION

. Form1 - 0 x First Name Rohit Last Name Sam Phone 891234563 Email rh@gmail.com Submit Data insert success ок |

2. VIEW FORM

Form1 Name Rohit Sam First Name=Rohit Last Name=Sam Phone=891234563 Mail = rh@gmail.com OK