社区
VB基础类
帖子详情
请教:如何在vb里实现像word那样画出一个圆,圆可以遮挡别的图形,而圆的外切矩形不遮挡
cshchina
2002-05-21 03:08:57
请各位指教了
...全文
159
4
打赏
收藏
请教:如何在vb里实现像word那样画出一个圆,圆可以遮挡别的图形,而圆的外切矩形不遮挡
请各位指教了
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
daturawing
2002-05-21
打赏
举报
回复
原来如此,我看看好了,大概的意思已经知道了
这样操作如何:
在form中增加一个shape控件,必须要有的。
然后通过mousedown,mousemove,mouseup来确定circle的圆心、半径
在mouseup的时候生成一个shape控件
生成的写法:
Set cmd = form.Controls.Add("VB.shape", "shape")
其中form是object对象
你可以试试看,在不行的话,我就写写。
lou_df
2002-05-21
打赏
举报
回复
做一个圆形窗口,想遮那里就遮那里。
daturawing
2002-05-21
打赏
举报
回复
操作中,如果由此项操作时,通过鼠标状态来控制添加shape空间不就可以解决了吗?我不知道是不是我想得太简单。还是没有理解搂主的意思!!
cshchina
2002-05-21
打赏
举报
回复
帮我解决了,我会再加100分的
DirectX修复工具V4.3标准版
DirectX修复工具(DirectX Repair)是一款系统级工具软件,简便易用。 本程序的主要功能是检测当前系统的DirectX状态,如果发现异常则进行修复。程序主要针对0xc000007b问题设计,可以完美修复该问题。本程序中包含了最新版的DirectX redist(Jun2010),并且全部DX文件都有Microsoft的数字签名,安全放心。 本程序为了应对一般电脑用户的使用,采用了易用的一键式设计,只要点击主界面上的“检测并修复”按钮,程序就会自动完成校验、检测、下载、修复以及注册的全部功能,无需用户的介入,大大降低了使用难度。在常规修复过程中,程序还会自动检测DirectX加速状态,在异常时给予用户相应提示。 本程序适用于多个操作系统,如Windows XP、Windows Vista、Windows 7、Windows 8、Windows 8.1、Windows 8.1 Update、Windows 10、Windows 11,同时兼容32位操作系统和64位操作系统。本程序会根据系统的不同,自动调整任务模式,无需用户进行设置。
DirectX修复工具V4.3增强版
DirectX修复工具(DirectX Repair)是一款系统级工具软件,简便易用。 本程序的主要功能是检测当前系统的DirectX状态,如果发现异常则进行修复。程序主要针对0xc000007b问题设计,可以完美修复该问题。本程序中包含了最新版的DirectX redist(Jun2010),并且全部DX文件都有Microsoft的数字签名,安全放心。 本程序为了应对一般电脑用户的使用,采用了易用的一键式设计,只要点击主界面上的“检测并修复”按钮,程序就会自动完成校验、检测、下载、修复以及注册的全部功能,无需用户的介入,大大降低了使用难度。在常规修复过程中,程序还会自动检测DirectX加速状态,在异常时给予用户相应提示。
章鱼哥出品—
VB
.NET 如何绘制
圆
角
矩形
,并适应窗体大小
Public Class Form1 '********************************************************************* '作者:章鱼哥,QQ:3107073263 群:309816713 '如有疑问或好的建议请联系我,大家一起进步 '**********************
vb
.net绘制
图形
方法
简述
VB
.NET绘制
图形
学习
VB
.NET时,你可能会遇到
VB
.NET绘制
图形
问题,这
里
将介绍
VB
.NET绘制
图形
问题的解决方法,在这
里
拿出来和大家分享一下。 1.创建Graphics对象
VB
.NET绘制
图形
需要指定绘图表面。其中,窗体和所有具有Text属性的控件都可以作为绘制
图形
的表面。因为Graphics对象标识GDI+的绘图表面,所以,绘制
图形
必须先创建Graphics对象。创建Gr...
vb
6.0
实现
picturebox
圆
形显示
Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long '创建
一个
椭
圆
,该椭
圆
与X1,Y1和X2,Y2坐标点确定的
矩形
内切 Private Declare Function SetW
VB基础类
7,787
社区成员
197,583
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章