帮我看看这个程序怎么样转成VB交流一下
void CConDoc::Move()
{ long StartX=0,StartY=0;
get_abs_pos(1,&StartX);//获得X轴的位置
get_abs_pos(2,&StartY); //获得Y轴 的位置
int ConSpeed;
UpdateData(TRUE);
ConSpeed=atoi(m_Speed);//设置速度
set_vector_conspeed(ConSpeed);//变更速度
con_line2(1,(int)(Line[SSum].XEnd-
StartX)*P,2,(int) (Line[SSum]
.YEnd-StartY)*P);
//两轴线性插补函数,参数1,2为轴号,P是单位长度的脉冲数