DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Comparing first & last letter of a string

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site

Thread Solved

•

Join Date: Oct 2009

Posts: 16

Reputation: Lida_pink is an unknown quantity at this point

Solved Threads: 0

Lida_pink

Offline

Newbie Poster

Comparing first & last letter of a string

Oct 25th, 2009

How can I check whether the first and last letter of a string are same or not? And if yes, a message should be shown using MsgBox.

Thanks in advance,
Lida

•

Join Date: Mar 2009

Posts: 885

Reputation: vb5prgrmr will become famous soon enough

Solved Threads: 165

vb5prgrmr

Offline

Practically a Posting Shark

Oct 25th, 2009

None Case Sensitive

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
Option Explicit
Option Compare Text
 
Private Sub Form_Load()
Dim S As String
S = "This is a test"
If Left(S, 1) = Right(S, 1) Then MsgBox Left(S, 1) & " matches"
End Sub
Option Explicit
Option Compare Text

Private Sub Form_Load()
Dim S As String
S = "This is a test"
If Left(S, 1) = Right(S, 1) Then MsgBox Left(S, 1) & " matches"
End Sub