Aprire il Blocco note e digitare il seguente testo in un nuovo documento di testo : " GameTitle . " Questo testo è il titolo di una colonna di una tabella di database semplice . Potrai utilizzare VB per eseguire un'istruzione SQL su questo tavolo
2
Salvare il file come "C : \\. Games.txt " .
3
Apri VB e premere il tasto " Control- N ", seguito selezionando " progetto Windows Form ". Questa azione crea un programma con un input dell'utente /modulo di uscita . Potrai personalizzare il modulo e il suo programma per eseguire un comando SQL sul database di giochi .
4
Premere " F7 " per accedere alla finestra di progettazione del modulo , quindi fare clic sull'icona " tool box " della barra degli strumenti per visualizzare una tavolozza di controlli (ad esempio pulsante , casella di testo ) è possibile inserire il modulo in bianco .
5
trascinare un controllo casella di testo dalla tavolozza degli strumenti nel form , quindi trascinare un controllo Button dalla . tavolozza per qualsiasi luogo sotto la casella di testo
6
Fare doppio clic sul pulsante per accedere alla finestra per l'inserimento del codice di programma, quindi digitare la seguente riga nella parte superiore della finestra del codice :
Imports System.Data.OleDb
Questa dichiarazione dice VB per creare un collegamento a una libreria di database correlati di codice quando viene eseguito il programma . Senza questo collegamento , VB non può riconoscere i dati relativi istruzioni nel tuo programma
7
digitare la seguente istruzione sopra l'istruzione "End Sub " nel sottoprogramma " Button1_Click " : .
EseguiSQL ( ) per
Questa affermazione richiama la subroutine che contiene il comando SQL , quando l' utente preme il pulsante del programma è stato inserito al punto 5.
8
Incolla il seguente dopo la "Fine sub " dichiarazione del " subroutine Button1_Click " . Questa subroutine crea un collegamento , mediante il comando OleDbConnection , con il database di testo creata al passaggio 2 . La dichiarazione OldDbCommand subroutine esegue una query SQL che inserisce un nuovo nome del gioco nel database. Il nome del gioco deriva dal valore di tipi di utente del programma nella casella di testo è stato inserito al punto 5.
Private Sub EseguiSQL ( ) per
Dim scmd Come OleDbCommand
Dim sSQL As String Dim
DbCmd As New OleDbCommand
Dim newValue As String Dim
Cnxn = New OleDbConnection ( "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = c : \\; Extended Properties = " " del testo; HDR = Yes ; FMT = delimitato " " ; " ) per
newValue = TextBox1.Text
sSQL =" INSERT INTO Giochi ( [ GameName ] ) values (' "& newValue &" ') ; "
scmd = New OleDbCommand ( sSQL , Cnxn ) per
cnxn.Open ( ) per
DbCmd = New OleDbCommand ( sSQL , Cnxn ) per
DbCmd.ExecuteNonQuery ( ) per
cnxn.Close ( ) per
End Sub
9
Avviare il programma premendo il tasto " F5 ", quindi digitare un nome qualsiasi gioco ( ad esempio," dama ", " asteroidi " ) nella casella di testo del form . Premere il pulsante sotto la casella di testo per eseguire il codice appena incollato
10
Fine del programma premendo "Alt - F4 ", poi apre il "c : \\ games.txt " . Database di testo fatto al punto 2. Il database verrà visualizzato il nome del gioco appena inserito .
Programmazione © www.354353.com