標題: 困惑的變數 [打印本頁]

---

作者: stephen    時間: 2011-7-6 22:01     標題: 困惑的變數

本帖最後由 GBKEE 於 2011-7-7 08:39 編輯

煩請各位指導一下,為何第3個答案會是no?
以及要如何做才得到正解yes?

homeFD1 = "D:\aaa\"

i = 1

If homeFD1 = "D:\aaa\" Then        '當然是yes....
  MsgBox ("yes")
Else
  MsgBox ("no")
End If

If "homeFD" & i = "homeFD1" Then        '答案是yes
  MsgBox ("yes")
Else
  MsgBox ("no")
End If

If "homeFD" & i = "D:\aaa\" Then          '答案是no  MsgBox ("yes")
Else
  MsgBox ("no")
End If

---

作者: chin15    時間: 2011-7-6 22:29

homeFD1 = "D:\aaa\"
這個homeFD1是變數
"homeFD"用雙引號括起來是字符
不能混為一談！

---

作者: stephen    時間: 2011-7-6 22:53

Sheets(i) 這類用法...用慣了 所以熊熊卡住...

另 "homeFD"用雙引號括起來是字符
但曾試用
mySER = "homeFD" & i
MsgBox (mySER)                    '答案..... homeFD1 依然不會是  "D:\aaa\"

---

作者: a8350070    時間: 2011-7-7 00:30

Dim homeFD(1 To 10)
homeFD(1) = "D:\aaa\"
i = 1
If homeFD(i) = "D:\aaa\" Then
  MsgBox ("yes")
Else
  MsgBox ("no")
End If

---

作者: GBKEE    時間: 2011-7-7 08:43

回復 3# stephen
homeFD ="D:\aaa\"
mySER =homeFD & i
MsgBox  mySER                   請問答案.是....

---

作者: stephen    時間: 2011-7-7 10:10

本帖最後由 GBKEE 於 2011-7-7 10:26 編輯

回復 5# GBKEE
答案是  homeFD1
另,a8350070 謝謝啦~ 正解~Dim homeFD(1 To 10)



再試試看GBKEE上

1. Sub Ex()
   
2. Dim homeFD, I, mySER
   
3. homeFD = "D:\aaa\"
   
4. mySER = homeFD & I
   
5. MsgBox mySER        
   
6.   '          請問答案.是....
   
7. End Sub

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)