| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 663 人关注过本帖
标题:关于VB6的一些小问题
取消只看楼主 加入收藏
ffcb
Rank: 1
等 级:新手上路
帖 子:38
专家分:0
注 册:2010-1-23
结帖率:0
收藏
已结贴  问题点数:20 回复次数:2 
关于VB6的一些小问题
我刚自学VB6没几天,看了浙江蜗牛的菜鸟视频,感觉挺不错:)
不过自己在玩的时候发现这个问题不知道应该怎么解决!
就是Drivelistbox与Dirlistbox联系时,C:/或则D:/等等都没有问题,为什么当我运行程序时选择A:/或者光盘就会出现问题???
应该如何解决这一问题???
请前辈指教
下面是学习的代码:

Private Sub Form_Load()
Drive1.Drive = "d:"
Dir1.Path = Drive1.Drive
End Sub

搜索更多相关主题的帖子: 运行程序 浙江 光盘 如何 蜗牛 
2010-01-25 19:25
ffcb
Rank: 1
等 级:新手上路
帖 子:38
专家分:0
注 册:2010-1-23
收藏
得分:0 
还有,如果我在边上再多加一个filelistbox和一个richtextbox
其中filelistbox可以用来显示文件夹中的文件名字,而richtextbox则可以显示在filelistbox中选中文件名的文件内容
应该如何操作???

还有就是如果是动态的呢???
我意思是如果指定的文件包内文件数目在变换又该如何操作?

下面是我尝试写的代码:
也请各位帮忙指点一下
Dim a
Dim b As Integer

Private Sub File1_Click()
b = File1.ListCount
If File1.Selected() = True Then
a = Dir1.Path & "\" & File1.FileName
Else
End If
End Sub

Private Sub Form_Load()



Drive1.Drive = "d:"
Dir1.Path = "D:\ttt\个人文件夹\收件箱"
File1.FileName = Dir1.Path
RichTextBox1.LoadFile (a)
End Sub
2010-01-25 19:33
ffcb
Rank: 1
等 级:新手上路
帖 子:38
专家分:0
注 册:2010-1-23
收藏
得分:0 
问题解决了,牛!!!
2010-02-04 12:14
快速回复:关于VB6的一些小问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.011046 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved