سلام با اولین سوال کارمون رو آغاز میکنیم
[HTML]
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim i As Integer
Dim c As Object
Dim d As Object
Dim h As Object
Dim a As String
Dim b As String
Dim avg As Integer
FileOpen(2, "C:\Documents and Settings\Amirreza\Desktop\3.txt ", OpenMode.Input)
FileOpen(3, "C:\Documents and Settings\Amirreza\Desktop\33.txt ", OpenMode.Output)
For i = 1 To 2
Input(2, a)
Input(2, b)
Input(2, c)
Input(2, d)
Input(2, h)
Print(a, b, avg)
WriteLine(3, a, b, avg)
Next i
FileClose(3, 2)
End Sub
[/HTML]
در قطعه کد بالا مشکل PRINT چی هست ؟
