3、使用Data Code Builder
显然，以上我们介绍的数据库功能只能完成我们实际开发工作的很小部分，要设计比较完善的数据库应用，我们需要更加强大的功能。Code Builder就是可以满足这种要求，它是在代码生成器的基础上设计的，目的在于帮助用户设计一些日常常见的功能模块。ASP.NET Web Matrix本身已经带有一些Code Builder，包括一些专门用于数据库设计的Code Builder。在下面的文章中，我们将介绍使用Select Code Builder来设计一个简单的搜索数据库功能。现在我们就来一步步实现这个功能。
（1）建立一个新的ASP.NET页面，语言选择为VB，文件名为myFirstDataPage.aspx;
（2）在设计视图中，从“Web Control”选项页选择一个“TextBox”、一个“DataGrid”、一个“Button”控件到设计页面在这里注意一点就是，这里我们选择的是“DataGrid”控件，不是“MXDatGrid”控件；
（3）以上是“Design”设计视图的设计，现在，我们点击“Code”选项卡选择代码视图；
（4）在代码视图的左边，我们可以看到有“Toolbox”列，那里就有Code Builder选项卡，在Code Builder选项卡，我们选择“Select”拖到设计区；我们看到，这里其实不止“Select”一个选项，还有其他“Insert”、 “Delete”等，也就是说，基本上常见的数据库操作，都可以通过这里介绍的方法来完成。
（5）这时候，我们看到“Connect Database”对话框出现了，我们在这里选择“LocalHost”服务器中的“Orders”数据库；
（6）这时候出现了名为“Construct Select Query”（建立数据库选择）的Code Builder向导（“Code Builder Wizard”）
（7）在以上界面的左边“Tables”选择我们需要查询的数据表，这里，我们选择“Orders”数据表；在右边的“Columns”可以选择需要查询的数据列，在需要查询的数据列前面打勾，如果需要查询所有数据列，可以选择“*”也可以点击按钮“Slect All”，这里，我们选择“*”；这时候，我们可以看到在以上界面的“Preview”部分已经出现了部分“Select”语句“SELECT [Orders].* FROM [Orders]”，我们看到是标准的Select查询语句；
（8）点击以上界面的 “Where”按钮，出现设置“Where”语句的“Where Clause Builder”界面，这个界面分左右两个部分，左边是Where语句等于号的左边，右边是Where语句等于号的右边，在左边的“Columns”列我们选择“OrderID”，在右边的“Filter”过滤输入框，我们输入“@OrderID”，这样设置的意思是查询“OrderID”等于变量 “OrderID”的所有数据记录，点击“OK”按钮，回到前面的界面，我们可以看到Select语句已经改变为：SELECT [Orders].* FROM [Orders] WHERE ([Orders].[OrderID] = @OrderID)；
（9）在界面“Construct Select Query”选择按钮“Next”进入下一个Code Builder Wizard，那就是查询语句的“Preview”；
（10）在出现的“Query Preview”界面点击“Text Query”按钮来检测前面设计的查询语句，会出现一个设置@OrderID数值的对话框，我们这里设置为“1”；这里的意思就是选择OrderId为1的数据行；
（11）点击以上界面的“OK”按钮，我们就可以直接看到查询结果了
（12）以上我们看到了查询语句测试运行的结果是准确无误的，进一步点击按钮“Next”；出现Code Builder Wizard的第三步，再这里，我们需要设置查询函数的名字和查询使用的方式；在这里，我们可以选择“DataSet”和“DataReader”两者方式来实现数据查询；
（13）在以上界面，我们选择“DataSet”方式来查询数据，点击按钮“Finish”结束向导，这时候，我们可以看到“Code”视图已经增加了一个函数，这个函数就是刚才我们通过向导建立的“MyQueryMethod”函数；
Function MyQueryMethod(ByVal orderID As Integer) As System.Data.DataSet
Dim connectionString As String = "server='localhost'; trusted_connection=true; Database='Orders'"
Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionString)
Dim queryString As String = "SELECT [Orders].* FROM [Orders] WHERE ([Orders].[OrderID] = @OrderID)"
Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)
sqlCommand.Parameters.Add("@OrderID", System.Data.SqlDbType.Int).Value = orderID
Dim dataAdapter As System.Data.SqlClient.SqlDataAdapter = New System.Data.SqlClient.SqlDataAdapter(sqlCommand)
Dim dataSet As System.Data.DataSet = New System.Data.DataSet
dataAdapter.Fill(dataSet)
Return dataSet
End Function
（14）点击“Design”选项卡回到设计视图，双击我们增加的“Button”按钮，转到“Code”代码设计窗口；
（15）在代码设计视图增加以下按钮事件代码：
Sub Button1_Click(sender As Object, e As EventArgs)
DataGrid1.DataSource =MyQueryMethod(CInt(TextBox1.Text))
DataGrid1.DataBind()
End Sub
