2798.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 22 行

HTML
22 行
字号 
<html>
  <head>
    <title>Re: 如何寻找光碟机所在路径?</title>
  </head>
  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">
    <center>
      <h1>Re: 如何寻找光碟机所在路径?</h1>
    </center>

<HR><p>
Posted by <a href="mailto:fann@tccm.edu.tw">刘柏泛</a> on May 10, 1998 at 17:53:06:<p>
In Reply to: <a href="2791.html"><b>如何寻找光碟机所在路径?</b></a> posted by snow on May 09, 1998 at 09:52:17:<p>
使用 Drive 物件<br>Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long<p>Private Sub Form_Load()<br>Dim I As Integer<br>Dim DriverPath As String<br>Dim ret As Long<p>For I = 0 To Drive1.ListCount<br>　DriverPath = Left(Drive1.List(I), 2) + "\"<br>　ret = GetDriveType(DriverPath)<br>　If ret = 5 Then Drive1.ListIndex = I<br>Next I<br>End Sub<br>这样目录即会转至光碟机，程式的部份有问题请自行修改
<br>
<p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 2798-->
</ul><!--end: 2798-->
<br><HR><p>

</body></html>

2798.html - 源码说明

本页面展示了「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.」中的 2798.html 源码文件，采用 HTML 编程语言编写，共 22 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与VB相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?