这个乘法问题在哪儿？

Question

 Val (Text5.Text) * 145636 = temp8

Answer 1

temp8=Val (Text5.Text) * 145636 

Answer 2

If Dir("8.txt") <> "" Then
        Dim temp8 As String
        Open App.Path & "\8.txt" For Input As #8
        Line Input #8, temp8
        Val (Text5.Text) * 145636 = temp8
        Close #8
End If“Val (Text5.Text) * 145636 = temp8”
这一句不能颠倒过来

Answer 3

cStr(cLng(Text5.Text) * 145636) = temp8 

Answer 4

不是 就是把Val (Text5.Text) * 145636保存进\8.txt文件里面  我原来是这样Text5.Text = temp8就可以 我现在想乘145636 

Answer 5

应该用Print保存，而Line Input 是读取一行：
If Dir("8.txt") <> "" Then 
        Dim temp8 As String 
        Open App.Path & "\8.txt" For Input As #8 
        Print #8, cLng(Text5.Text)*145636 
        'Val (Text5.Text) * 145636 = temp8 
        Close #8 
End If 

Answer 6

        'Val (Text5.Text) * 145636 = temp8
        text5.text=temp8
        text5.text=val(text5.text)*145636
        '你想要的是以上这个?

Answer 7

If Dir("8.txt") <> "" Then 
        Dim temp8 As String 
        temp8 = Val (Text5.Text) * 145636
        Open App.Path & "\8.txt" For Output As #8 
        Print #8, temp8
        Close #8 
End If