VB中x=Val（text1.text）是把text1.text的值转换成数值，并赋值给x。