Question

Text3.Text = Str $ Fal(Text1.Text) + Fal(Text2.Text)

出错了，好像是转换函数不对！！
帮忙啊~~~
Text3.Text = Fal(Text1.Text) & Fal(Text2.Text)
这也错了~~
我就是做一个加法~~~
换成Val 就成字符相加了~~
Text3.Text=Str$(Fal(Text1.Text) + Fal(Text2.Text))
子程序或函数未定义

Answer 1

Text3.Text = Str $ Fal(Text1.Text) + Fal(Text2.Text)

首先:
你中间使用了$而不是&,这是一个错误
Text3.Text = Str & Fal(Text1.Text) + Fal(Text2.Text)

其次,字符串连接,建议使用&,而不是+
Text3.Text = Str & Fal(Text1.Text) & Fal(Text2.Text)

问题补充:
如果你没有使用dim srt$来定义str变量的话,
它是一个函数,你没有带参数,当然会不对.

Text3.Text = Fal(Text1.Text) & Fal(Text2.Text)

再次晕: 终于明白你需要做什么了.
补充=============================

Text3.Text = CStr(Val(Text1.Text) + Val(Text2.Text))

Answer 2

在你的程序中应该 Fal()是如下形式：

Function Fal(byval val As String ) as Integer
......
End Function

我在想你的用意可能是把两个文本框中的值按某种算法转成数字再进行相加，再转成字符串形式赋值给 Text3

那么你应这样写 Text3.Text=Str$(Fal(Text1.Text) + Fal(Text2.Text))

Answer 3

Text3.Text = Str $ Fal(Text1.Text) + Fal(Text2.Text)
应该是Text3.Text = Str $ Val(Text1.Text) + Val(Text2.Text)吧？
把文本框里的内容转换成数值型，相加再转换成字符型。

Answer 4

Text3.Text = Str ( Fal(Text1.Text) + Fal(Text2.Text) )

Answer 5

最简洁的形式如下：
Text3=Str（Fal(Text1)&Fal(Text2)）
http://www.d1sj.net/baikehuicui/index.asp