VB程序求出各位数为6且能被3整除的三位数共有多少个?
问题描述:
VB程序求出各位数为6且能被3整除的三位数共有多少个?
答
建个按钮控件:(下程序还可以显示每个数)'VB程序求出各位数为6且能被3整除的三位数共有多少个?Private Sub Command1_Click()Dim cout As IntegerFor i = 100 To 999If i Mod 10 = 6 And i Mod 3 = 0 ThenPrint i;c...