合同药具调拨程序是什么？

有如下用户定义类型及操作语句：
Type Teacher
TNo As String
TName As String
IAge As Integer
End Type
Dim Tea As Teacher
With Tea
.TNo＝"20080001"
.TName＝"张三"
.IAge＝32
End With
执行MsgBox Tea. TName后，消息框输出结果是 (14) 。