2009年2月1日，甲施工企业与乙设备安装公司签订了一份设备租赁合同，合同约定，甲施工企业应于设备进场后两周内支付乙设备安装公司租金。2009年3月1日，工程开工，设备如期进场。但直到2009年4月1日，甲施工企业仍未支付乙设备安装公司租金。则乙设备安装公司的诉讼时效截止时间是( )。

A．2010年3月1日

B．2010年3月15日

C．2010年4月1日

D．2011年3月1日

下列程序的执行结果为 Private Sub Command1_Click( ) Dim FirStr As String FirSt = "abcdef" Print Pat(FirStr) End SubPrivate Function Pat( xStr As String) As StringDim tempStr As String, strLen As Integer tempStr ="" strLen = Len(xStr) i=1 Do While i＜=Len(xStr)-3 tempStr = tempStr + Mid(xStr, i, 1 ) + Mid(xStr, strLen - i + 1, 1 ) i=i+1 Loop Pat = tempStrEnd Function

A．abcdef

B．afbecd

C．fedcba

D．defabc