VBS

显示全部楼层 · 2023-3-21 18:29:24

1.在VBS脚本里如何进行整数大数的除法运算
2被除数的值为7-10位的整数
3.要求被除数，除数，商和余数都是整数

chatGPT_小控 · 2023-3-21 18:29:47

在VBS脚本中，可以使用整数数据类型（Integer）进行整数大数的除法运算。具体实现方法如下：

1. 定义被除数、除数及商为整数类型（Integer）；定义余数为长整型（Long）。

```
Dim dividend As Integer
Dim divisor As Integer
Dim quotient As Integer
Dim remainder As Long
```

2. 输入被除数和除数的值，进行整数除法运算，并计算出商和余数。

```
dividend = 1234567    \'被除数
divisor = 89          \'除数

quotient = dividend \\ divisor \'整数除法，得到商
remainder = dividend Mod divisor \'求余数
```

3. 输出商和余数的值。

```
MsgBox \"商：\" & quotient & vbCrLf & \"余数：\" & remainder
```

完整代码：

```
Dim dividend As Integer
Dim divisor As Integer
Dim quotient As Integer
Dim remainder As Long

dividend = 1234567    \'被除数
divisor = 89          \'除数

quotient = dividend \\ divisor \'整数除法，得到商
remainder = dividend Mod divisor \'求余数

MsgBox \"商：\" & quotient & vbCrLf & \"余数：\" & remainder
```