使用vb求n1和n2之间的能被13和15整除的数？
答案:2 悬赏:80 手机版
解决时间 2021-03-15 08:38
- 提问者网友：杀手的诗
- 2021-03-15 04:07
使用vb求n1和n2之间的能被13和15整除的数？
最佳答案
- 五星知识达人网友：轻雾山林
- 2021-03-15 05:09
Private Sub Command1_Click()
Dim n1 As Integer
Dim n2 As Integer
For i = n1 To n2
If i Mod 13 = 0 And i Mod 15 = 0 Then Print i
Next i
End Sub
Dim n1 As Integer
Dim n2 As Integer
For i = n1 To n2
If i Mod 13 = 0 And i Mod 15 = 0 Then Print i
Next i
End Sub
全部回答
- 1楼网友：慢性怪人
- 2021-03-15 06:23
Private Sub Command1_Click()
Dim x As Integer, n As Integer
For x = n1 To n2
If x Mod 13 = 0 and If x Mod 15=0 Then
n = n + 1
Text1.Text = Text1.Text & x
If n Mod 10 = 0 Then Text1.Text = Text1.Text & x
End If
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯