投稿日 | : 2005/11/30(Wed) 22:51 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : ツリービューでフォルダのキーを取得 |
後は下記3ヶ所 myFile → myFile.Name のように変更すればいいのでは。
Set Node1 = TreeView1.Nodes.Add(, , "A" & FavoriteFileNum, myFile.Name)
Set Node1 = TreeView1.Nodes.Add("B" & FolderNum, tvwChild, "C" & FileNum, myFile.Name)
Set NodX = TreeView1.Nodes.Add(, , "B" & FolderNum, mySubFolder.Name)
ファイルの拡張子を表示したくないなら、FileSystemObject を使って。
Fso.GetBaseName(myFile.Name)