AreaPos

应用示例

'!TITLE“通过位置型获取干扰检查领域的中心位置和长方体的方向”
'在aaa中代入区域编号1的干扰检查领域的中心位置和正方体的方向
Sub Sample_AreaPos

  Dim aaa As Position

  '在aaa中代入干扰检查领域的中心位置和正方体的方向
  aaa = AreaPos( 1 )

  '在讯息输出视窗中显示获取的信息
  PrintDbg aaa

End Sub