用的是ACCESS的数据库。
[此贴子已经被作者于2006-4-11 12:24:07编辑过]
我用SQL的数据库做了一个,给你做一下参考吧,具体用ACCESS做的话只要把连接的数据库改为ACCESS的连接即可!~
Imports System.Data.SqlClient
Public Class Form1
    Inherits System.Windows.Forms.Form
'窗体设计器代码
Dim conn As New SqlConnection("server=.;database=Student(你的数据库名称);integrated security=sspi")
    Dim comm As New SqlCommand
    Dim sqlda As New SqlDataAdapter
    Dim sqlds As New DataSet
    Dim i As Integer
在load事件中加入如下代码
  If conn.State = ConnectionState.Closed Then  '打开连接
            conn.Open()
        End If
        comm.Connection = conn 
        comm.CommandType = CommandType.Text
        comm.CommandText = "select * from 学生信息(你要显示的数据库中的表)"            
        sqlda.SelectCommand = comm
        sqlda.Fill(sqlds, "学生信息")
           For i = 0 To sqlds.Tables("学生信息").Columns.Count - 1
            ComboBox1.Items.Add(sqlds.Tables("学生信息").Columns(i).ColumnName) 
        Next
        If conn.State = ConnectionState.Open Then '关闭连接
            conn.Close()
        End If
[此贴子已经被作者于2006-4-11 15:02:10编辑过]
