VB实时错误94,无效使用null,跪求vb6.0高手帮忙

2024-11-27 16:37:31
推荐回答(1个)
回答(1):

jj = InStrRev(ps.executablepath, "\")
Text4.Text = Mid(ps.executablepath, 1, jj - 1) & ""