一个六位数n,它的高二位与低二位恰好相同,同时又能被97整除,如109610、196619等。编写VB程序,统计所有符合条件的六位数的个数。
Dim n As Long '六位数
Dim g2 As Integer '高二位
Dim d2 As Integer '低二位
Dim t As Integer '计数
t = 0
n = 100000
Do
g2= ______①______
d2= ______②______

Loop Until n>=1000000
Print t
‘备注:loop until 指的是循环到若条件成立则退出循环