سؤال حول تفريع الجريد من البيانات

السلام عليكم ورحمته الله وبركاته

هو عندى سؤالين الكود دا يتم اختيار الموظف ومن ثم اظهار باقى البيانات الخاصه بيه ويعمل جيدا ولكن يظهر هذا الخطا Failed to convert parameter value from a String to a Int32 عند tb.Load(cmd.ExecuteReader)

مش عارفا ليه ؟؟؟؟؟؟؟؟؟ الكود بالكامل اهو

 If TextBox1.Text = "" Then
            TextBox2.Text = ""
            Form14_Load(sender, e)
        End If
        If cn.State = ConnectionState.Open Then cn.Close()
        cn.Open()
        cmd.Connection = cn
        cmd.CommandType = CommandType.StoredProcedure
        cmd.Parameters.Clear()
        cmd.CommandText = "selectsal_emp"
        cmd.Parameters.Add("@id", SqlDbType.Int).Value = TextBox1.Text
        cmd.Parameters.Add("name", SqlDbType.NVarChar, 1000).Direction = ParameterDirection.Output
        tb.Clear()
        tb.Load(cmd.ExecuteReader)
        DataGridView1.DataSource = Nothing
        DataGridView1.DataSource = tb
        TextBox2.Text = cmd.Parameters("name").Value
        DataGridView1.Columns(0).Visible = False
        Dim tb1 As New DataTable
        Dim clmn As DataGridViewComboBoxColumn = New DataGridViewComboBoxColumn()
        clmn.DataPropertyName = DataGridView1.Columns(1).DataPropertyName
        DataGridView1.Columns.RemoveAt(1)
        DataGridView1.Columns.Insert(1, clmn)
        clmn.HeaderText = "type"
        cmd.CommandType = CommandType.Text
        cmd.CommandText = "select id,name from degree"
        clmn.DisplayMember = "name"
        clmn.ValueMember = "id"
        clmn.DataSource = tb
        tb1.Load(cmd.ExecuteReader)
        DataGridView1.Columns(2).Visible = False
        DataGridView1.Columns.Add(New DataGridViewCheckBoxColumn())
        DataGridView1.Columns(6).HeaderText = "Check 2 Del"

انا لما باختار رقم الموظف بيظهر بياناته ولما امسحه المفروض يمسح كل حاجة لا هو بيعمل لى الخطاء دا

انا عايزاة يفضى الجريد وكمان textbox 2

لان الكود الى فى الاول مش صحيح

وشكرا