UG爱好者

标题: 闲的无聊跟新手们分享点东西 [打印本页]

作者: 野狼爱小宝 时间: 2024-7-17 16:12
标题: 闲的无聊跟新手们分享点东西
要把下面的代码复制到记事本里然后另存为 1.vbs 后缀的文本就好了双击执行, 输入刀具直径,点击确定就出来了,去整数就OK了

do
a=inputbox ("tool ")
if a = "" then
a=inputbox(" ")
else
b=a/2
c=(b*b)*2
d=sqr(c)
e=a/2
f=d-e
msgbox f
exit do
end if
loop

作者: 主白 时间: 2024-7-17 16:34
弄啥来这是？干什么用的？

作者: ccj0601 时间: 2024-7-17 16:40
电脑给我弄死机了

作者: 事过境迁 时间: 2024-7-17 18:59
do：开始一个循环。
a=inputbox ("tool ")：弹出一个输入框，提示用户输入内容，并将输入的内容赋值给变量a。
if a = "" then：检查用户输入的内容是否为空。
a=inputbox(" ")：如果用户没有输入任何内容（即输入为空），则再次弹出输入框，提示用户输入。
else：如果用户输入了内容，执行以下操作：
b=a/2：将输入的数字除以2，结果赋值给变量b。
c=(b*b)*2：计算变量b的平方，再乘以2，结果赋值给变量c。
d=sqr(c)：计算变量c的平方根，结果赋值给变量d。
e=a/2：将输入的数字除以2，结果赋值给变量e。
f=d-e：计算变量d减去变量e的结果，赋值给变量f。
msgbox f：弹出一个消息框显示变量f的结果。
exit do：退出循环。
end if：结束条件判断。
loop：继续循环。

作者: aq626262 时间: 2024-7-18 08:05
得到的数字有什么含义？

作者: 野狼爱小宝 时间: 2024-7-18 08:30

事过境迁发表于 2024-7-17 18:59
do：开始一个循环。
a=inputbox ("tool ")：弹出一个输入框，提示用户输入内容，并将输入的内容赋值给变量 ...

大神,你好无聊

作者: 野狼爱小宝 时间: 2024-7-18 08:31

ccj0601 发表于 2024-7-17 16:40
电脑给我弄死机了

抱歉

作者: 野狼爱小宝 时间: 2024-7-18 08:35
大家抱歉啊 2D刀路参考刀具比如说 D63的刀具,最小清角刀具13 只是做辅助用

作者: 野狼爱小宝 时间: 2024-7-18 11:17

aq626262 发表于 2024-7-18 08:05
得到的数字有什么含义？

清角最小刀具

欢迎光临 UG爱好者 (https://www.ugsnx.com/)