邪言灵师番外莲洛:vb 读写ini文件
来源:百度文库 编辑:九乡新闻网 时间:2024/04/28 17:28:35
Dim locbuffer As String '读入参数时,临时打开的内存
'对api函数的声明
Private 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
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Long
'声明
Dim ret As Long
'写入ini文件
WritePrivateProfileString "四角吃水比重值", "a", Lab_gravity.Caption, App.Path & "\cotms.ini" '将比重值写入cotms.ini
'读入ini文件给texset
locbuffer = String(255, " ")
ret = GetPrivateProfileString("四角吃水比重值", "a", "", locbuffer, 256, App.Path & "\cotms.ini") '读ini文件
locbuffer = Trim(locbuffer) '去掉空格
locbuffer = Left(locbuffer, Len(locbuffer) - 1) '去掉最后一位结束符
TexSet.Text = locbuffer
locbuffer = " "
'对api函数的声明
Private 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
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Long
'声明
Dim ret As Long
'写入ini文件
WritePrivateProfileString "四角吃水比重值", "a", Lab_gravity.Caption, App.Path & "\cotms.ini" '将比重值写入cotms.ini
'读入ini文件给texset
locbuffer = String(255, " ")
ret = GetPrivateProfileString("四角吃水比重值", "a", "", locbuffer, 256, App.Path & "\cotms.ini") '读ini文件
locbuffer = Trim(locbuffer) '去掉空格
locbuffer = Left(locbuffer, Len(locbuffer) - 1) '去掉最后一位结束符
TexSet.Text = locbuffer
locbuffer = " "
vb 读写ini文件
Python 操作 ini文件
Desktop.ini 文件详解
C# 读写Config文件
VBA 读写文件详细参数
MFC文件读写
Python 简洁ini读写 - 代码分享 - 开源中国社区
不怕崩溃 修复丢失的BOOT.ini启动文件
VB文件追加和覆盖
c/C++ 文件读写 收集备
如何在PL/SQL中读写文件
Linux文件系统之文件的读写
内存映射文件(专门读写大文件)
VB 把EXCEL文件导入MSFLEXGRID表格
深入分析windows的系统文件—boot.ini--博采众生
Linux文件系统之文件的读写(续二)
Linux文件系统之文件的读写(续一)
VB中的Res文件的建立和修改
用VB实现图形文件的批量转换
在VB中把EXCEL文件导入MSFLEXGRID
在php.ini中设置表单上传文件的大小,以及获取设置的值的方法
vb vb
如何编辑boot.ini
php.ini register_globals must is Off! 怎么办? - ...