Dim p as integer ,b as integer,c as integer
p=Text1.Text
b=text2.Text


Text1.Text=235
tEXT2.tEXT= p*35-20

print b

这样如何引用235到Text2的p带入运算

[ 本帖最后由 woa 于 2010-5-18 22:19 编辑 ]

没人没人没人竟然没人

如果想让p=235则
Dim p as integer ,b as integer,c as integer
Text1.Text=235
p=val(Text1.Text)
tEXT2.tEXT= p*35-20
b=val(text2.Text)
print b

没用
Val 是从左往右识别，识别到非数字就停止

说实在的，没有明白你的意图在哪。带有非数字字符的字符串如何转换成数字，我还真不知道。到底能否实现？还是再等高人吧