Selection.InlineShapes.AddPicture FileName:="C:\Cap1.bmp", LinkToFile:= _
False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.InlineShapes(1).LockAspectRatio = msoTrue
Selection.InlineShapes(1).Height = 20
Selection.InlineShapes(1).Width = 20
--------------------------------------------------------------------------------------------
Selection.InlineShapes.AddPicture FileName:="C:\Cap1.bmp", LinkToFile:= _
False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend这两句我已经会了 ,下面设置图片大小那几句在vc中怎么写呢?用ShapeRange类吗?苦恼了很久,帮帮忙谢谢了
False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.InlineShapes(1).LockAspectRatio = msoTrue
Selection.InlineShapes(1).Height = 20
Selection.InlineShapes(1).Width = 20
--------------------------------------------------------------------------------------------
Selection.InlineShapes.AddPicture FileName:="C:\Cap1.bmp", LinkToFile:= _
False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend这两句我已经会了 ,下面设置图片大小那几句在vc中怎么写呢?用ShapeRange类吗?苦恼了很久,帮帮忙谢谢了
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货