一、程序功能:将orders表和Customers表中的字段绑定到文本框
    二、窗体设计  
  1、新建ASP.NET Web应用程序,命名为Sql4,选择保存路径然后点击确定。  
  2、向窗体中添加两个Label和两个Textbox控件,窗体界面见下图  
  三、代码设计  
  切换到代码窗口,添加代码如下:  
  Imports System.Data.SqlClient
  Public Class WebForm1
  Inherits System.Web.UI.Page  
  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  Dim scon As New SqlConnection("server=localhost;database=northwind;integrated security=true")
  Dim i As Integer = 10248
  '创建一个数据适配器,查询订单表中的订单号和客户表的公司名称,此处使用了表格别名
  Dim sda As New SqlDataAdapter _
  ("select o.orderid, c.companyname from orders o, customers c where o.customerid=c.customerid and o.orderid=" & i.ToString, scon)
  Dim ds As New DataSet
  Try
  sda.Fill(ds)
  Catch ex As Exception
  End Try
  '绑定数据  
  TextBox1.Text = ds.Tables(0).Rows(0).Item(0)
  TextBox2.Text = ds.Tables(0).Rows(0).Item(1)
  End Sub
  End Class
查看本文来源