在Access报表中实现圆角的矩形
大检查编辑:Access报表中的圆角矩形
以下代码可用于在报表中实现圆角矩形。
调用方法:在报表的节的格式事件或页面的页面事件中调用。
Private Sub Detail_Format(取消为整数,格式化计数为整数)
圆角盒4000,6000,100,200,300,我
末端接头
原作者:不详
翻译:tmtony(access/Office中国)
创建一个新模块,并添加以下代码
子圆角框(_
与...一样长
一样长,一样高
只要不停止,_
英格利夫长,_
lngRadius一样长,_
RPT报告为报告)
Dim sngStart为Single
Dim sngEnd为Single
Dim dblPI为Double
dblPI = 3.14159265359
左上角
sngStart = 2 * dblPI * 0.25 '饼图切片的开始。
sngEnd = 2 * dblPI * 0.5 '饼图切片的结尾。
rptReport。Circle (lngLeft + lngRadius,_
lngTop + lngRadius),_
lngRadius、vbBlue、sngStart、sngEnd
大字标题
位律师回复
0条评论