展开全部
Dim sstr As String
Dim sString As String
Dim num As Long
sstr = Space(100)
num = GetPrivateProfileString( "system ", "id ", " ", sstr, 100, App.Path & "\1.ini ")
sString = Trim(Left(sstr, num))
Dim sString As String
Dim num As Long
sstr = Space(100)
num = GetPrivateProfileString( "system ", "id ", " ", sstr, 100, App.Path & "\1.ini ")
sString = Trim(Left(sstr, num))
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
