English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
所有分類

大大們
我要問下列程式
請各問大大幫我解答
下列程式 到底可不可以執行?
因為....我被冤枉了 ㄒ.ㄒ(哭貌...)
----------------------------------------- 我是分隔線 ---------------------------------------------------
\'表單模組 ( Form1)
Private Sub Form_Activate()
Dim a As Integer
Dim b As Integer
a = 10
b = 6
Call Module1.test(a, b)
End Sub

\'一般模組 ( Module1)
Private Sub test(x%、y%)
If (x - y) > 0 Then
Form1.Print \"Big\"
ElseIf (x - y) < 0 Then
Form1.Print \"Small\"
Else
Form1.Print \"Equal\"
End If
End Sub

2006-05-25 12:19:47 · 2 個解答 · 發問者 Anonymous in 電腦與網際網路 程式設計

Private Sub test(x%、y%): 打錯了 = =
應該是:Private Sub test(x%, y%)

2006-05-26 01:55:29 · update #1

他逗號會自動變頓號 = = 我也不知道為什麼?

2006-05-26 01:56:40 · update #2

2 個解答

這題有兩個地方有問題,所以無法執行(1)Private Sub test(x%、y%)→語法錯誤,可能是你打錯,應該要是逗號","。(2)你把此副程式宣告為私用Private Sub test(x%,y%),故只有屬於Module1的成員才能使用它,Form1是無法使用滴,若要讓Form1能用的話,可把Private改成Public(公用),或直接把Privates拿掉。

2006-05-25 20:06:02 · answer #1 · answered by W.J.S. 7 · 0 0

Form1.Print "Big"
這個部份應該不能執行
Form1.Print 是指Form1表單內的物件"Print"
如果表單內沒有Print的物件.自然就找不到而出現錯誤

以上是我的心得,有錯還請見諒

2006-05-25 13:09:58 · answer #2 · answered by Alan 1 · 0 0

fedest.com, questions and answers