将多列列表框保存到文本文件
我有一个多列列表框，有块名和计数。我想将信息保存到TXT文件中，但要维护列。我知道如何保存到TXT文件，但我不知道如何维护这些列。制表符不起作用，因为某些块名比其他块名长，并且通过使用制表符来设置间距，可能最终导致块计数不对齐理想情况下，我想做的是为块名设置字符串长度（需要包含空格以弥补其他较短/较长块名的差异），然后为块计数设置长度
现在，如果我将块计数信息保存到TXT文件中，它看起来会像这样…
但我希望它看起来像这样……
**** Hidden Message ***** 除非使用固定宽度字体，否则文本不会完全对齐，但您可以将其靠近……
尝试将描述的长度扩展到所需的长度：
Public Function ExpandText (ByVal strSource As String, ByVal intLength As Integer) As String
While Len(strSource) < intLength
strSource = strSource & " "
Wend
ExpandText = strSource
End Function
然后将计数附加到末尾
太好了！谢谢，基思。 不客气。。。 因此，我对下面的函数进行了轻微的更改 - 用句点替换了空格，现在我的输出如下所示。
TXT 文件输出。
再次感谢，基思！ 很高兴它为你工作..现在，如果我能找人帮我弄清楚如何在内存中动态创建一个可以放入ImageList的位图，我就一切就绪了。
页:
[1]