用visio画直角坐标系中的图，坐标轴怎么画？

在Visio的科学图形包中有现成坐标轴，但好像没有坐标轴上的刻度，如果刻度只是为了示意可以考虑自己添加
画好一个连线或者线段之后，选中>右键>格式>线条>条中选择线段末端的样式，其中有箭头的形状和其他你所需要的
看想画什么样子的了， 使用visio的时候，画图都是自己用直线和箭头做的坐标轴，然后把箭头导入到自己的收藏里，这样下次画图用到了就还可以用了。

VB画坐标轴方法：
Private Sub Form_paint()
Dim i, j As Integer
MeCurrentX = 0
MeCurrentY = 0
Print 0
MeScaleMode = 3
MeLine (0, 0)-(0, 3000)
MeLine (0, 0)-(3000, 0)
For i = 100 To 3000 Step 100
MeLine (i, 0)-(i, 10)
temp = i
CurrentX = i - TextWidth(temp) / 2
Print i
Next
For i = 100 To 3000 Step 100
MeLine (0, i)-(10, i)
temp = i
CurrentY = i - TextHeight(temp) / 2
Print i
Next
End Sub
加箭头
Private Sub Form_paint()
Dim i, j As Integer
MeCurrentX = 10
MeCurrentY = 10
Print 0
MeScaleMode = 3
MeLine (10, 10)-(10, 600)
MeLine (10, 10)-(600, 10)
For i = 100 To 500 Step 100
MeLine (i, 10)-(i, 20)
temp = i
CurrentX = i - TextWidth(temp) / 2
Print i
Next
For i = 100 To 500 Step 100
MeLine (10, i)-(20, i)
temp = i
CurrentY = i - TextHeight(temp) / 2
Print i
Next
MeLine (590, 20)-(600, 10) 'x箭头
MeLine (590, 0)-(600, 10) 'x箭头
MeLine (0, 590)-(10, 600) 'y箭头
MeLine (20, 590)-(10, 600) 'y箭头
End Sub

1、打开photoshop软件，新建一块画布，如下图所示。

2、点击画笔，选择好粗细，按住shift可以画直线。

3、选择图形工具的自定义图形工具，找到“箭头”图形。

4、把箭头加到一头去，然后合并可见图层。

5、复制一下图层，接下来就在副本上 *** 作即可。

6、对副本进行逆时针（90度）。

7、用魔棒去除背景（只留下坐标线即可，防止背景挡住线），然后把两根线移至如图。

8、再画好刻度线，用文字工具添加数字，坐标系就完成了。

基本步骤如下：
1执行“绘图/绘图网格/在屏幕上显示网格（注意数据设置）/确定”命令，使页面上显示绘图网格；
2用“绘图”工具栏上的“箭头”画坐标轴，画时按住Shift键，保证画出的线水平、垂直；
3用“直线”或“椭圆”画坐标轴上的刻度；
4用“本框”制作数轴上数据标识；
5把直线、刻度、数据标识同时选中并右击，执行“组合/组合”命令，把所有图形组合起来成为一个完整的平面直角坐标系，便于整体移动摆放。
6用“椭圆”制作坐标点（画时按住Shift键）、用“直线”画点向坐标轴引的垂线、用“文本框”制作点的坐标。
7用“绘图”工具栏上的“自选图形”制作函数图形。

参考资料：

百度知道在2006年有人问过，此答案是转贴的

---