2016-03-22 4 views
0

Есть ли способ удалить последнее слово в текстовом поле? Каждое слово или строка будет разделяться запятой («»)Удалить последнее слово между двумя символами VB.Net

Это то, что я имею в минуту, но я открыт для новых предложений

 Dim deleteItem() As String = Split(TextBox2.Text, ", ") 
     Array.Resize(deleteItem, deleteItem.Length - 1) 
     For i = 0 To UBound(deleteItem) 
      TextBox2.Text = deleteItem(i) 
     Next 

Любая помощь будет большое спасибо :)

+1

'TextBox2.Text = TextBox2.Text.Substring (0, TextBox2.Text.LastIndexOf ("")). Обрезка()' – Codexer

+0

@Codexer я дам, что ответ попробовать, есть все, что мне нужно удалить в моем коде выше ?? –

+1

Все это ...... – Codexer

ответ

1

вы можете использовать LastIndexOf Function

TextBox2.Text = TextBox2.Text.Substring(0,TextBox2.Text.LastIndexOf(",")).Trim() 
+0

Возможно, я надавил свою удачу, но есть ли способ сохранить последнюю запятую ?? вместо этого оставляя строку как это ..... привет .... Можно ли это оставить ... привет, .... –

+0

Есть другие способы, но просто добавьте его обратно 'TextBox2. Text = TextBox2.Text.Substring (0, TextBox2.Text.LastIndexOf (",")). Trim() & "," ' – Codexer

+0

@Codexer, почему бы не так: TextBox2.Text = TextBox2.Text.Substring (0 , TextBox2.Text.LastIndexOf (",") + 1) .Trim() – Benoit

1

Почему бы вам не просто получить подстроку до последнего ,

TextBox2.Text = TextBox2.Text.Substring(0,TextBox2.Text.LastIndexOf(",")) 
Смежные вопросы