Question

我正在为一个班级做这个课程;我有一个列表框，其中包含4个选项，每次选择时都会计算，我应该将结果写出到out.File，以便在被要求时可以检索并显示它们。

Here's an image,so you can see what i mean.

这是我到目前为止为文件部分获得的代码：

'declare a streamwriter variable
    Dim outFile As IO.StreamWriter

    'open file for output
    outFile = IO.File.CreateText("Commercials.txt")

    'write to file
    For intIndex As Integer = 0 To lstCommercial.Items.Count - 1
        outFile.WriteLine(lstCommercial.Items(intIndex))
    Next intIndex

    'close th efile
    outFile.Close()

所以我的问题是，我可以让一切工作，除了它将总数写入文件，结果是不显示。我该怎么做呢？在任何情况下，我做错了什么？

Answer 1

这取决于lstCommercial.Items是什么。如果它是Collection对象，则可以使用以下命令获取项目的索引：

outFile.WriteLine(lstCommercial.Items.Item(intIndex))

如果它是一个数组，那么你应该使用GetUpperBound（0）来查找最后一个索引，而不是使用Count属性来查找长度：

For intIndex As Integer = 0 To lstCommercial.Items.GetUpperBound(0)

我在Visual Basic中的经验很少，所以我可能错了，但我刚从阅读Arrays in Visual Basic和Collection Object (Visual Basic)收集了这些内容。

另外，查看文档here，您可能需要在关闭之前将缓冲区“刷新”到文件中：

outFile.Flush()
'close the file
outFile.Close()

如何写一些金额到文件？

1 个答案: