ByVal Target As Range 用法 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » ByVal Target As Range 用法

返回列表下一主題上一主題發帖

[發問] ByVal Target As Range 用法

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

6^# 跳轉到 »

發表於 2016-1-28 16:47 | 只看該作者

回復 4# c_c_lai
jackyq 師兄,謝謝你有用的資料
cc lai 謝謝你仔細提供的sample, 但因為我都比較蠢,我想問多少少,byref 我都大約知道佢既用法,佢係會改變原有數值的值,

但是byval 佢係法係唔會改變個變本身原有既數值,咁要設定byval 有什麼作用呢??

謝謝

高中生 Rank: 3 Rank: 3

帖子: 522
主題: 36
精華: 1
積分: 603
點名: 0
作業系統: win xp sp3
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2012-12-13
最後登錄: 2021-7-11

5^#

發表於 2016-1-28 16:02 | 只看該作者

回復 4# c_c_lai
謝謝分享!!

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

4^#

發表於 2016-1-28 14:32 | 只看該作者

本帖最後由 c_c_lai 於 2016-1-28 16:07 編輯

回復 1# mdr0465
舉個實例說明，你便會明瞭：

Sub joke()
Dim txt As String, num As Integer
txt = "你好嗎？": num = 200
Test1 txt, num ' 傳址 (即 jackyq 大大分享的 "本尊")
MsgBox "txt = " & txt & " , num = " & num
' 答案是： txt = 很好，謝謝！大家可好? , num = 150
txt = "早餐吃了嗎？": num = 100
Test2 txt, num ' 傳值 (即 jackyq 大大分享的 "分身")
MsgBox "txt = " & txt & " , num = " & num
' 答案是： txt = 早餐吃了嗎？ , num = 100
End Sub
Sub Test1(ByRef txt As String, ByRef num As Integer) ' 傳址 (位址 Address)
txt = "很好，謝謝！大家可好?" ' (Reference)
num = num - 50
End Sub
Sub Test2(ByVal txt As String, ByVal num As Integer) ' 傳值 (數值 Value)
txt = "非常好！伯父身體好麼？"
num = num - 85
End Sub

複製代碼

中學生 Rank: 2

帖子: 319
主題: 6
精華: 0
積分: 309
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2024-4-27

3^#

發表於 2016-1-28 13:54 | 只看該作者

byval object =byref object = object的本尊
byval 變數a = 變數a的分身
byref 變數a = 變數a的本尊

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

2^#

發表於 2016-1-28 13:05 | 只看該作者

回復 1# mdr0465
多多上網查詢，你便會更加明瞭外面的世界了。
以 ByVal 和 ByRef 傳遞引數

ByRef and ByVal Parameters

靜思自在 : 人的眼睛長在前面，只看到別人的缺點，絲毫看不到自己的缺點。

返回列表下一主題上一主題