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意味着可以轻松定制。

要回答您的问题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之间添加了冒号和美元符号。

在列表框中正确格式化

1 个答案: