Private Sub save_Click()
  AdoRest.AddNew
  AdoRest("name").Value = Names.Text
  AdoRest("id").Value = Numb.Text
  Set AdoFld = AdoRest("picture")//这句话有什么问题吗,adorest("picture"),picture是字段名称为什么总是:项目在所需的名称或序数中未被发现
  Call saveToDb(AdoFld, FileName)
  AdoRest.update
End Sub