vb 2008 FileGet()函数如何使用？
VB.NET code:
Private Sub TextBox1_DragDrop(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragDrop
Dim str() As String = CType(e.Data.GetData(DataFormats.FileDrop, False), String())
Dim data(8)
TextBox1.Text = str(0)
FileSystem.FileOpen(1, str(0), OpenMode.Binary, OpenAccess.Read, OpenShare.LockReadWrite)
FileGet(1, data)
FileClose(1)
For i = 0 To 8
TextBox1.Text = TextBox1.Text & data(i)
Next i
End Sub
用断点调试，结果表明最后执行的语句是FileGet(1,data)，该句再往下就好像是用了Exit sub一样，全部没有执行
何解？大大们要救救我啊~~~~~~~~~~
streamreader如何使用？还望大大多多指点
而且我需要读入二进制数据而不是字符
http://blog.csdn.net/hahanan1987/archive/2009/03/05/3959469.aspx
我知道了，问题用binaryreader解决了。
但是还想了解一下，为什么VB 2008就不能用VB 6的语法了呢？函数既然存在却又使用不正常？非常困惑
相关问答：
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
vb中怎么通过xml来解析数据库中的字段值。
没办法用XML解析数据库的字段值，除非数据库中保存的是XML格式的字符串文档。
XML用来展示层次的数据。
数据库一般是二维数据。
数据库中保存的是XML字符串格式� ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
......
我制作了个用户控件，需要动态加载到窗体上
Set objExt = Controls.Add("工程1.meActiveX", argName)
objExt.Visible = True
程序一次能加载N个， 现在想对 ......
