請教一下Property 設定的問題

terrypen

1. 不好意思我又來打擾了~~XD~請教各位先進 在Property 的問題 ~我想問的是~在不同的表單中傳遞字串~是不是不能直接 New Property 的類別來使用呢?還是我的寫法錯了~我有看過MSDN,Property的用法只是大概瞭解~使用的邏輯還是要加強~可否請個位先進說明一下~謝謝

複製代碼

1. Public Class Form1
   
2.   
   
3.     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
   
4. 
   
5.         MaintainRecordDataSet.EnforceConstraints = False
   
6.         'TODO: 這行程式碼會將資料載入 'MaintainRecordDataSet.MaintainDetails' 資料表。您可以視需要進行移動或移除。
   
7.         Me.MaintainDetailsTableAdapter.Fill(Me.MaintainRecordDataSet.MaintainDetails)
   
8.         'TODO: 這行程式碼會將資料載入 'MaintainRecordDataSet.Maintain' 資料表。您可以視需要進行移動或移除。
   
9.         Me.MaintainTableAdapter.Fill(Me.MaintainRecordDataSet.Maintain)
   
10.         MaintainRecordDataSet.EnforceConstraints = True
    
11. 
    
12.     End Sub

複製代碼

1. Public Class Form2
   
2. 
   
3.     Private Sub Form2_Load(sender As Object, e As EventArgs) Handles Me.Load
   
4. 
   
5.         Dim STR As New TGetString
   
6.         STR.GetName = TextBox1.Text   <==為什麼Textbox1的值是空的
   
7. 
   
8.     End Sub
   
9. End Class

複製代碼

1. Public Class TGetString

複製代碼

1. Public Class TGetString
   
2.     Dim FGetName As String
   
3. 
   
4.     Property GetName As String
   
5.         Get
   
6.             Dim cnStr As String = My.Settings.MoodAccountConnectionString
   
7.             Dim cnConnection As New SqlConnection(cnStr)
   
8.             Dim cmStr As String = "SELECT ReplaceParts FROM MaintainDetails WHERE ReplaceParts = '" & CStr(MaintainRecord.MaintainDetailsDataGridView.CurrentRow.Cells(1).Value) & "'"
   
9.             Dim cmCommand As New SqlCommand(cmStr, cnConnection)
   
10.             cnConnection.Open()
    
11.             Dim dr As SqlDataReader = cmCommand.ExecuteReader
    
12.             If dr.Read Then
    
13.                 FGetName = dr.GetString(0)
    
14.             End If
    
15.             cnConnection.Close()
    
16. 
    
17.             GetName = FGetName
    
18.         End Get
    
19.         Set(value As String)
    
20. 
    
21.             FGetName = value
    
22. 
    
23.         End Set
    
24.     End Property
    
25. End Class

複製代碼

不好意思類別貼不上~~~請見諒!
...

瀏覽完整內容，請先 註冊 或 登入會員

sam30525sam

你的編排可以修一下嗎？
要看兩三次才知道妳想要表達什麼，
而且你把許多問題都合併再一起，麻煩要問的時候請條列的問。

我直接坦白說，
你的問題，跟你的下方程式碼的錯誤完全是兩碼子事。

1. 先回你的程式碼這段

1. STR.GetName = TextBox1.Text   <==為什麼Textbox1的值是空的

複製代碼

你這段是在講，
你把TextBox1.Text的值給STR.GetName，
因為你TextBox1.Text沒給值當然是空的。

2. 屬性(Property)的問題

屬性當然可以new，是寫在class裡面，
但是你程式碼中class寫得很奇怪，
你要運算一個Property通常還會搭配一個Field，
運算用Field，Property是在放Field後的結果，
但是你全部都寫在get-set裡面，這樣的習慣很不好，

突然找不到比較好的範例，我直接說好了，你要把這一段抽出來做成一個 private method

1.         Get
   
2.             Dim cnStr As String = My.Settings.MoodAccountConnectionString
   
3.             Dim cnConnection As New SqlConnection(cnStr)
   
4.             Dim cmStr As String = "SELECT ReplaceParts FROM MaintainDetails WHERE ReplaceParts = '" & CStr(MaintainRecord.MaintainDetailsDataGridView.CurrentRow.Cells(1).Value) & "'"
   
5.             Dim cmCommand As New SqlCommand(cmStr, cnConnection)
   
6.             cnConnection.Open()
   
7.             Dim dr As SqlDataReader = cmCommand.ExecuteReader
   
8.             If dr.Read Then
   
9.                 FGetName = dr.GetString(0)
   
10.             End If
    
11.             cnConnection.Close()
    
12. 
    
13.             GetName = FGetName
    
14.         End Get

複製代碼

因為你在get裡面處理太多事情，有種「腐爛程式碼的味道」，所以你要抽出來，
盡量在get-set裡面越單純越好。

3. Form之間傳送資料

不同Form之間要傳送資料可以，但你的問題跟你下方給的程式碼完全對不上，
我不懂你在問什麼。
如果你要不同Form之間傳送資料的話，這個範例你看看

下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員

語言用C#，但是基本上一模一樣，
這是非常經典且基本的做法。

...

瀏覽完整內容，請先 註冊 或 登入會員

terrypen

謝謝sam30525sam的解說~ 不好意思~晚了時間回覆~~其實我不太懂Property的用法~這寫法也是我從書上看來的~~XD~我試著書上的寫法來寫~只是如何從FORM1 傳至 FORM2 我在書上看得很模糊~還在瞭解中~~還有您說的Field 的寫法我也沒試過~~我會記住您所講的~~我先去看一下您給的範例~~~謝謝sam30525sam

terrypen

看完了sam30525sam 的youTube 影片~~對於Form之間傳值~整個都清楚了~~真的非常謝謝~~讓我學了不少~~只是我練習時遇到了一個問題~~同樣的程式碼~~我在vs 2008 可以執行~~為什麼在 vs 2012就不行~~~是我vs2012 有問題嗎?還是這樣的程式碼在vs 2012 需要有不同的寫法才行呢~~能否解個疑惑~~謝謝啦~~以下是我寫的程式碼

...

瀏覽完整內容，請先 註冊 或 登入會員

sam30525sam

terrypen 發表於 2014-7-8 11:00 AM

下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員

看完了sam30525sam 的youTube 影片~~對於Form之間傳值~整個都清楚了~~真的非常謝謝~~讓我學了不少~~只是我 ...

...

瀏覽完整內容，請先 註冊 或 登入會員

terrypen

噗~不好意思~~我沒講清楚~~是沒什麼問題~~也沒錯誤訊息~~只是debug時~~在vs 2012無法傳值過去~~在插入的中斷點沒效果直接就跳過去了~~無法看到其內容如何~vs 2008卻很正常~~這讓我百思不解~~真不好意思~~我在慢慢試看看~~再次謝謝sam30525sam~~