Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
我在一个窗体中放了个TreeView和若干个TextBox和ComboBox,怎样才能实现点击TreeView中的项目,Textbox中显示相应的数据。具体见附件
将包括表格和窗口的示例项目传上来,具体说明一下想实现的任务。
下载信息 [文件大小: 下载次数: ] | |
![]() |
1、点右边treeview的项目后,左边的Textbox和ComboBox等控件能对应显示Treeview中的数据
目录树的NodeMouseClick事件:
If e.Node.Level = 2 Then
Dim Filter AS String
Dim Value() As String
Value = e.Node.FullPath.Split("\")
Filter ="[类别] = '" & Value(0) & "' And [品名] = '" & Value(1) &"' And [物品代码] = '" & Value(2) & "'"
Dim Index As Integer = Tables("物品名称").FindRow(Filter,0,False)
If Index >= 0 Then
Tables("物品名称").Position = Index
End If
End If
Dim Index = Tables("物品名称").FindRow(Filter,0,False)少了个值类型
Dim Index As Integer = Tables("物品名称").FindRow(Filter,0,False)