怎样把checklistbox中选中的值，写到数据库备注字段中？

Question

delphi6
access
win2000
我想做个小组搭配的功能，所以在checklistbox中选择成员，然后把值写到数据库中的备注字段，但不知道怎么写，高手帮帮忙？

Answer 1

for i:= 1 to CheckListBox1.Items.Count do 
begin
  if CheckListBox1.Checked[i-1] then
  begin  
    adotable1.FieldByName('username').value :=CheckListBox1.Items[i-1];
......

Answer 2

for i:= 1 to CheckListBox1.Items.Count do 
begin
  if CheckListBox1.Checked[i-1] then
  begin
    stMemo= stMomo + CheckListBox1.Text;
.....
adotable1.FieldByName('f_memo').value:=stMemo;

Answer 3

stMemo是什么？不好意思我很菜