VB Code:
  1. ' Program Globals
  2. Dim DestAlbum as String
  3. Dim DestDisc as String
  4.  
  5. 'Main Sub
  6. Private Sub CommandBrowse_Click()
  7.     Dim RetStat As Integer
  8.     Dim TempDest As String
  9.    
  10.     Load Albumsfrm
  11.     Albumsfrm.Show 1
  12.     If Albumsfrm.Retstring <> "" Then
  13.         RetStat = GetParam(Albumsfrm.Retstring, 1, "||", DestAlbum)
  14.         RetStat = GetParam(Albumsfrm.Retstring, 2, "||", DestDisc)
  15.     End If
  16.     TempDest = DestDisc
  17.     MsgBox DestAlbum & "  " & DestDisc
  18.     AlbumName.Text = DestAlbum
  19.     MsgBox DestAlbum & "  " & DestDisc
  20.     If TempDest <> "" Then
  21.         AlbumName.Text = AlbumName.Text & " (" & TempDest & ")"
  22.     End If
  23.     Set Albumsfrm = Nothing
  24. End Sub


Can anyone see in the above procedure why the first popup message displays "Atomic Kitten CD1"
and the second one displays a blank popup?

It seems as though the Albumname.Text = DestAlbum clears my Global Variables DestAlbum and DestDisc!!