比如:一个简单的程序,两个label,Lable1,Lable2,一个按钮
按钮的Click事件这样的
Dim ss As String * 64
ss = Me.Label1.Caption
Me.Label2.Caption = ss & "***"
结果
Lable1显示Lable1
Lable2显示Lable1 ***
如果我想得到
Lable1显示Lable1
Lable2显示Lable1***
应该怎么做?
其中dim ss as string * 64 不能变成dim ss as string,因为在我的程序中,string中的结果是从Api中的来的。
按钮的Click事件这样的
Dim ss As String * 64
ss = Me.Label1.Caption
Me.Label2.Caption = ss & "***"
结果
Lable1显示Lable1
Lable2显示Lable1 ***
如果我想得到
Lable1显示Lable1
Lable2显示Lable1***
应该怎么做?
其中dim ss as string * 64 不能变成dim ss as string,因为在我的程序中,string中的结果是从Api中的来的。
ss2=Trim(ss)
但是API一般返回的是VbNull (即 chr(0))
因此应该是:
ss1=left(ss,instr(ss+vbnull ,vbnull)-1)