vb 从文件读取数值

用VB从Text文件读取数值，其中定义了几个数据，但是只有字符类型的能够正常显示，其他的数字都是0，代码如下：
Dim I As Long
Dim mCombo1(4) As String '字符数组
Dim mText1(4) As Double '数组 值分别为0.05 0.05 1 1
Dim mText2, mText3, mText4 As Long '数字 值分别为40 0 100
Dim msg As Long
msg = MsgBox("从硬盘调入设置参数？", vbOKCancel, "Confirm")
If msg = 1 Then
Open "E:\界面\Data\sz1" For Input As #1
Input #1, mCombo1(0), mCombo1(1), mCombo1(2), mCombo1(3), mText1(0), mText1(1), mText1(2), mText1(3), mText2, mText3, mText4
For I = 0 To 3 Step 1
Combo1(I) = mCombo1(I)
Text1(I) = mText1(I)
Text1(I) = mText1(I)
Next I
Text2 = mText2
Text3 = mText3
Text4 = mText4
Close #1

vb 从文件读取数据到数组 VB.net 读取文件 vb中的文件读取 VB文件读取写入 VB读取TXT文件 vb读取文件 使用vb读取word文件 VB读取DAT文件问题 VB 如何读取ini文件 求助：VB中怎样从TXT文件中读取数据，并赋值给二维数组？