主题：存储过程输出参数问题

Dim Cnn As New System.Data.SqlClient.SqlConnection(Connections("财务").ConnectionString)

 Dim Cnn As New Data.OleDB.OleDbConnection(Connections("财务").ConnectionString)
Cnn.Open()
Dim adoCmd As New Data.OleDB.OleDbCommand("dbo.Pl_YingFuHuoKuan", Cnn)
adoCmd.CommandType = System.Data.CommandType.StoredProcedure
adoCmd.Parameters.Add("@HuoGuiID", System.Data.SqlDbType.Int)
adoCmd.Parameters("@HuoGuiID").Value = 58
adoCmd.Parameters.Add("@result", System.Data.SqlDbType.NVarChar, 20)
adoCmd.Parameters("@result").Direction = System.Data.ParameterDirection.Output
adoCmd.ExecuteNonQuery()
output.show(adoCmd.Parameters("@result").Value.ToString())