当前位置：新励学网 > 秒知问答 > 正整数的表示方法

正整数的表示方法

发表时间：2024-07-28 04:45:55 来源：网友投稿

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

'日曜星君

免责声明：本站发布的教育资讯（图片、视频和文字）以本站原创、转载和分享为主，文章观点不代表本网站立场。

如果本文侵犯了您的权益，请联系底部站长邮箱进行举报反馈，一经查实，我们将在第一时间处理，感谢您对本站的关注！

相关资讯
  • 汽修专业新疆怎么找工作
    2025-04-06
  • 机械专业专长怎么写简历
    2025-04-06
  • 专科怎么报审计专业的
    2025-04-06
  • 专业学科导师类别怎么填
    2025-04-06
  • 查报考专业网站怎么查
    2025-04-06
  • 水电专业规划怎么写简历
    2025-04-06
  • 表演专业怎么留学的好呢
    2025-04-06
  • 专业防雷检测怎么收费的
    2025-04-06
  • 怎么查询同等学力专业
    2025-04-06
  • 高考技能专业怎么选择的
    2025-04-06
  • 钢筋套筒专业名称怎么写
    2025-04-06
  • 中专怎么填高考志愿专业
    2025-04-06
  • 中专统招怎么报志愿专业
    2025-04-06
  • 师范专业自我评价怎么写
    2025-04-06
  • 景观建筑换专业怎么换好
    2025-04-06
  • 建筑专业学生简历怎么写
    2025-04-06
    • 推荐资讯
  • 愚人节整人整蛊方法微信朋友圈，愚人节整人套路方法
    2024-02-24 12:32:06
  • 麦芽糖和普通的糖有区别吗
    2024-06-19 15:48:05
  • toilet读音
    2024-07-21 05:48:05
  • 什么是借款单
    2024-07-31 03:11:05
  • 钢材生锈剂使用方法
    2024-08-02 17:52:28
  • malpractice是什么意思
    2024-08-21 08:00:31
  • 带有馨的诗句并解释
    2024-09-20 09:38:19
  • 萧山机场有哪些部门
    2024-10-03 09:43:38
  • 描写情绪的词语有哪些
    2024-10-09 11:03:08
  • 用友怎么做财务报表
    2024-10-15 08:44:48

    • 新励学网教育平台

    海量全面 · 详细解读 · 快捷可靠

    最新文章

    累积科普文章数：18,862,126篇

    热门关注
  • 1 汽修专业新疆怎么找工作
  • 2 机械专业专长怎么写简历
  • 3 专科怎么报审计专业的
  • 4 专业学科导师类别怎么填
  • 5 查报考专业网站怎么查
  • 6 水电专业规划怎么写简历
  • 7 表演专业怎么留学的好呢
  • 8 专业防雷检测怎么收费的
  • 9 怎么查询同等学力专业
  • 10 高考技能专业怎么选择的
  • 11 钢筋套筒专业名称怎么写
  • 12 中专怎么填高考志愿专业
  • 13 中专统招怎么报志愿专业
  • 14 师范专业自我评价怎么写
  • 15 景观建筑换专业怎么换好
    • 网站导航
    首页
    教育
    考研
    作文
    公考
    申论
    留学
    建造
    会计
    问答