下列程序在调试时，文本框Text2不能输出最后的结果，已知①和②处存在唯一错误，请问错误出在                （填①或②）处，该处正确的语句应该为                。
Dim x As Integer, max As Integer
Dim a As Integer, b As Integer, c As Integer, t As Integer
x = Val(Text1.Text)            ' ①
a =" x" \ 100
b =" x" \ 10 Mod 10
c =" x" Mod 10
If a < b Then t =" a:" a =" b:" b = t
If a < c Then t =" a:" a =" c:" c = t
If b < c Then t =" c:" c =" b:" b = t
max =" a" * 100 + b * 10 + c
Text2.Text =max            ' ②