Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")
With adoComm3
.ActiveConnection = Conn
.CommandType = 4
.CommandText = "View_Usedhouse2"
.Parameters.Item("@strID").Value = id
.Execute
Return=.Parameters.Item("@Return").Value
if Return=true then
zbh=.Parameters.Item("@zbh").Value
问:Return=.Parameters.Item("@Return").Value
这句是什么意思,这个return是去取哪里的值

解决方案 »

  1.   

    这个不是存储过程吧?感觉像是  VBA的代码
      

  2.   

    Dim Return
    Dim adoComm3
    Set adoComm3 = CreateObject("ADODB.Command")adoComm3.ActiveConnection = Conn
    adoComm3.CommandType = 4
    adoComm3.CommandText = "View_Usedhouse2"
    adoComm3.Parameters.Item("@strID").Value = id
    adoComm3.Execute
            Return=adoComm3.Parameters.Item("@Return").Value
            if Return=true then
            zbh=adoComm3.Parameters.Item("@zbh").Value
      

  3.   

    非主流代码!
    VB一般也不会用这种写法!
    鉴定完毕!
    建议LZ如果是网上看的,把链接丢出来
    你这样说一句,没法帮你。
    要么去vb版块问问,VB略懂,但看不懂你这个!
      

  4.   

    确实不是存储过程,是调用了存储过程
    猜,这个return是去"View_Usedhouse2"这个存储过程中返回的值,嘿嘿^^
      

  5.   

    代码里少个EndWithDim Return
    Dim adoComm3
    Set adoComm3 = CreateObject("ADODB.Command")
    With adoComm3
    .ActiveConnection = Conn
    .CommandType = 4
    .CommandText = "View_Usedhouse2"
    .Parameters.Item("@strID").Value = id
    .Execute
            Return=.Parameters.Item("@Return").Value
            if Return=true then
            zbh=.Parameters.Item("@zbh").Value
    EndWith
      

  6.   


    Dim Return
    Dim adoComm3
    Set adoComm3 = CreateObject("ADODB.Command")
    With adoComm3
    .ActiveConnection = Conn
    .CommandType = 4
    .CommandText = "View_Usedhouse2"
    .Parameters.Item("@strID").Value = id
    .Execute
            Return=.Parameters.Item("@Return").Value
            if Return=true then
            zbh=.Parameters.Item("@zbh").Value
    End With