Private Sub Komut349_Click()

CurrentDb.Execute "UPDATE  Tbl_Notlar SET  [yzne_sonuc1]= clng([yzne_vernot1]*" & m1 & "/100)"

Me.Requery

End Sub