正整数的表示方法

正整数的表示方法

Private Sub Command1_Click()

If CheckInt(Text2.Text) = True Then

MsgBox 正整数

Else

MsgBox 不是正整数

End If

End Sub

Function CheckInt(ByVal str As String) As Boolean

If InStr(1, str, .) = 0 Then

If str 0 Then

CheckInt = True

Else

CheckInt = False

End If

Else

CheckInt = False

End If

End Function

'日曜星君

正整数的表示方法

正整数集可以用符号N+、N*、N1、N0表示。其中，N表示自然数集，Z表示整数集，+表示该数集中的元素都为正数，*表示在剔除该数集的元素0。

正整数的表示方法

应该是正整数集，用数学符号表示为N+或N*

声明:本文内容及图片来源于读者投稿，本网站无法甄别是否为投稿用户创作以及文章的准确性,本站尊重并保护知识产权，根据《信息网络传播权保护条例》，如果我们转载的作品侵犯了您的权利,请在一个月内通知我们，我们会及时删除。请将本侵权页面网址发送邮件到583666585@qq.com，我们会及时做删除处理。