请问怎么。。。。。。 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 请问怎么。。。。。。

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 1141 人关注过本帖

标题：请问怎么。。。。。。

只看楼主加入收藏

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 11 楼

得分:0

但是这样怎么办
或者这样不行能介绍个按我的意思能够打开盘符的方法么？

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:00

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 12 楼

得分:0

你是要这效果吧:
Shell "explorer " & a & ":\", vbMaximizedFocus

Repeat Life=Study;Until (death);

2007-10-04 00:05

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 13 楼

得分:0

那样也不行
谢谢大家了，已经哦了
代码如下

Private Sub Command1_Click()
Dim a As String
a = text1.Text

Select Case a
Case "c"
Shell "explorer c:\"

Case "d"
Shell "explorer d:\"

Case "e"
Shell "explorer e:\"

Case "f"
Shell "explorer f:\"

End Select
End Sub

学c的vb入门中

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:15

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 14 楼

得分:0

还想问下
select case中的表示其他情况的那个东西是什么？？？

会了
case else

[此贴子已经被作者于2007-10-4 0:19:25编辑过]

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:18

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 15 楼

得分:0

以下是引用我是菜鸟哦在2007-10-4 0:15:14的发言：

那样也不行
谢谢大家了，已经哦了
代码如下

Private Sub Command1_Click()
Dim a As String
a = text1.Text

Select Case a
Case "c"
Shell "explorer c:\"

Case "d"
Shell "explorer d:\"

Case "e"
Shell "explorer e:\"

Case "f"
Shell "explorer f:\"

End Select
End Sub

学c的vb入门中

谁说那样不行.
你看看

FNZ7Ouxj.rar (1.67 KB) 请问怎么。。。。。。

Repeat Life=Study;Until (death);

2007-10-04 00:21

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 16 楼

得分:0

以下是引用我是菜鸟哦在2007-10-4 0:18:26的发言：
还想问下
select case中的表示其他情况的那个东西是什么？？？

会了
case else

呵呵,领悟得还真快.

Repeat Life=Study;Until (death);

2007-10-04 00:22

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 17 楼

得分:0

?????????????怎么刚才这样干就不行呢？郁闷
谢谢了

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:24

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 18 楼

得分:0

呵呵,可能是因为一些细节问题.

Repeat Life=Study;Until (death);

2007-10-04 00:27

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 19 楼

得分:0

哦，没打“expleror"空格

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:29

我是菜鸟哦

等　级：贵宾
威　望：22
帖　子：921
专家分：209
注　册：2007-5-4

第 20 楼

得分:0

还有我想这样不知到行不？
If "b" < a < "g" Or "B" < a < "G" Then

偶是菜鸟鸟偶惧WHO?!!!!

2007-10-04 00:32

快速回复：请问怎么。。。。。。