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”
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”