منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم

ممكن طريقة حدف اخر حرف في التكست كلما نضغط على بوتنبوتن مثلا يوجد في التكست كلمة فيجوال فعند الضغطة الاولى سيحدف حرف اللام وفي الضغطة الثانية سيحدف الالف وهكدا

يمكن استخدام Trim.End

جرب هذا الكود :

PHP كود :

If TextBox1.Text <> "" Then
            TextBox1.Text = TextBox1.Text.Substring(0, TextBox1.Text.Length - 1)
        End If 

PHP كود :

       While TextBox1.Text.Length > 0
            TextBox1.Text = TextBox1.Text.Substring(0, TextBox1.Text.Length - 1)
        End While 

(08-05-17, 05:00 AM)silverlight كتب : [ -> ]
PHP كود :

While TextBox1.Text.Length > 0 TextBox1.Text = TextBox1.Text.Substring(0, TextBox1.Text.Length - 1) End While

الكود يحذف كل ما في الـ(TextBox)
Huh

أنت أدق يا أسامة ... أنا اللي كنت نايم و ما لاحظت ان الكود غير كامل

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 

مشكورين وبارك الله فيكم

(08-05-17, 03:13 AM)المتألق9 كتب : [ -> ]السلام عليكم

ممكن طريقة حدف اخر حرف في التكست كلما نضغط على بوتنبوتن مثلا يوجد في التكست كلمة فيجوال فعند الضغطة الاولى سيحدف حرف اللام وفي الضغطة الثانية سيحدف الالف وهكدا

وعليكم السلام

ممكن بسطر واحد :

كود :

 If TextBox1.Text = "" Then Exit Sub

TextBox1.Text = Mid(TextBox1.Text, 1, TextBox1.TextLength - 1)

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

المتألق9

silverlight

أسامة السالمي

silverlight

أسامة السالمي

silverlight

المتألق9

حريف برمجة