插入的圖片只能控制大小，無法移動，請高手賜招，謝謝。
* VFP中控制WORD圖片大小
CLEAR
lcFileName=GETPICT()
IF !FILE(lcFileName)
MESSAGEBOX(\"請選擇圖片檔案\")
RETURN
ENDIF
***請修改測驗圖片位置
oword=createobject("word.application")
oword.Visible=.t.
oword.Documents.add
oword.Selection.InlineShapes.AddPicture( lcFileName,.f.,.t.)
oword.Documents(1).InlineShapes(1).ScaleWidth=10 &&圖片顯示寬比例
oword.Documents(1).InlineShapes(1).ScaleHeight=10 &&圖片顯示高比例
*oword.Documents(1).InlineShapes(1).Top = 0
*oword.Documents(1).InlineShapes(1).IncrementLeft = 0
RETURN
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/57388.html
標籤：VFP
上一篇：Invalid <url-pattern> [KaochaCorrectServlet] in servlet mapping
下一篇：vfp如何連接本地的資料庫