Question

VB怎么在SQL2000数据库中添加一条新记录啊？具体代码怎么写？给个例子给我看看。我不会啊。

详细具体的例子。并不是核心代码就可以了。因为核心代码我不知道写在那里啊。。。

Answer 1

Imports System Imports System.Drawing Imports System.Collections Imports System.ComponentModel Imports System.Windows.Forms Imports System.Data Imports System.Data.SqlClient Public Class Form1 Inherits System.Windows.Forms.Form #Region " Windows 窗体设计器生成的代码 " …… //此处代码会在你设计窗体的同时自动生成 Private Sub insert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles insert.Click Dim cnn As System.Data.SqlClient.SqlConnection Dim da As System.Data.SqlClient.SqlDataAdapter Dim ds As System.Data.DataSet Dim strCnn, strSql As String strCnn = "Data Source=(local);Initial Catalog= 数据库的名称 ;Trusted_Connection=Yes;" cnn = New SqlConnection(strCnn) cnn.Open() strSql = "insert into 基本表名 values('" & TextBox1.Text & "','" & TextBox2.Text & "',……);" //有几个文本框（即TextBox）即以此方式写几项 Dim comd As New SqlCommand(strSql, cnn) comd.ExecuteNonQuery() End Sub 窗体上添加几个文本框（TextBox）和一个名叫insert的按钮（bottom）然后直接在程序设计处附上以上源代码， 将上述 粗体字 修改成你建立的数据库的相应内容。 运行后，会出现你设计的窗体，在文本框内按照基本表的属性输入内容，单击按钮，即可添加进数据库。 这是我自己做的程序，正确添加，运行绝对是成功的。 如果还有什么问题，可以再和我联系。