VB 6.0 Dim 的問題(新手)

小弟在看VB6.0的書 自修 不知道犯了什麼錯.請各位麻煩一下

Private Sub Form_Activate()

Dim x

Dim y

Print x + y

End Sub

以上 按F5會出現0

書上寫說:雖然以上範例可以正常執行 不過通常在宣告變數名稱時 會順便指定變數的初始值 其與法如下

"變數名稱=初始值"

EX:

X = 1 '宣告變數X 初始值為1

Y = 1 '宣告變數Y 初始值為2

-------------分隔--------------

書上這麼說是指

Private Sub Form_Activate()

Dim x = 1

Dim y = 2

Print x + y

End Sub

嘛?

不過小弟這樣打VB它直接給我錯誤- -

讓小弟不知如何是好阿...

Update:

鳴 謝謝你 我成功了 但是我又遇到一個麻煩

書上寫 Dim+變數名稱+As+資料型別

EX:

Dim a As Byte '宣告變數a的資料型態為位元組整數

----分隔----

小弟不太懂他說的意思 按下F5也沒東西 ~"~

1 Answer

Rating
  • Lv 5
    1 decade ago
    Best Answer

    直接把dim給去掉就可以執行

    並且算出是3

    像這樣

    也可以宣告

    Private Sub Form_Activate()

    x = 1 '<-----這就是給x為1的初始值了

    y = 2 '<-----這就是給y為2的初始值了

    Print x + y

    End Sub

    2008-06-12 01:46:22 補充:

    也可以這樣:

    Dim x As Integer, y As Integer

    Private Sub Form_Activate()

    x = 1

    y = 2

    Print x + y

    End Sub

    2008-06-12 01:49:21 補充:

    忘了說

    Private Sub Form_Activate()

    Dim x

    Dim y

    Print x + y

    End Sub

    以上 按F5會出現0

    這樣會是0是因為

    你只是宣告xy但並未給初始值所以vb就自動幫你設定為

    x=0

    y=0

    所以

    prunt x+y

    才會等於0

    懂嗎?

    Source(s):
Still have questions? Get your answers by asking now.