元千岁 惜春去 QQ音乐:关于vb一个超简单的程序（头疼！）

a = Form1(Text1.Text)
改为 a = VAL(THISFORM.Text1.Text）
文本框是字符型

Text2.Text = b
THISFORM.TEXT2.TEXT=???
B 要转换成字符型，我忘了什么函数了

a = Form1(Text1.Text)
这句有问题
应该改成a＝Val(text1.text)
就好了。

Private Sub Command1_Click()
Dim a As Single, b As Single
a = Form1(Text1.Text)
b = a + 12
Text2.Text = b
End Sub

就是b=a+12并显示出来。
这么简单的程序到底怎么了？
老是调试出错！我随便在Text1输入一个数，
调试错误是：下标越界
我是个菜鸟，请帮我解释一下
谢谢了~~

另外还有一个问题：
我想把每次计算的数值给记录下来输入到一个txt文本
用哪个语句可以实现？
谢谢！！
1、form1应该是一个窗体吧？记得不能这样用，应该是form1.text1.text才对头。现在没有环境调试这程序
2、关于字符型，应该没有问题的，但是最好转换一下
a=Cint(form1.text1.text)，记得函数应该是cint，但是single的转换我不记得了，msdn或者帮助里面搜一下cint，应该可以找到转换为single的函数的
3、记录到一个文本文件不是一个语句可以实现的
这里给一个过程你自己看着办了
sub SaveR(myResult as single)
dim i as integer
dim FPath as string
fpath="c:\myresult.txt"
i=freefile
open fpath for input as #i
write line myresult
'或者是write，原因下面说
close #i
end sub
这个程序你现在fpath的路径下面建立这样的一个myresult.txt的文件就可以了
另外，我现在没有环境测试，这样做应该可以的了
使用write写入数据，不过我已经忘记了语句的确实语法，所以open for as这一句我也不能保证对的
自己看看了