15293.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 31 行

HTML
31
字号
<html>
  <head>
    <title>Re: 读取 .INI 档案</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 读取 .INI 档案</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:bookerh@tpts6.seed.net.tw">Booker Hsu</a> on July 06, 1999 at 17:24:48:<p>
In Reply to: <a href="15288.html">读取 .INI 档案</a> posted by Rex on July 06, 1999 at 15:00:28:<p>
: 请问VB有没有读取INI档的函数或物件?<p>可以 CALL API FUNCTION ..<p>Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nsize As Long, ByVal lpFileName As String) As Long<p>retlen = GetPrivateProfileString(ByVal "SET", ByVal "IP1", "10.1.21.250", ret_string, 80, App.Path + "\init.ini ")<br>IP1 = Left(ret_string, retlen)<p>>>init.ini 如下:<p>[SET]<br>IP1 = 10.1.21.250<br>PORT1 = 10652<p><br>或上网DOWNLOAD OCX ..<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 15293-->
<!--top: 15443--><li><a href="15443.html">参考这里,建立与读取.ini</a> <b>dino</b> <i>15:50:19 7/09/99</i>
(<!--responses: 15443-->0)
<ul><!--insert: 15443-->
</ul><!--end: 15443-->
<!--top: 15307--><li><a href="15307.html">有的!!! 只是...</a> <b>纪文和</b> <i>23:32:53 7/06/99</i>
(<!--responses: 15307-->0)
<ul><!--insert: 15307-->
</ul><!--end: 15307-->
</ul><!--end: 15293-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

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