vb编写判断奇,偶数的函数过程。从文本框输入一个正整数,调用函数过程判断奇偶函数,判断结果显示在标签中

日期:2012-05-15 16:04:23 人气:2

vb编写判断奇,偶数的函数过程。从文本框输入一个正整数,调用函数过程判断奇偶函数,判断结果显示在标签中

Public Function 偶数(ByVal N&) As Boolean 偶数 = (N Mod 2 = 0) End Function 调用函数过程: MsgBox 偶数(val(text1.text))
    A+
热门评论