Question

熟悉VB脚本和ASP的人是否可以快速查看此功能并告诉我它的功能，以便将其翻译成PHP？一开始我可以翻译得很好，它就是它的for循环。这就是我不确定代码究竟在做什么的地方。通过查看它我能做的最好的事情是它通过字符串strTemp创建一个新的总和，添加每个数字的值。感谢。

Function CheckSum (strTemp)
Dim i, intTemp

If Not IsNumeric(strTemp) Then
    CheckSum = 0
    Exit Function
End If

intTemp = 0

For i = 1 To Len(strTemp)
    intTemp = intTemp + CInt(Mid(strTemp, i, 1))
Next

CheckSum = intTemp
End Function

Answer 1

是的，你是对的 - 它通过字符串strTemp并将每个数字的值相加。该函数返回此“校验和”值。

请注意，要使其正常工作，字符串将始终只有数字0-9，这与函数顶部附近的检查有关。

Answer 2

function CheckSum($strTemp) {

    $intTemp = 0;

    if(!(is_numeric($strTemp)){
        $CheckSum = 0
        exit;
    }

    for ($i = 0; $i < count($strTemp); $i++) {
        $intTemp = $intTemp + round(substr($strTemp, i, 1));
    }

    $CheckSum = $intTemp;
}

Answer 3

以下是对正在执行的功能的描述

它接受一个参数，可以是字符串或数字
然后检查它是否为数字。如果它不是数字，则退出函数。
然后循环遍历传递的参数。它使用CInt函数将参数转换为整数。然后使用Mid函数获取该参数的第一个值。现在它将每个数字的值相加并返回值。

您可以阅读Mid function here

翻译ASP功能

3 个答案: