Dim TextUser
Set TextUser = ScreenItems("TextUser")
TextUser.Text=""
Dim TextPwd
Set TextPwd = ScreenItems("TextPwd")
TextPwd.Text=""
TextPwd= TextPwd.Text
Dim TextUser
Set TextUser = ScreenItems("TextUser")
TextUser.Text=""
Dim TextPwd
Set TextPwd = ScreenItems("TextPwd")
TextPwd.Text=""
TextPwd= TextPwd.Text