急！关于读取ini文件的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 急！关于读取ini文件的问题

共有4179人关注过本帖树形打印复制链接主题：急！关于读取ini文件的问题

huangzhongdui

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：168 积分：1102 威望：0 精华：0 注册：2014/1/6 10:35:00

急！关于读取ini文件的问题 发帖心情

Post By：2014/1/6 13:06:00 [只看该作者]

开发中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

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：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