Imports System
Public Class Test
Public Shared Sub Main()
VowelCount("The quick brown fox jumps over the lazy dog.")
End Sub
Shared Sub VowelCount(ByVal UserInput As String)
Console.WriteLine("There are {0} vowels", System.Text.RegularExpressions.Regex.Matches(UserInput, "[aeiou]", System.Text.RegularExpressions.RegexOptions.IgnoreCase).Count.ToString())
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlWb3dlbENvdW50KCJUaGUgcXVpY2sgYnJvd24gZm94IGp1bXBzIG92ZXIgdGhlIGxhenkgZG9nLiIpCglFbmQgU3ViCgkKCVNoYXJlZCBTdWIgVm93ZWxDb3VudChCeVZhbCBVc2VySW5wdXQgQXMgU3RyaW5nKQogICAgCUNvbnNvbGUuV3JpdGVMaW5lKCJUaGVyZSBhcmUgezB9IHZvd2VscyIsIFN5c3RlbS5UZXh0LlJlZ3VsYXJFeHByZXNzaW9ucy5SZWdleC5NYXRjaGVzKFVzZXJJbnB1dCwgIlthZWlvdV0iLCBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMuUmVnZXhPcHRpb25zLklnbm9yZUNhc2UpLkNvdW50LlRvU3RyaW5nKCkpCglFbmQgU3ViCkVuZCBDbGFzcw==