如何在FlexGrid中添加一条记录

Question

先格式化表格﹐列數与數据集列數一樣
If Rs1.State = 1 Then Rs1.Close
Rs1.Open "select Part_Name,Part_NO ,Part_Type,Part_Unit,Unit_Price ,Quantity,Re from tbl_stock where group_no='" & format_p(Cmbgroup_no) & "'", cn1, adOpenForwardOnly, adLockReadOnly
Do While Rs1.EOF = False
    cmbpart_name.AddItem Rs1.Fields(1).Value
    List1.AddItem Rs1.Fields(1).Value
    cmbpart_lname.AddItem Rs1.Fields(0).Value
    Rs1.MoveNext
Loop
Rs1.Close

Answer 1

中间用Chr(9)隔开
MSFlexGrid1.AddItem "field1" & Chr(9) & "field2" & Chr(9) & "field3" ...