En VB.Net seria algo asi:
Código vb:
Ver originalDim Sihay as string
Private Sub TextBox_T_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox_T.LostFocus
Sihay = "no"
Dim a As Integer = Len(TextBox_T.Text)
Dim b as Integer
For b = 1 to a
If Mid(TextBox_T.text, 1, b) = "," Or Mid(TextBox_T.text, 1, b) = "." Then
Sihay= "si"
End If
Next
End Sub
En un For preguntas caracter a caracter si corresponde a lo que buscas y si es igual a lo uno o a lo otro cambias el valor de la variable "Sihay"
Esperando que te sirva.
Saludos desde Chile