userl 2022-08-21 05:21 采纳率: 100%
浏览 49
已结题

VB6.0怎么能把一个文件夹模拟成文件?

   我这里有个文件夹:D:\图片查看\CYS.KT
   里边有两个图片文件:222.jpg333.jpg

img

   我现在要在VB6.0程序中引用文件夹...\CYS.KT里的文件,同时,我想让CYS.KT文件夹扮演一个文件的角色,就是别的用户双击文件夹打不开文件夹,但是我能用程序得到文件夹里的图片,并把它们显示在程序里。
    引用代码:
   Private Sub Command1_Click()
        Picture1.Picture = LoadPicture("D:\图片查看\CYSKT\" & "222.jpg")
        Picture2.Picture = LoadPicture("D:\图片查看\CYSKT\" & "333.jpg")
   End Sub
   这个将文件夹模拟为文件能用VB6.0代码实现吗?
   如果可以,给我加个怎样用代码将这个CYS.KT文件夹的图标显示成我的自定义图标,希望能好用。
  • 写回答

4条回答

      报告相同问题?

      相关推荐 更多相似问题

      问题事件

      • 系统已结题 9月4日
      • 已采纳回答 8月27日
      • 创建了问题 8月21日

      悬赏问题

      • ¥50 Window+VScode+opencv+tensorflow+anaconda实现行人检测与跟踪
      • ¥15 用AT89C51单片机汇编实现按键流水灯
      • ¥15 关于#matlab#的问题:偏微分方程降噪的程序,上面的迭代式的表达
      • ¥15 二叉树用二叉链存储问题
      • ¥15 VS2019不能设置QT的verson了,设置了点确定又消失了,怎么解决呢?
      • ¥15 用java解决,要解释一下给我
      • ¥100 项目经理想学开发牛牛指点迷津有偿
      • ¥15 vscode 配置时出现问题
      • ¥15 pygame安装失败
      • ¥15 数据库原理怎么从文字描述中的句子推出(分析)函数依赖?