大家好，我个VB新手，请问Binary是怎么用的？
文件能添加成功，但是用string变量类型获取的内容是空的，用int、long只能获得一些数字，请问要怎么才能完成的取得文件的内容？
Private Sub Command1_Click() '获取文件内容
Dim a As String
Open "e:\e.txt" For Binary As #1
Get #1, 1, a
Label1.Caption = a
Close #1
End Sub
Private Sub Command2_Click() '添加文件内容
Dim e As String
Open "e:\e.txt" For Binary As #1
e = Text1.Text
Put #1, 1, e
Close #1
End Sub
使用 byte() 数组。
Open "e:\e.txt" For input As #1
input #1,a
Label1.Caption = a
Close #1
VB code:
Private Sub Command1_Click() '获取文件内容
Dim a() As Byte, i As Long
i = FileLen("e:\e.txt")
ReDim a(i - 1)
Open "e:\e.txt" For Binary As #1
Get #1, , a
Label1.Caption = StrConv(a, vbUnicode)
Close #1
End Sub
Private Sub Command2_Click() '添加文件内容
Dim e() As Byte
Open "e:\e.txt" For Binary As #1
e = StrConv(Text1.Text, vbfromUnicode)
Put #1, 1, e
Close #1
End Sub
Binary 是 VB 中“对文件操作方式的一种描述”，它把整个文件看着一系列的无任何格式定义的字节流。
在 读/写 文件时，也直接按内存数据的形式进行 输入/输出 操作（当然字符串是按 ANSI字节序列 来处理）。
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
可以吗
好奇怪的题目额！！
可以告诉我们你到底想问什么 ？
2分给我的话就可以。
........................可以吗
可以!
纠结，
29. vb可以这样做不？ ( H )√
A. ......
如题。
不用API也能实现:
http://topic.csdn.net/u/20090503/10/b8bbc710-37e3-4474-a724-ea6fad2e6bc0.html
使用API输出文本存在显示刷新问题,需在ReSize或Paint事件中加入代码.
http://download.csdn.net/ ......
