VB编程题.输入一个整数判断他是否是5 的倍数

来源：学生作业帮编辑：拍题作业网作业帮分类：综合作业时间：2024/04/30 15:15:52

Private Sub CommandButton1_Click()
Dim nNum As Long
If IsNumeric(TextBox1.Text) Then
nNum = Val(TextBox1.Text)
If nNum Mod 5 = 0 Then
MsgBox "能被5整除!",vbInformation,"提示"
Else
MsgBox "不能被5整除!",vbInformation,"提示"
End If
Else
MsgBox "输入不正确!",vbExclamation,"提示"
TextBox1.SetFocus
End If
End Sub
再问： VB编程题。输入一个整数判断他是否是5 的倍数,要求文本框输入整数，由标签框输出判断结果！
再答： Option Explicit Private Sub Form_Load() Text1.Text = "" End Sub Private Sub Text1_Change() Dim nNum As Long If Text1.Text = "" Then Label1.Caption = "请输入一个整数！" Exit Sub End If If IsNumeric(Text1.Text) Then nNum = Val(Text1.Text) If nNum Mod 5 = 0 Then Label1.Caption = "能被5整除！" Else Label1.Caption = "不能被5整除！" End If Else Label1.Caption = "输入不正确!" End If End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then '可以退格 ElseIf KeyAscii >= 48 And KeyAscii

VB编程题.输入一个整数判断他是否是5 的倍数编程实现;从键盘上输入一个整数,判断是否能被3或5整除.如果能,则输出"该整数是3或5的倍数.” 编写一个程序,输入一个数,判断它是否是5的倍数 C语言编程判断输入的一个数是否是5的倍数使用MyEclips:从键盘输入一个整数,判断是否能被3或者5整除.如果能,输出该整数是3或5的倍数,否者输出： vb编程 1 已知三个数abc（用随机数产生）找出其中最大值 2输入一个整数,判断它能否被3,5,7整除 VB编程,输入n个整数,求它们的最大公约数. 编程vb题,编程求200–400范围内5的倍数或7的倍数(一个数如果同时是7和5的倍数,则只能加在vb中编辑程序,输入一个整数,判断是0,正整数,还是负整数 vb例题：任意输入一个整数,编写程序判断该整数的奇偶数输入一个正整数,编程判断其是否既是5又是7的倍数.若是,则输出“yes”;否则输出“no”. c语言题判断输入的整数是否是2或3或4的倍数