梦想放飞的摇篮

我是一个编程初学者,有很多不懂的地方,希望大家多多指教!

Dim cmd As SqlCommand = New SqlCommand("dbo.pUptStudent ", myconn)
        cmd.CommandType = CommandType.StoredProcedure

        Dim para_studentID As SqlParameter = New SqlParameter("@StudentID", SqlDbType.NVarChar)
        para_studentID.Direction = ParameterDirection.Input
        para_studentID.Value = TxtstudentID.Text

        Dim para_studentname As SqlParameter = New SqlParameter("@Studentname", SqlDbType.NVarChar)
        para_studentname.Direction = ParameterDirection.Input
        para_studentname.Value = Txtstudentname.Text

        Dim para_classID As SqlParameter = New SqlParameter("@classid", SqlDbType.Int)
        para_classID.Direction = ParameterDirection.Input
        If txtclassID.Text = "" Then
            para_classID.Value = DBNull.Value
        Else
            para_classID.Value = txtclassID.Text
        End If

        Dim para_error As SqlParameter = New SqlParameter("@errstr", SqlDbType.NVarChar, 30)
        para_error.Direction = ParameterDirection.Output

        Dim para_return As SqlParameter = New SqlParameter("@RETURN_VALUE", SqlDbType.Int)
        para_return.Direction = ParameterDirection.ReturnValue

        cmd.Parameters.Add(para_studentID)
        cmd.Parameters.Add(para_studentname)
        cmd.Parameters.Add(para_classID)
        cmd.Parameters.Add(para_error)
        cmd.Parameters.Add(para_return)
        Try
            cmd.ExecuteNonQuery()
            If para_return.Value = 0 Then
                StatusBar1.Panels(0).Text = "修改成功!!"
            Else
                StatusBar1.Panels(0).Text = para_error.Value
            End If
        Catch ex As Exception
            StatusBar1.Panels(0).Text = ex.Message
        End Try
这个是要实现修改信息的一个VB.NET程序,我有些地方不怎么理解,知道的给我讲解一下吧!
谢谢了!!
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值