2008-01-11 画面が青いよ! VB.NET .NET Public Shared Function IsAlpha(ByVal str As String) As Boolean If IsNothing(str) Then Return False End If For Each ch As Char In str.ToCharArray If Not Char.IsLetter(ch) Then Return False End If Next Return True End Function