16,718
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
980 2003-06-25
- 打赏
- 举报
up
tinghuyang 2003-06-23
- 打赏
- 举报
Imports System.Data.SqlClient
Public Class Form1
Inherits System.Windows.Forms.Form
Private da As SqlDataAdapter
Private ds As New DataSet()
Private cnn As New SqlConnection()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
cnn.ConnectionString = "server=servername;user id=userid;password=password;database=databasename"
cnn.Open()
da = New SqlDataAdapter("select * from tablename", cnn)
da.Fill(ds, "tablename")
DataGrid1.DataSource = ds.Tables(0)
End Sub
End Class
Public Class Form1
Inherits System.Windows.Forms.Form
Private da As SqlDataAdapter
Private ds As New DataSet()
Private cnn As New SqlConnection()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
cnn.ConnectionString = "server=servername;user id=userid;password=password;database=databasename"
cnn.Open()
da = New SqlDataAdapter("select * from tablename", cnn)
da.Fill(ds, "tablename")
DataGrid1.DataSource = ds.Tables(0)
End Sub
End Class
