Function GetFromInI(KeyName As String, Optional DefautltValue As String)
Dim Retstr As String
Dim AppName As String
Dim IniFileName As String
IniFileName = App.Path & "\JLHYKXYQ_HY440B.ini" '默认打开路径
AppName = "Setting"
Retstr = String(255, Chr(0))
GetFromInI = Left(Retstr, GetPrivateProfileString(AppName, ByVal KeyName, "", Retstr, Len(Retstr), IniFileName))
End Function
谁能具体到给我解释一下这段代码的每一句是什么意思么?
VB中setting什么意思
答案:2 悬赏:0 手机版
解决时间 2021-02-09 03:37
- 提问者网友:富士山上尢
- 2021-02-08 10:41
最佳答案
- 五星知识达人网友:夜风逐马
- 2021-02-08 11:30
这里的Setting是一个字符串内容,并不是VB的关键字
也就是用户想要他是什么内容他就是什么内容。
内容:
第1行:定义一个名称叫GetFromInI的函数,参数列表为字符串变量KeyName,字符串变量DefautltValue并初始化其为空字符串.
第2行:定义一个名称为Retstr的字符串变量。
第3行:定义一个名称为AppName的字符串变量。
第4行:定义一个名称为IniFileName的字符串变量。
第5行:给IniFileName赋值,其值为 软件所在位置与"\JLHYKXYQ_HY440B.ini"连接起来的字符串
第6行:将AppName的值赋值为"Setting"
第7行:将Retstr变量的长度设置为255,并以空字符填满。
第8行:查找AppName小节,KeyName条目,设置没找到时返回值为空,Retstr为字符缓冲区,Retstr的长度为装载到缓冲区的最大长度,IniFileName为文件目录名。并取Restr变量的第返回值个字符赋值给GetFromInI变量。
第9行:结束函数
也就是用户想要他是什么内容他就是什么内容。
内容:
第1行:定义一个名称叫GetFromInI的函数,参数列表为字符串变量KeyName,字符串变量DefautltValue并初始化其为空字符串.
第2行:定义一个名称为Retstr的字符串变量。
第3行:定义一个名称为AppName的字符串变量。
第4行:定义一个名称为IniFileName的字符串变量。
第5行:给IniFileName赋值,其值为 软件所在位置与"\JLHYKXYQ_HY440B.ini"连接起来的字符串
第6行:将AppName的值赋值为"Setting"
第7行:将Retstr变量的长度设置为255,并以空字符填满。
第8行:查找AppName小节,KeyName条目,设置没找到时返回值为空,Retstr为字符缓冲区,Retstr的长度为装载到缓冲区的最大长度,IniFileName为文件目录名。并取Restr变量的第返回值个字符赋值给GetFromInI变量。
第9行:结束函数
全部回答
- 1楼网友:低音帝王
- 2021-02-08 12:29
自定义字符串。不是vb定义的内容。
再看看别人怎么说的。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯