none
各位請幫忙 RRS feed

  • 一般討論

  • Public a, b, c, d, Real, Im, are, bre, aim, bim As Variant

    Public Sub Command1_Click()
    a = Text1.Text
    b = Text2.Text
    c = Text3.Text
    d = Text4.Text
    AddC (a, b, c, d)   <---我想把"a"放去"are", "b"放去 "bre", "c"放去"aim", "d"放去"bim", 但唔得, 請問各位..我的問題在於咩
    Text5.Text = Real
    Text6.Text = Im
    End Sub

    Public Sub AddC(are, bre, aim, bim)
    Real = are + bre
    Im = aim + bim
    End Sub
    2007年6月21日 下午 12:35

所有回覆

  •  

    哇你的問題很難懂咧..

    說明白一點吧

    2007年6月21日 下午 12:55
  • hi 你好:

                  請問你是用vb那個版本開發的呢??我用vb2005,可是Public a, b, c, d, Real, Im, are, bre, aim, bim As Variant
                    並沒有這個型別。

                  還有如果你宣告成字串,Public a, b, c, d, Real, Im, are, bre, aim, bim As string

                  你的程式是ok的,我測試過嚕喔^^
                                                                                          馬小玲   http://blog.blueshop.com.tw/swtnwr

    2007年6月21日 下午 01:38
  • 當我run 個 program 時, 出現"syntax error" MESSAGE BOX
    2007年6月22日 下午 04:07
  • 1. 請用普通話格式來發問,香港的語助詞我真的看不懂 ..

    2.

     

    Code Snippet

    Public Sub AddC(are, bre, aim, bim) << 為什麼參數都沒有型別?
       Real = are + bre
       Im = aim + bim
     End Sub

     

    2007年6月24日 上午 09:11
    版主
  •  

    Public a, b, c, d As Variant

     

    Sub Command1_Click()

    a = Text1.Text

    b = Text2.Text

    c = Text3.Text

    d = Text4.Text

    AddC a, b, c, d

    End Sub

     

    Sub AddC(ByVal are, bre, aim, bim As Variant)

    Real = are + bre

    Im = aim + bim

    MsgBox Real & " , " & Im

    Text5.Text = Real

    Text6.Text = Im

    End Sub

    2007年6月27日 下午 12:07