结合2楼，看懂下面代码。
Dim Cnn As New Data.OleDB.OleDbConnection(Connections("T").ConnectionString)
Cnn.Open()
Dim adoCmd As New Data.OleDB.OleDbCommand("dbo.proc_bom_constrast", Cnn)
adoCmd.CommandType = System.Data.CommandType.StoredProcedure
adoCmd.Parameters.AddWithValue("@bomType", "bom")
adoCmd.Parameters.AddWithValue("@bomnum", 0)
adoCmd.Parameters.Add("@pid", System.Data.OleDb.OleDbType.VarChar, 80)
'adoCmd.Parameters("@pid").Value ="returnPid"
adoCmd.Parameters("@pid").Direction = System.Data.ParameterDirection.Output
adoCmd.ExecuteNonQuery()
output.show(adoCmd.Parameters("@pid").Value.ToString())
加好友 
发短信
Post By：2018/6/15 8:43:00 [显示全部帖子]
