以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  急!关于读取ini文件的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44660)

--  作者:huangzhongdui
--  发布时间:2014/1/6 13:06:00
--  急!关于读取ini文件的问题
开发中vb的读取ini文件,在foxtable中怎么用尤其是函数声明部分
Dim F As String, nStr As String, nSize As Long
Dim dl As String
F = "C:\\1.ini"
messagebox.show(F)
dl = GetPrivateProfileString("品名", "FontName", "", nStr, nSize, F)
这个结果没取到值

--  作者:Bin
--  发布时间:2014/1/6 14:04:00
--  
这个是API的函数,是不可以这样直接使用的呢. 全局代码加入如下 public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
--  作者:huangzhongdui
--  发布时间:2014/1/6 14:14:00
--  
我已经声明过这个函数了,可是我nStr取出来的值是空值
--  作者:有点酸
--  发布时间:2014/1/6 14:15:00
--  

这里有人做了个例子:

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=40490&skin=0

 


--  作者:Bin
--  发布时间:2014/1/6 14:15:00
--  
上个例子看看