使用 For 循环获取 Lua 表项

Question

我使用 Lua 制作了一个表格和游戏脚本。概念如下： 从用户猜测从表中获取的随机词（第一个索引）开始，如果用户回答正确，则显示下一个随机词（下一个表条目），依此类推，直到显示所有表条目。

如何在 Lua 中使用 for..do 使其循环？

我当前的代码：

WordTable = {
  {lv = 1, v_random = "LEOHL", v_word = "HELLO"},
  {lv = 1, v_random = "GEEINN", v_word = "ENGINE"},
  {lv = 1, v_random = "TECHA", v_word = "CHEAT"},
  {lv = 2, v_random = "dwIl prEARmgorm", v_word = "WILD PROGRAMMER"},
  {lv = 2, v_random = "abDEKory deEPRss", v_word = "KEYBOARD PRESSED"},
 }

function tablelength(T)
  local count = 0
  for _ in pairs(T) do count = count + 1 end
  return count
end

function getTypingWord()
 local score = 0
 local point = 0
 index = 1
 count = tablelength(WordTable)
 tab = WordTable[index]

 for index=1,count do
 local rdmWord = tab.v_random
 local crtWord = tab.v_word
 labelWrd.Caption = rdmWord

 local mcWord = string.upper(edtWrd.Text)
 -- edtWrd is a text box

 if mcWord == '' or mcWord == nil then return nil end

 if mcWord == crtWord then
  showMessage('Great, the answer is '..crtWord)
  edtWrd.Text = ''
  point = point+1
  score = point*200
  labelLevel.Caption = 'True : '..point  -- a label
  labelScore.Caption = 'Score : '..score -- a label
  index = index + 1
  tab = WordTable[index]
 else
  showMessage('Try Again')
  edtWrd.Text = ''
 end
 end
end

-- wait user answer till ENTER key has pressed
edtWrd.OnKeyPress = function(sender, key)
if isKeyPressed(VK_RETURN) then getTypingWord() end
 return key
end

Answer 1

已解决：以下示例

 data = {
        {id = 'ronald', say = 'reagan'},
        {id = 'tom', say = 'hank'},
        {id = 'angelina', say = 'jolie'}
        }

 function tablelength(T)
   local count = 0
   for _ in pairs(T) do count = count + 1 end
   return count
 end

 count = tablelength(data)
 i = 1
 edt = UDF1.CEEdit1  -- edt is the name of textbox

 function CEEdit1KeyPress(sender, key)
  answer = data[i]
  v_word = answer.id..' '..answer.say
  tipo = string.lower(UDF1.CEEdit1.Text)

  if tipo == "" and isKeyPressed(VK_RETURN)== true then return nil end

  if tipo ~= v_word then
   if isKeyPressed(VK_RETURN) == true then
   showMessage('Try again..')
   edt.Text = ''
  end
  elseif tipo == v_word then
   if isKeyPressed(VK_RETURN) == true then
   showMessage('OK. Then answer is : '..v_word)
   edt.Text = ''
   i = i+1
    if i > count then showMessage('All words have displayed') end
  end
 end
 return key
end

UDF1.show()  --Show Form