$Visio->Application->ActiveWindow->Page->DrawLine(3.1875, 8.75, 4.875, 7.5);