作者A1pha ([αλφα])
看板Visual_Basic
标题[VB6 ] 关於程序的问题..
时间Sun Nov 12 04:12:26 2006
我在写程序的时候，
发现，
电脑会自动「切割」程序...
像是，我原本要写个程序：
Private Sub Command1_Click()
x = val(txt1)
y = val(txt2)
z = 5
Function add(a as single, b as single) as single
add = a + b + z
End Function
print add(x,y)
end sub
像这样之类的，
但是电脑硬是把他变成：
Private Sub Command1_Click()
x = val(txt1)
y = val(txt2)
z = 5
----------------------------------------------------------
Function add(a as single, b as single) as single
add = a + b + z
End Function
print add(x,y)
end sub
这样～
切成两个程序......
有办法让他不要这样自动切吗？
後来，我想说，好吧，
你要切就切吧，
我从外面呼叫应该可以吧。
然後面成这样：
Private Sub Command1_Click()
x = val(txt1)
y = val(txt2)
z = 5
print
add(x,y)
end sub
------------------------------------------------
Function add(a as single, b as single) as single
add = a + b + z
End Function
结果会出现对话框：add必须是函数或变数。
add明明就是函数啊.....
後来改成：
Private Sub Command1_Click()
x = val(txt1)
y = val(txt2)
z = 5
add(x,y)
end sub
------------------------------------------------
Function add(a as single, b as single) as single
add = a + b + z
Print add
End Function
结果则会出现对话框：必须是: =
没头没脑的...什麽叫做必须是 =......
回去翻书，看不出个所以然...里面只说「不论有无引数，都可以不必加()」
写个程序搞的我晕头转向的@@"
希望板友能不吝解答！ 感谢～
--
从睡梦中苏醒的少女 发现自己被一群身上长有翅膀
头上有光环的少女们围绕着
这里… 不是天国 她们… 不是天使
身上长着灰色的翅膀，却无法飞翔
这是个 被遗忘的国度...
她们是谁 她们自已也不知道…… 找寻着记忆，也找寻着自己… 《灰羽连盟》
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 124.8.85.6
1F：→ A1pha:忘记说了～x y z 的宣告都是Global的。 11/12 04:17
2F：推 LPH66:你把add放在Command1_Click的上面试试 11/12 04:22
3F：推 A1pha:可惜还是不行O_Q 会出现同样的讯息>"< 11/12 04:31
4F：推 badsan:试着把add(x,y)指定给一各变数...例如x=add(x,y) 11/12 07:34
5F：→ badsan:然後在print x看看... 11/12 07:34