直接给程序: Dim sDeviceHWID As String
Dim bDevInfo() As Byte Dim Arr() As String
Dim i as Integer sDeviceHWID = StrConv(bDevInfo, vbUnicode)
If Arr(i) = sDeviceHardwareID Then
...
End If
这样是不是因为sDeviceHWID和Arr(i)的类型不同, 永远不能成立? 我用两个Textbox看值是相同的.
Dim bDevInfo() As Byte Dim Arr() As String
Dim i as Integer sDeviceHWID = StrConv(bDevInfo, vbUnicode)
If Arr(i) = sDeviceHardwareID Then
...
End If
这样是不是因为sDeviceHWID和Arr(i)的类型不同, 永远不能成立? 我用两个Textbox看值是相同的.
解决方案 »
- 那里有Crystal Report 的教程下载?
- 【在线急等】:一个有关十六进制的问题。一解决即结帖
- 如何得到目标计算机的计算机名和MAC地址?(不是得到本机的哦)
- 关于数据库的路径问题!
- 很菜的问题,请教!!!!!!!!!!!急!!!!!!!!!
- 怎样用VB使EXCEL中某一sheet所有单元格的字体居中、大小为10、颜色为黑色?
- 谁有有关使用水晶报表的使用实例或者说明之类的?
- vb 关于combobox的问题
- 如何判断windows的版本?
- 这个语句错了吗?"CREATE TABLE jjgasb(shuzhi int NOT NULL PRIMARY KEY, name varchar(8),sex varchar(2), class varchar(20))"
- 初学VB的几道编程题
- VB 日期类型与字符类型
Dim sDeviceHWID As String
Dim bDevInfo() As Byte Dim Arr() As String
Dim i As IntegerReDim Preserve bDevInfo(3)
bDevInfo(0) = &H72
bDevInfo(1) = &H32
bDevInfo(2) = &H45
bDevInfo(3) = &H63 sDeviceHWID = StrConv(bDevInfo, vbUnicode)
If Arr(i) = sDeviceHWID Then
' ...
End If但,Arr(i)从何而来?不知道它的值,怎么比!