写过一篇存储过程入门的博客，那仅仅是入门，下面和大家一起深入学习存储过程（也许以后还会有更深入^_^）

以经典的注册为例子，篇幅有限只写了核心部分，其他略过。

• 无参数无返回值的存储过程

以默认的信息进行注册

其中存储过程代码如下

@H_404_66@ 1: USE [Test]

   2:  GO

@H_404_66@ 3: /****** Object: StoredProcedure [dbo].[MyProcedure1] Script Date: 04/04/2011 20:55:13 ******/

   4:  SET ANSI_NULLS ON

@H_404_66@ 5: GO

   6:  SET QUOTED_IDENTIFIER ON

@H_404_66@ 7: GO

   8:  ALTER proc [dbo].[MyProcedure1]

@H_404_66@ 9: as

  10:  begin

@H_404_66@ 11: insert into Login values ('admin','admin')

  12:  end

程序代码如下

@H_404_66@ 1: Dim Str As String = "Data Source=******;Initial Catalog=Test;User ID=sa;Password=*****"

   2:      Dim conn As sqlConnection = New sqlConnection(Str)

@H_404_66@ 3: Private Sub btnNoParNoOut_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles btnNoParNoOut.Click

   4:          Dim sql As String = "execute MyProcedure1"

@H_404_66@ 5: Dim cmd As sqlCommand = New sqlCommand(sql,conn)

   6:          Try

@H_404_66@ 7: conn.Open()

   8:              If cmd.ExecuteNonQuery >= 0 Then

@H_404_66@ 9: MsgBox("Success"，，"无参数无返回值")

  10:              Else

@H_404_66@ 11: MsgBox("Fail")

  12:              End If

@H_404_66@ 13: Catch ex As Exception

  14:              MsgBox(ex.Message)

@H_404_66@ 15: End Try

  16:          conn.Close()

@H_404_66@ 17: End Sub

@H_591_301@ 以上是最简单的存储过程的使用，其中sqlcommand只是传递了字符串，并且其类型也是默认的类型未作更改，简单的可以理解为像sql Server中传递了一个可以执行的语句。

• 有参数有返回值的存储过程

用户自定义信息注册

其中存储过程代码如下

@H_404_66@ 1: USE [Test]

   2:  GO

@H_404_66@ 3: /****** Object: StoredProcedure [dbo].[MyProcedure2] Script Date: 04/04/2011 21:00:18 ******/

   4:  SET ANSI_NULLS ON

@H_404_66@ 5: GO

   6:  SET QUOTED_IDENTIFIER ON

@H_404_66@ 7: GO

   8:  ALTER proc [dbo].[MyProcedure2]

@H_404_66@ 9: @UserID varchar(12),

  10:  @Pwd varchar(12)

@H_404_66@ 11: as

  12:  begin

@H_404_66@ 13: insert into Login values (@UserID,@Pwd )

  14:  end

程序代码如下

@H_404_66@ 1: Private Sub btnParNoOut_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles btnParNoOut.Click

   2:          Dim sql As String = "execute MyProcedure2 @User,@Pwd"

@H_404_66@ 3: Dim cmd As sqlCommand = New sqlCommand(sql,conn)

   4:          Dim parameter As sqlParameter

@H_404_66@ 5: parameter = New sqlParameter("@User",sqlDbType.VarChar)

   6:          parameter.Value = Trim(txtParameter.Text)

@H_404_66@ 7: cmd.Parameters.Add(parameter)

   8:  

@H_404_66@ 9: parameter = New sqlParameter("@Pwd",sqlDbType.VarChar)

  10:          parameter.Value = Trim(txtPwd.Text)

@H_404_66@ 11: cmd.Parameters.Add(parameter)

  12:          Try

@H_404_66@ 13: conn.Open()

  14:              If cmd.ExecuteNonQuery >= 0 Then

@H_404_66@ 15: MsgBox("Success","有参数无返回值")

  16:              Else

@H_404_66@ 17: MsgBox("Fail")

  18:              End If

@H_404_66@ 19: Catch ex As Exception

  20:              MsgBox(ex.Message)

@H_404_66@ 21: End Try

  22:          conn.Close()

@H_404_66@ 23: End Sub

@H_591_301@ 上面的存储过程是比较复杂的，但是并不难。只是加入了两个参数@UserID和@Pwd，既然有参数应该传递进入我们想要的值，vb.net 为我们提供了相应的方法（cmd.Parameters.Add）。这样一来程序以我们想要的值替换了字符串中的参数，然后交给sql Server进行执行。

• 有参数有返回值的存储过程

用户输入ID后进行密码查询

其中存储过程代码如下

@H_404_66@ 1: USE [Test]

   2:  GO

@H_404_66@ 3: /****** Object: StoredProcedure [dbo].[MyProcedure3] Script Date: 04/04/2011 21:05:14 ******/

   4:  SET ANSI_NULLS ON

@H_404_66@ 5: GO

   6:  SET QUOTED_IDENTIFIER ON

@H_404_66@ 7: GO

   8:  ALTER proc [dbo].[MyProcedure3]

@H_404_66@ 9: @UserID varchar(12),

  10:  @Pwd varchar(12) output

@H_404_66@ 11: as

  12:  begin

@H_404_66@ 13: set @Pwd =( select Pwd from Login where UserID =@UserID)

  14:  end

程序代码如下

@H_404_66@ 1: Private Sub btnParOut_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles btnParOut.Click

   2:          Dim sql As String = "MyProcedure3"

@H_404_66@ 3: Dim cmd As sqlCommand = New sqlCommand(sql,conn)

   4:          cmd.CommandType = CommandType.StoredProcedure

@H_404_66@ 5:

   6:          cmd.Parameters.Add(New sqlParameter("@UserID",sqlDbType.VarChar))

@H_404_66@ 7: cmd.Parameters("@UserID").Value = Trim(txtParameter.Text)

   8:  

@H_404_66@ 9: cmd.Parameters.Add(New sqlParameter("@Pwd",sqlDbType.VarChar,12))

  10:          cmd.Parameters("@Pwd").Direction = ParameterDirection.Output

@H_404_66@ 11:

  12:          Try

@H_404_66@ 13: conn.Open()

  14:              cmd.ExecuteReader()

@H_404_66@ 15: MsgBox(cmd.Parameters("@Pwd").Value.ToString(),"有参数有返回值")

  16:          Catch ex As Exception

@H_404_66@ 17: MsgBox(ex.Message)

  18:          End Try

@H_404_66@ 19: conn.Close()

  20:  End Sub

其中需要格外注意的地方

1、 返回值的字符长度必须写，否则会出错。

2、 存储过程中返回值可以直接set@**=……，也可以最后return@**。

@H_591_301@ 上面的存储过程比之前的更有深度，但也不是不可理解。首先改变了sqlCommand的类型，使其只针对于存储过程（即直接执行，无需在字符串中写明参数）。由于字符串（存储过程名）中没有参数，所以相应的参数直接通过sqlCommand传入sql Server中。返回值是通过相应的方法（cmd.Parameters(“Pwd”).Direction=ParamterDIrection.OutPut）从数据库中取得。得到返回值后转换成字符串就可以显示出来。