Eng.moaiedi
پنج شنبه 06 فروردین 1394, 19:44 عصر
با سلام خدمت دوستان یک کدی رو توی پی اچ پی نوشتم الان همون رو توی وی بی دات نت نوشتم ولی خروجی ها کاملا متفاوت هست ممنون میشم راهنمایی بفرمایید.
کد پی اچ پی :
public function chk($str)
{
$counter=9;
for($i=97;$i<=(97+25);$i++)
{
++$counter;
if(strtolower($str)==chr($i))
{
return $counter;
}
else if(is_numeric($str))
{
return $str;
}
}
}
وی بی دات نت :
Private Function check(ByVal StrCode As String) As String
Dim IntCounter As Integer
Dim Counter As Integer
IntCounter = 9
For Counter = 97 To (97 + 25)
IntCounter += IntCounter
If StrCode.ToLower() = Chr(Counter) Then
StrCode = IntCounter
ElseIf (IsNumeric(StrCode)) Then
StrCode = StrCode
End If
Next
Return StrCode
End Function
کد پی اچ پی :
public function chk($str)
{
$counter=9;
for($i=97;$i<=(97+25);$i++)
{
++$counter;
if(strtolower($str)==chr($i))
{
return $counter;
}
else if(is_numeric($str))
{
return $str;
}
}
}
وی بی دات نت :
Private Function check(ByVal StrCode As String) As String
Dim IntCounter As Integer
Dim Counter As Integer
IntCounter = 9
For Counter = 97 To (97 + 25)
IntCounter += IntCounter
If StrCode.ToLower() = Chr(Counter) Then
StrCode = IntCounter
ElseIf (IsNumeric(StrCode)) Then
StrCode = StrCode
End If
Next
Return StrCode
End Function