Правильное форматирование в списке

Question

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

Я хочу добавить знаки доллара к своим номерам и выровнять их слева. Любая помощь будет оценена по достоинству. В настоящее время они выглядят очень неряшливо.

Dim salesTotal As Double 
    customerListBox.Items.Add("Customer: " & "      " & "Total Sale: ") 
    For Each record As DataRow In Me._442_Project_Part_2DataSet.Customers 
     salesTotal += Double.Parse(CStr(record.Item("YTDSales"))) 
     customerListBox.Items.Add((CStr(record.Item("CustomerName"))) & "   " & (CStr(record.Item("YTDSales")))) 
     customerListBox.Items.Add("------------------------------------------------") 
    Next 

Answer 1

Прежде всего, ListBox arn't должен быть легко настраиваемым.

Чтобы ответить на ваш вопрос I want to add dollar signs to my numbers, and left align them, вам необходимо использовать функцию String.PadLeft.

customerListBox.Items.Add((CStr(record.Item("CustomerName"))) & " : $" & (CStr(record.Item("YTDSales"))).PadLeft(8)) 

Примечание: я добавил 8 пробелов в этом примере. Это может варьироваться в зависимости от числа, которое у вас есть. Я также добавил знак двоеточия и доллара между CustomerName и Sales.