ʹ�ò���턓(chu��ng)���݈D�r(sh��)����(bi��o)ע�ߴ��Ƿdz���Ҫ��һ����һ����f�݈D��(chu��ng)����ɺ���Ҫ��ȫ���x������݈D����δ��ȫ���x�ľ����������ו�(hu��)���`�޸�,�@�Dz����S����

�ߴ��(bi��o)ע�ֳɃɂ�(g��)���E��

��һ�����x����Ҫ��(bi��o)��(zh��n)�ߴ�Č�(du��)������ô�����ڄ�(chu��ng)���þ��κ���ô�x���������䌍(sh��)�҂���ʹ��SketchManager��(du��)��(chu��ng)��ֱ����A�r(sh��),��(hu��)���ؾ��Ό�(du��)��(SketchSegment��(du��)�󣩵����ã����x���@һ�����ɾ��Ό�(du��)�����������a���£�

        Dim Line1 As SldWorks.SketchSegment

        Dim Line2 As SldWorks.SketchSegment

        Dim Line3 As SldWorks.SketchSegment

        Dim Cir As SldWorks.SketchSegment

        Line1 = Sketchmer.CreateLine(0, 0, 0, 0, 0.3, 0) '��(chu��ng)��ֱ��1�����،�(du��)�������

        Line2 = Sketchmer.CreateLine(0, 0, 0, 0.2, 0, 0) '��(chu��ng)��ֱ��2�����،�(du��)�������

        Line3 = Sketchmer.CreateLine(0.2, 0, 0, 0, 0.3, 0) '��(chu��ng)��ֱ��3�����،�(du��)�������

        Cir = Sketchmer.CreateCircleByRadius(0.06, 0.08, 0, 0.025) '��(chu��ng)���A��1�����،�(du��)�������

        Line1.Select4(False, Nothing) '�x��ֱ��1

���Ό�(du��)��ijɆT�д���Select4()�������{(di��o)��ԓ�����Ϳ��Ԍ�(sh��)�F(xi��n)���ε��x�����҂����Կ�����ֱ��1�ѽ�(j��ng)���x����

ֵ���ᵽ�����������(bi��o)ע���ˆD�ijߴ磬�҂���(y��ng)ԓ��ô����

�҂���Ҫͬ�r(sh��)�x�ЈA��ֱ�����@�r(sh��)��Select4()�����ĵ�һ��(g��)����(sh��)��Ҫ�Ğ顰True������?y��n)����?/font>False������ȡ��֮ǰ���x�Ќ�(du��)�����x�Ю�(d��ng)ǰ��(du��)��������True��������ȡ��֮ǰ���x�еČ�(du��)�󡣴��a���£�