Question

vb.net如何实现向txt文件写入并且左（或右）对齐？谢谢

向Txt文件写计算结果，第一行是表头，下面是计算结果。

My.Computer.FileSystem.WriteAllText(Basic_info_form.strfilename, " 管段编号 流量（m3/h） 管径（mm） 流速（m/s） 三通位置全压（Pa） 孔板孔径（mm）" & vbCrLf, True)
'用循环向txt文件写入以上计算结果

For intcount As Integer = 0 To intArray

My.Computer.FileSystem.WriteAllText(Basic_info_form.strfilename, intcount + 1 & FormatNumber(dblMainductVolume(intcount), 0) & dblMainductDia(intcount) & FormatNumber(dblMainductVelocity(intcount), 2) & & FormatNumber(dblMainductWholePressure(intcount), 0) & FormatNumber(dblBranchCaculEnding(intcount), 1) & vbCrLf, True)
Next
可以加空格来实现控制每个结果之间的的间距，但是每行结果的位数不同，所以就不对齐了。

Answer 1

思路：
编写一个函数，给它某列的宽度和该列的具体值（文本），
如果是左对齐，返回的字符串右边自动加上合适的空格；
如果是右对齐，返回的字符串左边自动加上合适的空格；

Answer 2

用 LSet(txt, 10)，就是左对齐，每个字符串占10个字符，小于10个用空格自动补齐，