StrEndsWith
(XAPI2000)
Deklaration
Function StrEndsWith(ByVal SubStr As String, S As String)
As Boolean
Beskrivning
Testar om strängen S avslutas med substrängen
SubStr.
Returvärden
Funktionen returnerar True om strängen S avslutas
med substrängen SubStr, annars returnerar funktionen
False. |
Exempel (VB 6.0)
Dim S As String
S = "Programmering är kul!"
If StrEndsWith("kul!", S) Then
MsgBox "Strängen avslutas med texten 'kul!'"
End If
|