編譯錯誤，我的程序

Private Sub Form_Activate() 
Dim st1 As String 

'if txtmode 1 fetch record of id from database 
If txtmode.Text = "1" Then 
    'SQL statement 
    openCon 
    st1 = "SELECT Customer_name, Address1, Address2, City, Contact FROM customer WHERE id=" & txtid.Text 
    recSet.Open st1, conn, adOpenDynamic, adLockOptimistic 
    recSet.MoveFirst 

    If recSet.Fields("Customer_name").Value <> vbNullString Then 
    txtCustomer_name = recSet.Fields("Customer_name").Value 

    Else 
     txtCustomer_name = "" 
    End If

當我運行我的程序，我得到一個錯誤：編譯錯誤，我的程序

compiler error : invalid use of property on txtCustomer_name = line

爲什麼？我該如何解決它？

來源

2013-07-31 Rakesh Sharma

如果txtCustomer_name是控制，儘量txtCustomer_name.Text = ... – jac

與江淮汽車同意。我們需要確切地知道txtCustomer_name是如何定義的。 –

你可以試試這個：

If IsNull(recSet.Fields("Customer_name").Value) Then 
    txtCustomer_name.Text = "" 
Else 
    txtCustomer_name.Text = recSet.Fields("Customer_name").Value 
End If

來源

2013-07-31 12:19:24 GTG

編譯錯誤，我的程序

回答

相關問題