ascii码在vb里的存储类型
ascii码在vb里的存储类型是哪个??
VB code:
Private Sub Form_Load()
MsgBox TypeName(Asc("a"))
End Sub
Byte类型
最后我教你一个Ascii和UniCode的人工转换办法。
以4个空格为例：
Ascii编码：
20 20 20 20
UniCode编码：
20 00 20 00 20 00 20 00
产生字符串“1234”的程序：
Ascii编码：
Dim Bytes() As Bytes
For x =0 To 3
i = x
Bytes(i) = 49 + x
Next
这个时候，Bytes()是Ascii编码的字符串“1234”。但你想转换成VB下的String，需要这样。
String1 = Bytes()
Debug.print String1 '显示乱码，因为String1是Ascii编码，而不是UniCode编码。
String2 = StrConv(Bytes(), vbUniCode)
Debug.print String2 '显示"1234"
UniCode编码：
Dim Bytes() As Bytes
For x =0 To 3
i = x * 2
Bytes(i) = 49 + x
Next
String1 = Bytes()
Debug.print String1 '显示"1234"
学习
小仙妹
相关问答：
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> "
大家好，我用上面一个东西赋值 TF1.text = & ......
题目描述应该不是很准确。
现状是：假如一个文本文件共100行，那么我循环次数最大就是100×100=10000下，花费时间非常多，请问有没有办法能够提高对文本文件的循环访问速度。非数据库技术。
你要循环做什么� ......
