удалить последние две строки char!

Question

Следующий код:

If checkboxList.Items(i).Selected Then 
    .Fields("DESC1").Value += checkboxList.Items(i).Text + ", " 
End If 

должен производить выход, такие как "A, B, C, (пробел)", который затем будет привязан к динамически создаваемых GridView. Я хотел бы удалить последнюю строку с двумя символами, то есть «, (пробел)». Как я могу это сделать?

Answer 1

Я бы не добавить их в первую очередь :) попробовать

If checkboxList.Items(i).Selected Then  
    if .Fields("DESC1").Value Is System.DbNull.Value then 
     .Fields("DESC1").Value = checkboxList.Items(i).Text 
    else 
     .Fields("DESC1").Value += ", " + checkboxList.Items(i).Text 
    End If 
End If 

Answer 2

Кажется, вы просто хотите получить «A, B, C» от ​​«A, B, C». Немного простых манипуляций со строками должен делать эту работу:

Dim input = "A, B, C, " 
Dim result = input.Substring(0, input.LastIndexOf(",")) 

Это более универсален, чем просто ликвидируя последние два символа, так как это выглядит для последней запятой, что это то, что я считаю, что вы после этого.

Конечно, факт, что вы добавляете эти два символа, в первую очередь звучит немного изворотливым. Однако мне нужно будет увидеть больше контекста, чтобы показать, как этого можно избежать.

Answer 3

Вы можете использовать .TrimEnd («» .ToCharArray()) на строке, или вы можете использовать подстроку:

strLetters.Substring(0, strLetters.Length - 2) 

Answer 4

использование

.Fields("DESC1").Value += checkboxList.Items(i).Text + ", " 

. Fields("DESC1").Value = .Fields("DESC1").Value.TrimRight(new []{',',' '}); 

PS: - простите, если это не действует VB синтаксис :)

Answer 5

Существует также просто «Удалить»:

string k = "okay"; 
string s = k.Remove(k.Length - 2, 2); 

Answer 6

ли VB есть трехкомпонентной если оператор?

If checkboxList.Items(i).Selected Then 
    .Fields("DESC1").Value += checkboxList.Items(i).Text + (i == checkboxList.Items.Length-1 ? "" : ", ") 
End If 

Answer 7

Посмотрите на String.Join, который может делать то, что вы хотите, без необходимости манипулировать последних двух символов.

Answer 8

Это удалит все завершающие и/или [пробел]:

.Fields("DESC1").Value = .Fields("DESC1").Value.TrimRight(", ".ToCharArrray()) 

Answer 9

Для получения информации, конкатенация дорого. Он выглядит (от i и от результатов), как будто вы действительно должны использовать StringBuilder; некоторые грубые псевдо-код (в C#, но тривиально перевести VB.Net):

StringBuilder sb = new StringBuilder(); 
for(int i = 0 ; i < checkboxList.Items.Count ; i++) { 
    if(checkboxList.Items[i].Selected) { 
     if(sb.Length > 0) sb.Append(", "); // add separator 
     sb.Append(checkboxList.Items[i].Text); // add text 
    } 
} 
someOjb.Fields("DESC1") = sb.ToString(); // use result 

Answer 10

var selectedValues = checkboxList.Items 
    .Where(i => i.Selected) 
    .Select(i => i.Fields("DESC1").Value); 

var result = String.Join(", ", selectedValues);