熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> PB編程 >> 正文

在PB中實現Word內容的替換[2]

2013-11-23 17:26:16  來源: PB編程 

  .插入或替換操作

  ()替換數據法

  string ls_find_stringls_replace_string
  //取數據庫中數據賦值變量ls_replace_string(程序略)
  ls_find_string = student_name
  ls_replace_string = 張某 ole_WordobjectapplicationSelectionfindExecute  (ls_find_stringfalsetruefalsefalsefalsetruetruels_replace_string)
  //替換student_yeardepartmentstudent_id的程序與替換student_name相同

  其運行結果如圖所示

  ()插入數據法

  除了使用查找替換方式您還可以使用書簽方式來實現上述操作
  string ls_namels_yeardepartmentls_id
  //取數據庫中數據賦值變量ls_namels_yeardepartmentls_id(程序略)
  IF ole_WordobjectapplicationActiveDocumentBookmarksExists(name) THEN
ole_Wordobjectapplicationactivedocumentbookmarksitem(name)select
    //定位書簽name
    ole_Wordobjectapplicationselectiontypetext(ls_name)
    //插入值
    for i = to
      //消除非法字符
      ole_WordobjectapplicationSelectionTypeBackspace()
      next
  ELSE//錯誤提示
  END IF
  //定位書簽yeardepartmentid一樣

[]  []  []  


From:http://tw.wingwit.com/Article/program/PB/201311/24578.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.