Sila beritahu saya tentang masalah menyambungkan sistem pengurusan perpustakaan VB ke pangkalan data

Masalah sambungan pangkalan data sistem pengurusan perpustakaan VB sila tanya

"Projek"-"Tambah Modul", modul baharu yang dihasilkan ialah modul awam projek ini.

Subrutin yang dipanggil adalah di bawah projek ini Sama ada SUB atau Fungsi kepunyaan borang atau modul, ia adalah subrutin.

Sama ada ia pembolehubah atau prosedur yang diisytiharkan dengan Awam dalam modul awam, ia boleh dirujuk dalam keseluruhan projek.

conn.Open connectionstring Fungsi pernyataan ini adalah untuk membuka sambungan ADODB bernama book.mdb. Dengan menggunakan sambungan ini, anda boleh mengendalikan pangkalan data dalam kawalan atau kod. Oleh itu, kod ini biasanya diletakkan sebelum beroperasi pada pangkalan data. Jika anda menggunakan kawalan, letakkannya pada permulaan acara Form_load atau acara berkaitan kawalan. Jika anda menggunakan kod, letakkan sahaja sebelum kod.

Yang di atas adalah pemahaman saya, tetapi saya juga newbie, jadi saya mungkin salah.

Tugas pangkalan data yang besar ialah membina sistem maklumat kedai buku dalam talian VB SQL

Bilakah kerja rumah ini perlu dibuat?

Sub Perintah Peribadi1_Klik()

Malap n Sebagai Integer

Dim sum Sebagai Ganda

jumlah = 0

n = InputBox ("Sila masukkan nilai n")

Untuk i = 1 Hingga n

jumlah = jumlah + jicheng(i)

Seterusnya i

Cetak jumlah

Tamat Sub

Fungsi Awam jiecheng(ByVal n As Integer) Sebagai Ganda

Dim jc As Double

jc = 1

Untuk i = 1 Hingga n

jc = jc * i

Seterusnya

jiecheng = jc

Fungsi Tamat

Atas ialah kandungan terperinci Sila beritahu saya tentang masalah menyambungkan sistem pengurusan perpustakaan VB ke pangkalan data. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!