我的主程序运行界面是表单：这段代码在单个过程中运行没问题，但在主程序中调用时就不行：
....................
IF !ISNULL(oExcel.Intersect(DrtPhoto.TopLeftCell,oExcel.ActiveSheet.Cells(ASCAN;
    (PhotoIdArr,PersonnelIdcard)+1, 4)))
  DrtPhoto.Select
  oExcel.Selection.Copy
  KEYBOARD"{Ctrl+V}" CLEAR
  KEYBOARD"{Alt+F}"
  KEYBOARD"{C}"
  MODIFY GENERAL &aFldList(54,1)   &&&aFldList(54,1)为通用型字段
  _CLIPTEXT=""
ENDIF
..........................
请问高手，还有没有别的办法，代码应怎么写？
谢了。

补充：
我是从excel中导入数据，其他类型的字段都没问题，就卡在了通用字段上，我设想的方法是：
    DrtPhoto.Select    &&选中excel中的照片
    oExcel.Selection.Copy  %%复制
    编辑通用字段
    KEYBOARD"{Ctrl+V}" CLEAR   &&向缓冲区发送快捷键Ctrl+V（粘贴）
    KEYBOARD"{Alt+F}"          &&向缓冲区发送快捷键Alt+F（选中文件菜单）
    KEYBOARD"{C}"              &&向缓冲区发送快捷键C（关闭）
    MODIFY GENERAL &aFldList(54,1)   &&编辑通用型字段
    _CLIPTEXT=""                     &&清空剪贴板

以上代码在单个过程中运行很顺畅，达到的预想的目的，但在主程序（表单）中调用时就不行。

求高手帮忙。

大家都没有办法吗？

REPLACE  通用字段名 WITH  _CLIPTEXT
上面这句代码为什么不行呢？

APPEND GENERAL 通用字段名 FROM 位图文件名
_CLIPTEXT是剪贴板，在上面命令中不能用的

看来是真没有办法.......