La maggior parte delle applicazioni includono sia un database e codice front-end che manipola i dati ricevuti dal database . Visual Basic (VB ) , un linguaggio sviluppato da Microsoft per il suo quadro . NET , consente agli sviluppatori di prendere i dati da un database e visualizzarlo per gli utenti finali in un formato utilizzabile . I programmatori Visual Basic possono richiamare le funzioni T - SQL direttamente nel codice. T - SQL , o transazione standard Query Language , è il linguaggio di query di database di Microsoft. Combinandolo con Visual Basic consente di effettuare potenti applicazioni per entrambi gli ambienti desktop e Internet . Istruzioni
1

Aprire il file di Visual Basic che contiene la classe che si intende utilizzare per chiamare la funzione T - SQL .
2

Creare un "Sub ", dal nome di CallSQLFunction tenere la funzione che chiamerà la funzione T - SQL . Aggiungi un argomento " ByVal " stringa denominata " connectionString " :

pubblico CallSQLFunction Sub ( connectionString ByVal come stringa ) per

End Sub
3

Creare un variabile stringa chiamata " query. " Assegnare il testo della query T-SQL che si desidera eseguire per la "query" variabile :

di query Dim As String = "SELECT * "
4

creare un "Utilizzo " dichiarazione all'interno della funzione CallSQLFunction e utilizzarlo in combinazione con il parametro connectionString :

Utilizzando la connessione As New SqlConnection ( connectionString ) per

End Using
5

Aprire SQL connessione e utilizzare il " ExecuteReader ( ) " metodo della classe SqlCommand :

comando Dim As New SqlCommand ( queryString , collegamento ) per

Connection.Open ( ) per

Dim r come SqlDataReader = Command.ExecuteReader ( ) economici 6

creare un blocco di " Prova " per racchiudere un ciclo "while " . Utilizzare i risultati della funzione T - SQL come necessari all'interno del ciclo "while" .

Prova

Mentre r.Read ( ) per

' utilizzare i dati del database qui < br

Fine > Mentre

End Try
7

Aggiungi un comunicato "Finalmente " al codice . Chiudere il lettore all'interno del blocco "Finalmente" .

Infine

r.Close ( ) per

End Try
8

Eseguire la funzione come necessari in tutto il codice .

• Come determinare se una casella di riepilogo ha Duplicati 
• Come rimuovere Protetto progetti VBA