Составить программу вывода последнего слова в предложении.....в visual basic пожалуйста*)

Question

Составить программу вывода последнего слова в предложении.....в visual basic пожалуйста*)

Answer 1

Sub pr()
Dim s As String
s = InputBox("Введите предложение")
s = Right(s, Len(s) - InStrRev(s, " "))
MsgBox (s)
End Sub