level 1
wjp6122408
楼主
Private Sub cmdAddFile_Click()
With ComDialog
.ShowOpen
If Len(.FileName) > 0 Then
lstAttachments.AddItem .FileName
End If
End With
End Sub
我想指定打开C:/123.bmp 怎么改啊!!!!!帮忙改下!!!!!
2011年10月23日 07点10分
1
With ComDialog
.ShowOpen
If Len(.FileName) > 0 Then
lstAttachments.AddItem .FileName
End If
End With
End Sub
我想指定打开C:/123.bmp 怎么改啊!!!!!帮忙改下!!!!!