Public Shared Function countNumbers(byRef str As String) As Integer
Dim counter, number As Integer
Dim letter As Char
counter =1
number =0
while counter < Len(str) Then
do
letter = str.Chars(counter)
counter +=1
If letter ="0" OR letter ="1" OR letter ="2" OR letter ="3" OR letter ="4" OR letter ="5" OR letter ="6" OR letter ="7" OR letter ="8" OR letter ="9" Then
Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.
/home/XMjRY6/prog.vb (12,32) : Error VBNC30205: Expected end of statement.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC90019: Expected 'End'.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC90019: Expected 'End'.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC30205: Expected end of statement.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC90019: Expected 'End'.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC30205: Expected end of statement.
Error recovery not implemented yet.
/home/XMjRY6/prog.vb (13,1) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (13,5) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (14,10) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (15,11) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (16,6) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (17,10) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (18,10) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (19,9) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (20,9) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (21,14) : Error VBNC30203: Not valid as identifier.
/home/XMjRY6/prog.vb (22,10) : Error VBNC30203: Not valid as identifier.
There were 17 errors and 0 warnings.
Compilation took 00:00:00.6472750