2013-09-22 92 views
0

我是vb2010的新手,已經成功地使用谷歌搜索所有我以前的問題,但這一個我不能做任何牽引,所以我正在尋找一些正確的語法幫助。vb2010 - 來自MS Access的TextBox1.Text記錄

Public Class Form2 


    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     'TODO: This line of code loads data into the 'IRuleDataSet.Stnds' table. You can move, or remove it, as needed. 
     Me.StndsTableAdapter.Fill(Me.IRuleDataSet.Stnds) 


     'Populates listbox1 with data from iRuleDataSet table 
     ListBox1.DataSource = IRuleDataSet.Stnds 
     ListBox1.DisplayMember = "Standards" 
     ListBox1.SelectedIndex = 0 

    End Sub 


    Private Sub StndsBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 
     Me.Validate() 
     Me.StndsBindingSource.EndEdit() 
     Me.TableAdapterManager.UpdateAll(Me.IRuleDataSet) 

    End Sub 

    Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click 
     End 
    End Sub 

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged 
     Label2.Text = ListBox1.Text & " IRule" 
'~~>This is where I am stuck 
'~~> TextBox1.Text = IRuleDataSets.Stnds.IRule.ListBox1.SelectedIndex bah i can't get this): 
    End Sub 
End Class 

在形式2中,我已加載的接入數據庫到DataSet labeld IRuleDataSet.Stnds

表= Stnds

字段=的iRule

記錄位置= ListBox1.SelectedIndex

什麼是正確的語法或命名約定/邏輯在字段中具有記錄位置的相應文本:「IRule」表示用戶在ListBox1中選擇顯示在TextBox1中?

這不適用於任何學校學科或類似的東西。這僅僅是一個學習練習,可以將我目前在我的工作中過於複雜的xls文件中完成的計算的GUI組合在一起,因此,任何幫助將不勝感激。我不知道對我來說是不是已經太遲了,但我似乎無法找到正確的方法來處理這個看似簡單的任務。

謝謝

回答

0

AHA!

果然,當我張貼的問題,我找到正確的解決方案

TextBox1.Text = IRuleDataSet.Stnds(ListBox1.SelectedIndex)(2).ToString 

這是什麼一樣,它設置TextBox1的文本中尋找到導入的訪問文件(如IRuleDataSet.Stnds),然後看'行'(ListBox1.SelectedIndex),然後是列號(2)。我知道這是2,因爲當我在數據庫中輸入我的虛擬數據時,感興趣的領域是第二列。

我希望這可以幫助未來的googlers(: