Определить является ли указанная буква прописной [ВЕРХНИЙ РЕГИСТР]- Visual Basic(Бейсик)

1
2
3
4
5
6
7
iSymbol = "a" '"A"
 
If iSymbol = UCase(iSymbol) Then
   MsgBox "Да", vbExclamation, ""
Else
   MsgBox "Нет", vbExclamation, ""
End If

Leave a Comment