membuat perintah ubah di vb.net

public function ubahdata () as integer
     dim sql as string
     dim xcmd as sqlcomand
     dim x as integer

     sql ="update siswa set nm_siswa=@nm_siswa,Jenkel=@jenkel,Alamat=@alamat where      nis=@nis"

     xcmd = new slqcomand (sql, con)

     with parameter
           .addwithvalue("nm_siswa", Fnm_siswa)
           .addwithvalue("jenkel",Fjenkel)
           .addwithvalue ("nis",Fnis)
     end with 
     x = xcmd.excutenonquery
     xcmd.dispose ()
     return x

end function


jangan lupa di class ini yang paling atas harus ditulis import system.data.sqlclient
karena jika tidak di tulis maka sqlcommand tidak kebaca maka error.

selamat mencoba

maaf jika ada kesalahan kata - kata karena penulis baru saja belajar membuat aplikasi ini.