投稿日 | : 2002/09/04(Wed) 16:15 |
投稿者 | : MANA |
URL | : |
タイトル | : 重複について |
すいません。重複についての質問です。
For ii = 1 To filekensaku
If FileLen(Mpath & Nowdate & "\" & strMyfile(ii)) = 0 Then
Else
ファイル名前 = Left(strMyfile(ii), 11)
List1.AddItem ファイル名前
End If
Next ii
として、このファイル名前に重複が存在すれば、重複したものを
見えなくする。という処理は可能ですか?