各位大哥大姐！帮帮忙！

各位大哥大姐，我有一段VB代码，我想把它改为VC++的代码，请会的高手帮帮我！很急很急
Dim sun As String
Const MyFile = 1
Dim i%
Dim b As String
Dim a As String
Dim d As String
Dim c As String
Dim k As Integer
Dim v As Integer
Dim m As String
Dim sum5 As Double
Dim sum1 As Double
Dim sum2 As Double
Dim sum3 As Double
Private Sub Command1_Click()
Dim fileName As String
Static t() As Integer
Open "d:\vb程序11\0.txt" For Input As #1  '打开文件
Input #1, n
ReDim t(n) As Integer
For i = 1 To n
Input #1, t(i)
       sun = t(i)
    Text1.Text = Text1.Text + sun + Space(3)
   sum1 = sum1 + t(i)
        Text2.Text = sum1 / n
  Next i
      For v = 1 To 30
           For i = 1 To n - v
                       m = t(i + v) - sum1 / n
                            b = t(i) - sum1 / n
                             sum2 = sum2 + m * b
                               sum5 = sum5 + b
                                 sum3 = sum3 + sum5 * sum5
                     
                     Next
                           c = sum2 / n
                             Text4.Text = Text4.Text + c + Space(3)
                                   a = sum3 / n
                                    Text3.Text = Text3.Text + a + Space(3)
                               d = c / a
                          Print d
                     Text5.Text = Text5.Text + d + Space(3)
                  Next
Close #1
Open "d:\vb程序11\1.txt" For Output As #1  '读入文件
Print #1, Text5.Text
Close #1
End Sub
Private Sub Command2_Click()
  End
End Sub