VB treeview 多重选择的问题 - VB / 控件
在VB中，自动生成的树控件如图：我想在控件中按住SHIFT键选择Folders下面的文件。
代码如下：
Try
If ParentCategoryNode.Text = "Folders" Then
If e.Shift Then
For i = 0 To ParentCategoryNode.Nodes.Count - 1
[color=#3366FF]If ParentCategoryNode.Nodes(i).Checked Then
MessageBox.Show(tvProject.SelectedNode.Nodes.Item(i).Text.ToString())
End If
Next
End If
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try[/color]
如果去掉蓝色的IF判断，则可以将Folder下面的文件都弹出来，但是，如果加了IF判断，就会出现异常。对了，这里的异常还是点击了Folder下面的文件就会出现。
不知道我的问题有没有描述清楚，请你们帮忙！
帮顶！~~
.net
相关问答：
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
用VB编程读取短信,得到一大堆unicode编码,请教如何转换成文本
例如:读取短信后(华为900C或TC35i),串口得到如下数据:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......
