VB 判断a能否被b整除，能够整除输出“能”，否则输出“不能”。
dimaasintegerdimbasintegera=val（text1.text）b=val（text2.text）ifamodb=0thentext3.text=”...
dimaasinteger
dimbasinteger
a=val（text1.text）
b=val（text2.text）
if a mod b = 0 then text3.text=”能” else text3.text=”不能”
显示除数为零，哪里错了 展开
dimbasinteger
a=val（text1.text）
b=val（text2.text）
if a mod b = 0 then text3.text=”能” else text3.text=”不能”
显示除数为零，哪里错了 展开
1个回答
展开全部
入门吧？
问题很多！
Dim a As Integer
Dim b As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
If a Mod b = 0 Then
Text3.Text = "能"
Else
Text3.Text = "不能"
End If
问题很多！
Dim a As Integer
Dim b As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
If a Mod b = 0 Then
Text3.Text = "能"
Else
Text3.Text = "不能"
End If
更多追问追答
追问
还是显示除数为零
追答
Text2.Text 里必须有 数才行
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
