打开VB软件,建立一个标准EXE。
建立两个文本框,名称改为T1,T2,设置一个命令按钮,caption改为判断奇偶。
点击按钮进入代码编辑器,A = T1.TextSelect Case A Mod 2Case 1T2.Text = "奇数"Case 0T2.Text = "偶数"End Select
运行一下,输入一个“268”
再输入一个“371”