谁能解释一下这个语句的含义？

Question

    Dim tmp As String
    Dim l As Long
    Dim i As Long
    Dim n As Long
     tmp = UCase(t.Text): t.Text = "": t.Text = tmp: l = 1
帮忙解释一下！谢谢。

Answer 1

 tmp = UCase(t.Text): t.Text = "": t.Text = tmp: l = 1 
等同于 tmp = UCase(t.Text)     '将t.Text中的字母转换为大写
 t.Text = ""             '清空t.Text的内容
 t.Text = tmp            '给t.Text赋值
 l = 1 
:的作用是将多条语句写在一行,分隔多条语句使用的

Answer 2

可以简化一下
t.Text=UCASE(t.Text)
l=1

Answer 3

只是把 tmp的值和Text的值变为大写，而且两个值相同
L的值赋值为1