湖水深10m，小鸟在距湖面8m的空中飞翔，它在湖中成的像距离该鸟______m．

下列程序的执行结果为()。　　Ptivate Sub Commandl_Click()　　　　Dim FirStr As String　　　　FirStr="abcdef"　　　　Print Pct (FirStr)　　End Sub　　Private Function Pct(xStr As String)As String　　　　Dim tempStr As String,strLen As Integer　　　　tempStr=""　　　　strLen=Len(xStr)　　　　i=1　　　　Do While i＜=Len(xStr)-3　　　　　　tempStr=tempStr + Mid(xStr，i，l) + Mid(xStr，strLen - i+i ，1)　　　　　　i=i + 1　　　　Loop　　　　Pct=tempStr　　End FunCtion

A．void

B．int

C．new

D．long