个位数字是6,且能被3整除的3位数共有多少个?下面程序用于解决这一问题,在划线处填入合适的语句或表达式,设共有n个这样的数,Visual Basic程序如下: Sub Command1_Click() Dim i As Integer, n As Integer m = 106 n = __________ Do While m <= 996 If _______________________ Then n =" n" + 1 m=m+10 Loop Text1.Text = Str(n) zxxk End Sub