Hvordan Input Totals i en database

Hvordan Input Totals i en database


Ved hjelp av en Access-database gir deg flere muligheter til å manipulere data gjennom bruk av SQL-setninger. Gjør tilkoblingen til databasen du vil bruke med "OleDbConnection" klasse, deretter endre data ved hjelp av "OleDbCommand" class å legge inn totalt antall resultater i en Access-database.

Bruksanvisning

1 Start Microsoft Visual Studio, klikk på "New Project" fra ruten til venstre på skjermen, og utvide "andre språk" under "Installerte maler." Klikk "Visual C #" og dobbeltklikk på "Windows Forms Application" fra midten av vinduet for å opprette et nytt prosjekt.

2 Dobbeltklikk på "TextBox" fra verktøykassen panelet for å legge til en ny tekstboks i skjemaet. Legg til to flere tekstbokser ved hjelp av samme teknikk. Dobbeltklikk på "Button" for å legge til en ny knapp.

3 Dobbeltklikk på skjemaet for å opprette en form last event og legg til følgende kode for å opprette en tilkobling til databasen. Lag en ny tabell for å lagre total:

Dim objCmd som ny OleDbCommand

Dim Con = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\<database name>.accdb")
Con.Open()
strSQL = "CREATE TABLE <tableName>(Totals TEXT)"
objCmd = New OleDbCommand(strSQL, Con)
objCmd.ExecuteNonQuery()
Con.Close()

4 Bytt tilbake til å danne design og dobbeltklikk på "Button1" for å lage et klikk hendelser denne knappen. Kopier og lim inn følgende kode for å legge til to tall og vise resultatet gjennom den tredje tekstboksen:

Dim inputOne As Integer

Dim inputTwo As Integer
inputOne = Me.TextBox1.Text
inputTwo = Me.TextBox2.Text
Me.TextBox3.Text = inputOne + inputTwo

5 Bytt tilbake til å danne design og dobbeltklikk på "Button2" for å legge det samlede resultat i databasen tabellen du opprettet:

Dim sum så String

totals = Me.TextBox3.Text
Dim objCmd As New OleDbCommand
Dim Con = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source= C:\<database name>.accdb")")
Con.Open()
strSQL = "INSERT INTO <tableName>(Totals) VALUES ('" & (totals) & "')"
objCmd = New OleDbCommand(strSQL, Con)
objCmd.ExecuteNonQuery()
Con.Close()

6 Trykk F5 for å kjøre programmet, legge inn et nummer i første og andre tekstboksen. Klikk "Button1" for å vise resultatet og klikk "Button2" for å legge resultatet i databasen.