作者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
→ A1pha:忘記說了~x y z 的宣告都是Global的。 11/12 04:17
推 LPH66:你把add放在Command1_Click的上面試試 11/12 04:22
推 A1pha:可惜還是不行O_Q 會出現同樣的訊息>"< 11/12 04:31
推 badsan:試著把add(x,y)指定給一各變數...例如x=add(x,y) 11/12 07:34
→ badsan:然後在print x看看... 11/12 07:34