执行下面程序，第一行输出结果是 【14】 ，第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A)
End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub

Windows基本操作题，不限制操作的方式。
注意：下面出现的所有文件都必须保存在考生文件夹下。

将考生文件夹下TEBE文件夹中的文件CO.TXT设置成为隐藏和存档属性。