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的语法了呢？函数既然存在却又使用不正常？非常困惑
相关问答：
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
