在图片框用点,直线,圆画图形,并且在里面标注上文字,和汉字,怎么

先用直线画菱形（同时用print方法输出字符）
然后用画圆弧方法画两个半圆和一个四分之一圆
再擦除（用底色画）菱形上部两线段
用右斜线填充上部空间
最后用直线恢复菱形上部

那样的化
文字和图形是在那个控件里面
窗体还是图片框

谢谢老师们的帮助

怎么在线段的端点位置标注文字ABCD

在窗体form1显示字体,并定义大小
在线段终端显示字符"a"
FontSize =8 '定义字体大小
Line (500,500)-(5500, 1800)
Print"a" '在(5500, 1800)显示a
在圆心显示字符"o"
FontSize =8 '定义字体大小
Circle (1500, 1500),1900
Me.Print"o" '在(1500, 1500)显示o
在坐标 (2000, 2000) 处显示字符
FontSize =16 '定义字体大小
PSet(2000, 2000), QBColor(7): '画点 白色 不显点 ok
Me.Print"白点 PSet (2000, 2000)"'在(2000, 2000)显示"点 PSet (2000,2000)"
FontSize =8 '定义字体大小