谢谢你，我现在采用text了，现在还有一个问题，就是我先显示“序号”、“点数”、“误差”，然后接下来再显示数组怎么做呢？这是我的效果：你看看，有重复，如何不让他重复？怎么放图片啊？

[ 本帖最后由 kunsong 于 2014-5-3 20:04 编辑 ]

format函数似乎只对数字、日期有效，对文本不起作用，我觉得自己写个函数处理比较方便，如下：
private function StrFmt(ExtPr as string,sLen as integer,Align as boolean) as string
  dim a as string
  a=left(extpr,slen)
  if align then
    StrFmt=a & space(slen-len(a))     '左对齐
  else
    StrFmt=space(slen-len(a)) & a     '右对齐
  endif
end function

调用方法
list1.additem   StrFmt("序号",8,true) & StrFmt("点数",8,true) & StrFmt("误差",8,true)

你这个没错，楼主想的是第一行显示文本
接下来全是，数据，类似于Excel，
昨晚，我们已经解决这个问题了，