Re: [算表] VBA表單傳遞參數時ByRef引數型態不符

[cutekid (可愛小孩子)]

Dim P as integer,S as integer,D as integer

※ 引述《o1o3o1o31030 (主席)》之銘言：
: 軟體:
: Excel
: 版本:
: 365
: 用VBA製作了一個UserForm，用來鍵入參數
: 鍵入後按確認傳遞給SUB
: 但是一直出現ByRef引數型態不符
: 請版大救救我
: ------------------------------------------------------
: Private Sub BT1_Click()
: Dim P, S, D As Integer
: If CBB1 = "上" Then
:     P = 1
: ElseIf CBB1 = "下" Then
:     P = 8
: End If
: If CBB2 = "左" Then
:     S = 1
: ElseIf CBB2 = "右" Then
:     S = 0
: End If
: If CBB3 = "前" Then
:     D = 1
: ElseIf CBB3 = "後" Then
:     D = 0
: End If
: Call 測試(P, S, D) ------------------->這裡出現ByRef 引數型態不符
: Unload UF1
: End Sub
: -------------------------------------------------------
: Public Sub 測試(P As Integer, S As Integer, D As Integer)
:  msgbox P & S & D
: End Sub
: -----------------------------------------------------------
: 謝謝各位

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 118.167.222.35 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1681111007.A.EB9.html
推 o1o3o1o31030: 感謝!!!