帮我改改这VB题 - VB / 基础类
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
xpath = App.Path & "\ku\score.txt"
Open xpath For Random As #1 Len = Len(personl)
personl.number = Val(Text1.Text)
personl.score = Val(Text2.Text)
personl.name = Text3.Text
Put #1, Val(Text4.Text), personl
i = i + 1
Close #1
MsgBox "学生信息已写入！", vbInformation
Label1.Caption = "总记录数：" + i
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command2_Click()
xpath = App.Path & "\ku\score.txt"
Open xpath For Random As #1 Len = Len(personl)
Get #1, Val(Text4.Text), personl
Text1.Text = personl.number
Text2.Text = personl.score
Text3.Text = personl.name
End Sub
哪里有问题？
别考人！
VB code:
Private Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
xp
相关问答：
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
希望大家能够帮我下.感谢了..
源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html
转为VB.NET源码.
小弟完全是新手 不懂的说.麻烦各位帮忙一下
我的EMAIL是:4452 ......
vb将winsock控件封装到dll问题 有什么好的思路？ 如果用Socket API呢？
例如，像下面这样封装Winsock控件，行的通？
创建ActiveX dll，添加窗体frmClient，加入WinSock控件wskClient。
类代码：
Option Expli ......
各位高手赶快帮帮忙。
现在有一个delphi写的dll，函数中有PInteger的返回参数，在delphi中可以正常调用，但是我在vb里写的时候就不知道该怎么来调用了。
请看代码
以下是delphi中的函数定义和调用代码，能正常运� ......
