请问一个vb问题

来源：百度知道编辑：UC知道时间：2024/05/14 04:41:42

Private Sub Command1_Click()
Dim a As String * 10
a = "abcdefj"
Open "c:\a6.txt" For Random As #28 Len = 10

Put #28, 1, a
Close #28
End Sub

Private Sub Command2_Click()

Open "c:\a6.txt" For Binary As #28
Dim d As Long

Get #28, 1, d
Print d;
Close #28
End Sub
其中dim d as long或者dim d as integer都可以如果定义dim d as string就不可以请问为什么,谢谢!

可以定义为定长字符串变量
Private Sub Command1_Click()
Dim a As String * 10
a = "abcdefj"
Open "c:\a6.txt" For Random As #28 Len = 10

Put #28, 1, a
Close #28
End Sub

Private Sub Command2_Click()
Open "c:\a6.txt" For Binary As #28
Dim d As String * 10'这里改一下
Get #28, 1, d
Print d;
Close #28
End Sub

请问一个VB问题请问一个vb问题请问:VB的一个问题? 请问一个别vb问题请问一个vb的问题 VB菜鸟请问一个简单的问题请问一个关于vb变量的问题请问高手一个VB编程问题请教vb一个vb问题请问一个vb程序