请高手解决下面问题。求A可以等于0－9直接任意数值的循环结果的代码。
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim ABC As String
A＝0－9之间任意值
for b = 0 To 9
For c = 0 To 9
ABC = A & B & C
Next b
Next c
设置二个文本框，一个命令按钮，一个文本框输入A的值，格式为A＝0－9之间的数值。比如想输入A的值是1，2，则输入的表达式是A＝1，2，点击命令按钮，循环结果进入另外一个文本框显示出程序运行结果，循环出来是3位数的字符串，比如a＝1，2，就代表a＝1 To 2，b＝0 To 9，c＝0 To 9，循环出来是在a的位置上只有1和2，共有象100，101，102，103.....299共200个3位数的字符串。
不能用随机数。是人工输入。用文本框输入A的值。