Call GetCurrentDirectoryA(256, curdir)

Question

Dim a, s As String 
Dim curdir As String 
curdir = Space(256) 
Call GetCurrentDirectoryA(256, curdir) 
a = curdir 
s = "\d.bmp"
a = a & s 
Text1.Text = a 
我想的是a="f:\123\d.bmp" 
可是a = "f:\123" 
错在哪里了.

Answer 1

先去掉 a 后面的“空字符”——chr(0)The GetCurrentDirectory function retrieves the current directory for the current process.   

Answer 2

先去掉 a 后面的“空字符”——chr(0)  或者 chr(32)  

Answer 3

Dim a, s As String 
Dim curdir As String 
dim length as long
curdir = Space(256) 
length= GetCurrentDirectoryA(256, curdir) 
a = left(curdir ,length-1)
s = "\d.bmp"
a = a & s 
Text1.Text = a

Answer 4

就是不一样Dim a, s As String 
Dim curdir As String curdir = Space(256) 
Call GetCurrentDirectoryA(256, curdir) a = Replace(curdir, chr(0), "", 0)
a = Replace(curdir, chr(32), "", 0)s = "\d.bmp"
a = a & s Text1.Text = a