這是delphi的for迴圈 先給i賦值為1 i:=1 作為迴圈的初始值 to 的意思的到或者理解為直到 adoquery1是資料查詢控制元件.後面的Fieldlist是欄位列表.Count 是這個列表的數目 所以ADOQuery1.FieldList.Count -1的意思是 ADOQuery1查詢出來的欄位數目減去1作為迴圈的終止值 do 後面的begin end;之間是迴圈體 整個的意思就是I從1開始每次加1 直到i等於 ADOQuery1查詢出來的欄位數目減去1為止 追問： 比如我想迴圈10次 for i := 1 to ADOQuery1.FieldList.Count 10 do 這樣寫為什麼不對呢 回答： 肯定錯了 你想迴圈10次直接 for i := 1 to 10 do 就可以了 為什麼還加前面那個 追問： 哦 我是想寫個迴圈把ADOQuery.1查詢到的資料寫到另一個表裡 回答： 你這樣寫肯定不對，應該用記錄數，而不是欄位數 for i:=0 to ADOquery1.RecordCount -1 do begin ADOQuery2.Close;//加另一個控制元件做資料寫入 ADOQuery2.SQL.Clear; ADOQuery2.SQL.Add("insert into 表2 (欄位1,欄位2,欄位3...) values (:欄位1,欄位2,欄位3)"); parameters.ParamByName("欄位1").Value:=ADOQquey1.fields.fields[查詢對應欄位的下標1].value; parameters.ParamByName("欄位2").Value:=ADOQquey1.fields.fields[查詢對應欄位的下標1].value; ... end;
這是delphi的for迴圈 先給i賦值為1 i:=1 作為迴圈的初始值 to 的意思的到或者理解為直到 adoquery1是資料查詢控制元件.後面的Fieldlist是欄位列表.Count 是這個列表的數目 所以ADOQuery1.FieldList.Count -1的意思是 ADOQuery1查詢出來的欄位數目減去1作為迴圈的終止值 do 後面的begin end;之間是迴圈體 整個的意思就是I從1開始每次加1 直到i等於 ADOQuery1查詢出來的欄位數目減去1為止 追問： 比如我想迴圈10次 for i := 1 to ADOQuery1.FieldList.Count 10 do 這樣寫為什麼不對呢 回答： 肯定錯了 你想迴圈10次直接 for i := 1 to 10 do 就可以了 為什麼還加前面那個 追問： 哦 我是想寫個迴圈把ADOQuery.1查詢到的資料寫到另一個表裡 回答： 你這樣寫肯定不對，應該用記錄數，而不是欄位數 for i:=0 to ADOquery1.RecordCount -1 do begin ADOQuery2.Close;//加另一個控制元件做資料寫入 ADOQuery2.SQL.Clear; ADOQuery2.SQL.Add("insert into 表2 (欄位1,欄位2,欄位3...) values (:欄位1,欄位2,欄位3)"); parameters.ParamByName("欄位1").Value:=ADOQquey1.fields.fields[查詢對應欄位的下標1].value; parameters.ParamByName("欄位2").Value:=ADOQquey1.fields.fields[查詢對應欄位的下標1].value; ... end;