求答案VB程序设计 实验指导与测试 第3版 F过程 第4题↓↓在线等急求！！谢谢！
编写一个函数过程，IsH(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在列表框中显示输入的数，对...
编写一个函数过程，IsH(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在列表框中显示输入的数，对于是回文数显示一个“★”。
求效果和图片差不多的谢谢啦 展开
求效果和图片差不多的谢谢啦 展开
1个回答
展开全部
Private Function IsH(n As Integer) As Boolean '判断所给n是不是回文数,是的话,IsH返回true,否返回false
If Trim(Str(n)) = Trim(StrReverse(Str(n))) Then IsH = True Else IsH = False
End Function
Private Sub Command1_Click()
if ish(val(text1.text)) then
list1.additem text1.text & " ★"
else
list1.additem text1.text
endif
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
Sievers分析仪
2024-12-30 广告
是的。传统上，对于符合要求的内毒素检测，最终用户必须从标准内毒素库存瓶中构建至少一式两份三点标准曲线；必须有重复的阴性控制；每个样品和PPC必须一式两份。有了Sievers Eclipse内毒素检测仪，这些步骤可以通过使用预嵌入的内毒素标准...
点击进入详情页
本回答由Sievers分析仪提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
