判断奇偶数的vb程序段

vb程序段如下：

Private Sub Command1_Clicko

If Val（Text1.Text）Mod 2 = 1 And Val（Text1.Text）= Int（Val（Text1.Text）Then

Label1.Caption="这是奇数"

Else

If Val（Text1.Text）Mod 2= 0 And Val（Text1.Text）= Int（Val（Text1.Text））Then

Label1.Caption ="这是偶数"

Else

Label1.Caption ="非奇非偶"

End If

End If

End Sub

扩展资料：

判断奇偶数时，主要是使用运算符-Mod和if语句，Mod可以对一个数取余数。例如10/3= 3....11则10 Mod 3=1，所以如果任意一个数n Mod 2=1这个数就是奇数。

If语句格式：如果条件1成立 做代码1  否则  做代码2  结束

代码格式：

IfA1 Then

语句1

Else

语句2

End if

判断奇偶数的程序c语言方法：如果是2的倍数（对2取余数等于零）就是偶数（x%2==0）；反之如果不是2的倍数就是奇数。

c语言是一门面向过程、抽象化的通用程序设计语言，广泛应用于底层开发。

C语言具有高效、灵活、功能丰富、表达力强和较高的可移植性等特点，在程序设计中备受青睐。C语言编译器普遍存在于各种不同的 *** 作系统中，其设计也影响了Java、Python等编程语言。

C语言是一门面向过程的计算机编程语言，与C++、Java等面向对象编程语言有所不同。C语言的设计目标是提供一种能以简易的方式编译、处理低级存储器、仅产生少量的机器码以及不需要任何运行环境支持便能运行的编程语言。

C语言描述问题比汇编语言迅速，工作量小、可读性好，易于调试、修改和移植，而代码质量与汇编语言相当。C语言一般只比汇编语言代码生成的目标程序效率低10%～20%。因此，C语言可以编写系统软件。

---