请教:如何在vb里实现像word那样画出一个圆,圆可以遮挡别的图形,而圆的外切矩形不遮挡

cshchina 2002-05-21 03:08:57
请各位指教了
...全文
149 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用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分的
本文基于中国A股上市企业数据,分析了逻辑型和学习型AI技术应用对企业创新的影响。通过机器学习生成AI词典并分析年报文本,测量AI应用水平。研究发现,AI应用通过增加知识多样性、打破组织惯例和提高资源配置效率促进企业创新,且企业的吸收能力增强了这一促进作用 参照李玉花(2024)的做法,团队对来自中国工业经济《人工智能技术应用如何影响企业创新》一文中的基准回归部分进行复刻 团队将原文数据更新至2023年,并对基准回归进行复刻。数据年份为2007-2023年,包括原始数据、处理dofile,基准回归代码 一、数据介绍 数据名称:人工智能技术应用如何影响企业创新 数据范围:A股上市公司 数据年份:2007-2023年 有效样本:33615条 数据说明:参考《管理世界》中姚加权(2024)的做法,测算人工智能水平 内含原始数据、dofile和基准回归 二、数据指标 股票代码 股票简称 年份 省份 城市 区县 省份代码 城市代码 区县代码 行业代码 行业名称 企业上市年龄_年 是否ST或金融类 总资产_万元 营业收入增长率_% 资产负债率_% 总资产收益率_% 研发投入占营业收入比例_% 人工智能词频和 人工智能词频和加1取对数 企业专利申请总量 企业发明专利申请量 企业专利授权总量 企业发明专利授权量 三、参考文献 李玉花,林雨昕,李丹丹.人工智能技术应用如何影响企业创新[J].中国工业经济,2024,(10):155-173.

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧