ok i got it but for some reason i get this error and i dont know want it means ? any help ? ty
Code:Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click Function FKDR(ByVal Kills As String, ByVal Deaths As String, ByVal KDR As String) Dim Result As Double If KDR = 0 Then Result = Kills / Deaths Else Result = KDR * Kills - Deaths End If If KDR < 1 Then Return Format(Result, "0.00") Else Return Format(Result, "0") End If End Function