VB6 Shape 控件 BorderWidth >1 与 Dash 样式?

VB6 Shape control BorderWidth >1 with Dash style?

当您在 VB6 中将 Shape 的 BorderWidth 设置为 > 1 时,Style 将被强制为普通线条。

我想要更粗(比如 borderwidth=3)尺寸的虚线(或虚线)边框。

有没有不用手动绘制的方法?

不幸的是,在引擎盖下 GDI Pen 用于绘制形状并在那里施加 1 缇限制。

PS_DASH

The pen is dashed. This style is valid only when the pen width is one or less in device units.

这当然也意味着您也不能使用 GDI API 直接为您完成。

也许绘制一系列偏移 1 缇的线。