VB如何判断奇偶数

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

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

3、点击按钮进入代码编辑器，A = T1.TextSelect Case A Mod 2 Case 1 T2.Text = "奇数" Case 0 T2.Text = "偶数"End Select

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

5、再输入一个“371”