1932.html

来自「VB技巧问答10000例 VB技巧问答10000例」· HTML 代码 · 共 25 行

HTML
25 行
字号 
<html>  <head>    <title>一个小问题</title>  </head>  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">    <center>      <h1>一个小问题</h1>    </center><HR><p>Posted by <a href="mailto:mars527@mail3.catv.com.tw">MARS</a> on February 13, 1998 at 19:08:15:<p>小弟是初学者,絣到许多的问题,希望大家能教教我<br>,早日征服它<br>Private Sub Command1_Click()<br>Unload Me<br>End<br>End Sub<p>Private Sub Dir1_Change()<br>File1.Path = Dir1.Path<br>End Sub<p>Private Sub Drive1_Change()<br>Dir1.Path = Drive1.Drive<br>End Sub<p>Private Sub File1_Click()<br>If Right(File1.Path, 1)  "\" Then<br>Label1.Caption = File1.Path & "\" & File1.filename<br>Else<br>Label1.Caption = File1.Path & File1.filename<br>End If<p>Label2.Caption = "档案大小:" + Str$(FileLen(Label1.Caption)) + "位元组"<p>End Sub<br>Private Sub form_()<br>Drive1.Drive = App.Path<br>Dir.Path = App.Path<p>End Sub<p>Private Sub image1_Click()<br>image1.Picture = LoadPicture(Label.Caption)<br>End Sub<br>其中private sub file1_click这段程式里<br>if right(file1.path,1)"\" then是什么意思?那个符号在VB里是代表什么,<br>       希望各位网友解答<br>                感激不尽<br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1932--><!--top: 1941--><li><a href="1941.html"><b>Re: 一个小问题</b></a> 小刘 <i>02:43:41 2/15/98</i>(<!--responses: 1941-->0)<ul><!--insert: 1941--></ul><!--end: 1941--></ul><!--end: 1932--><br><HR><p></body></html>

1932.html - 源码说明

本页面展示了「VB技巧问答10000例 VB技巧问答10000例」中的 1932.html 源码文件，采用 HTML 编程语言编写，共 25 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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