连续切换label控制的caption属性的有关问题

连续切换label控制的caption属性的问题
Private   Sub   Command1_Click()
    Label1.Caption   =   "正在写入配置... "
    Sleep   (1500)
    Label1.Caption   =   "正在写入配置22... "
    Sleep   (1500)
    Label1.Caption   =   "正在写入配置333... "
End   Sub

以上代码，为什么只显示最后值，而不显示前两个值，该如何让它依次显示呢？


[解决办法]
Private Sub Command1_Click()
Label1.Caption = "正在写入配置... "
label1.refresh
Sleep (1500)
Label1.Caption = "正在写入配置22... "
label1.refresh
Sleep (1500)
Label1.Caption = "正在写入配置333... "
label1.refresh
End Sub