qqexpfileattr.html

来自「包含大量VB常用函数 大概一百几十个左右 每个函数都有比较详细的说明 希望大家喜」· HTML 代码 · 共 58 行

HTML
58
字号
<html>

<head>
<title>千千VB站 函数方法</title>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>

<body background="picbkgd.gif" tppabs="picbkgd.gif">

<marquee><b><blink>文件开启模式</blink></b></marquee>
<hr>
●适用于VB、VBA。<br>
●用法:传回值 = FileAttr(文件编号,传回模式)<br>
<hr>
○VB、VBA:<br>
<dl>
  Private Sub Command1_Click()
  <dd>
    <dl>
      Open &quot;Temp.tmp&quot; For Append As #1
      <dd>Print FileAttr(1, 1)
    </dl>
    Close #1
</dl>
End Sub<br>
<p>●传回值:
<table border="1" width="100%">
  <tr>
    <th>Mode
    <th>Value
  <tr>
    <td>Input
    <td>1
  <tr>
    <td>Output
    <td>2
  <tr>
    <td>Random
    <td>4
  <tr>
    <td>Append
    <td>8
  <tr>
    <td>Binary
    <td>32
</table>
<hr>
<center><a href="exp.html" tppabs="exp.html">[回主页]</a></center><br>

</body>

</html>
 

</SCRIPT>     
 

⌨️ 快捷键说明

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