VB如何判断奇偶数

1、打开VB软件，建立一个标准EXE。

2、建立两个文本框，名称改为T1，T2，设置一个命令按钮，caption改为判断奇偶。

3、点击按钮进入代码编辑器，

A = T1.Text

Select Case A Mod 2
Case 1
T2.Text = "奇数"
Case 0
T2.Text = "偶数"
End Select

4、运行一下，输入一个“268”

5、再输入一个“371”