does someone know how to convert a string to set a label, the following code
gives a "Type mismatch"

Private Sub Command1_Click()
  Dim str As String
  txt = Label3
  Set lb = txt
  lb.Caption = "Hi"
End Sub

and this following works fine:

Private Sub Command1_Click()
  Dim str As String
  Set lb = Label3
  lb.Caption = "Hi"
End Sub
---
þ RIMEGate(tm)/RGXPost V1.14 at BBSWORLD * Info{at}bbsworld.com

---
 * RIMEGate(tm)V10.2áÿ* RelayNet(tm) NNTP Gateway * MoonDog BBS
 * RgateImp.MoonDog.BBS at 6/20/04 8:16:15 AM