[سعود]

او خذ الطريقة هي الابسط

كود :

Dim picStream As New MemoryStream


        PictureBox1.Image.Save(picStream, ImageFormat.Jpeg)


        Dim PicByte As Byte() = picStream.ToArray




dim cm as new sqlcommand("insert into Table1 (col1,img) values (@col1,@img)",con)
  
      cm.Parameters.AddWithValue("@col1", SqlDbType.[SIZE=5][b][color=#FF0000]VarChar[/color][/b][/SIZE]).Value = TextBox1.Text

   cm.Parameters.AddWithValue("@img", SqlDbType.[SIZE=5][color=#ff0000][b]VarBinary[/b][/color][/SIZE]).Value = [color=#ff0000][SIZE=5][b]PicByte[/b][/SIZE][/color]

وهكذا