08-05-17, 02:44 PM
(آخر تعديل لهذه المشاركة : 08-05-17, 02:47 PM {2} بواسطة silverlight.)
أنت أدق يا أسامة ... أنا اللي كنت نايم و ما لاحظت ان الكود غير كامل
أو
PHP كود :
Dim source As String = Me.TextBox1.Text
If Not String.IsNullOrEmpty(source) Then
Dim chrs As Char() = source.ToCharArray()
Dim lastChar As Char = chrs(source.Length - 1)
While source.Length > 0 AndAlso source(source.Length - 1) = lastChar
source = source.Substring(0, source.Length - 1)
End While
Me.TextBox1.Text = source
End If
PHP كود :
Dim s As String = Me.TextBox1.Text
If Not String.IsNullOrEmpty(s) Then
Dim chrs As Char() = s.ToCharArray()
Dim last As Char = chrs(s.Length - 1)
Me.TextBox1.Text = Me.TextBox1.Text.TrimEnd(last)
End If

