建个按钮控件：（下程序还可以显示每个数）'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...