vb2010 偶数判断函数

发布时间：2020-12-16 22:30:45 所属栏目：大数据来源：网络整理

导读：Public Function 偶数判断(ByVal 需要判断的数字 As Long) As Boolean '判断是不是偶数，就可以知道是不是奇数了 Dim 返回结果 As Boolean = True If 需要判断的数字 Mod 2 = 0 Then 返回结果 = True Else 返回结果 = False End If Return 返回结果 End Func

Public Function 偶数判断(ByVal 需要判断的数字 As Long) As Boolean '判断是不是偶数，就可以知道是不是奇数了
        Dim 返回结果 As Boolean = True
        If 需要判断的数字 Mod 2 = 0 Then
            返回结果 = True
        Else
            返回结果 = False
        End If
        Return 返回结果
    End Function

中英文混合，呵呵

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!