1 Κάντε κλικ στο κουμπί " Έναρξη", " Όλα τα προγράμματα " και " Visual Basic ". Κάντε κλικ στο " Αρχείο " " New " και "New Project " για να δημιουργήσετε ένα νέο έργο . Πληκτρολογήστε ένα όνομα για το έργο . Κάντε κλικ στο " Browse" για να καθορίσετε μια θέση για τα αρχεία του έργου . 2
Κάντε κλικ στο " Query " και επιλέξτε " MSHFlexGrid . " Προσθέστε το MSHFlexGrid στο " Form1 " , κάνοντας κλικ στην κενή περιοχή στο " Form1 "
εικόνων 3
διπλό κλικ στο MSHFlexGrid και εισάγετε τον παρακάτω κωδικό : .
Δημ. sql_cn Όπως ADODB . Σύνδεση
Set sql_cn = Νέα σύνδεση
sql_cn.ConnectionString = " Provider = SQLNCLI.1 ? ενσωματωμένη ασφάλεια = SSPI ? " & _
" Εξακολουθούν Πληροφορίες Ασφαλείας = False ? " & _
" AttachDBFileName = " & App.Path & " \\ northwnd.mdf ? προέλευσης δεδομένων = server1 \\ sqlexpress " βάση δεδομένων
sql_cn.Open
Μια ADO sql_cn σύνδεσης που έχει συσταθεί με τον κώδικα . Η σύνδεση αυτή θα συνδεθεί με τη βάση δεδομένων northwnd.mdf και ο μηχανισμός βάσης δεδομένων είναι ο SQL Server Express .
Η
4 Ορίστε το σύνολο εγγραφών για τη σύνδεση . Καθορίστε πίνακα δεδομένων " εντολές " ως πηγή δεδομένων για την MSHFlexGrid μέσω του παρακάτω κώδικα :
Δημ. sql_rs Όπως εγγραφών
Set sql_rs = Νέα εγγραφών
sql_rs.Open Επιλέξτε " * από τις παραγγελίες » , sql_cn
Set MSHFlexGrid1.DataSource = sql_rs
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα