设为首页
收藏本站
开启辅助访问
切换到窄版
积分充值
登录
立即注册
微信扫码登录
首页
首页
共享资源
BBS
视频教程
AI机器人
VIP充值
论坛
搜索
搜索
程序分享
文库分享
软件下载
变频手册
干货教程
成套课件
新版AI机器人
老版GPT
最新提现记录
恭喜
admin
于 2023-6-6 15:17 成功提现
500元
恭喜
admin
于 2023-5-3 09:45 成功提现
400元
本版
用户
智控联盟
»
共享资源
›
精选专区
›
ChatGPT专区
›
编程序专区
›
西门子wincc
返回列表
发新帖
西门子wincc
[复制链接]
1971
|
1
|
2023-3-21 18:39:00
来自手机
|
显示全部楼层
|
阅读模式
1.在西门子wincc的VBS脚本里如何进行整数大数的除法运算
2被除数的值为8-10位的整数
3.要求被除数,除数,商和余数都是整数
回复
使用道具
举报
chatGPT_小柔
|
2023-3-21 18:39:21
|
显示全部楼层
以下是一个在西门子wincc的VBS脚本里进行整数大数除法运算的示例代码:
```
\' 定义被除数、除数和商为整型变量
Dim dividend, divisor, quotient As Integer
\' 定义余数为长整型变量
Dim remainder As Long
\' 解析被除数和除数的值(假设都是string类型)
dim strDividend, strDivisor as string
strDividend = \"12345678\"
strDivisor = \"56789\"
dividend = cInt(strDividend)
divisor = cInt(strDivisor)
\' 进行除法运算
quotient = dividend \\ divisor
remainder = dividend Mod divisor
\' 输出结果
MsgBox \"被除数:\" & dividend & vbCrLf & _
\"除数:\" & divisor & vbCrLf & _
\"商:\" & quotient & vbCrLf & _
\"余数:\" & remainder
```
注意,在进行除法运算时,使用了 \"\\ \" 符号表示整数除法,余数则使用了 \"Mod\" 符号运算。另外,当被除数和除数超过了16位时,需要使用其它方式来处理。
回复
使用道具
举报
返回列表
发新帖
高级模式
B
Color
Image
Link
Quote
Code
Smilies
您需要登录后才可以回帖
登录
|
立即注册
本版积分规则
发表回复
回帖后跳转到最后一页
皇甫志宇
20
主题
23
帖子
47
积分
新手上路
新手上路, 积分 47, 距离下一级还需 3 积分
新手上路, 积分 47, 距离下一级还需 3 积分
积分
47
加好友
发消息
回复楼主
返回列表
用户使用心得及帮助
GPT3.5免费体验版
GPT3.5完整版(VIP免费)
自控工程师3.5(VIP免费)
伺服变频维修工程师(VIP免费)
GPT4.0-完整版-线路1(VIP免费)
GPT4.0-完整版-线路2(VIP免费)
GPT4.0-完整版-线路3(VIP免费)
自控工程师4.0版-线路1(VIP免费)
自控工程师4.0版-线路2(VIP免费)
自控工程师4.0版-线路3(VIP免费)
WinCC脚本编程机器人(VIP免费)
万能程序翻译
编程序专区