public structure happdo
public coil_number as string
end structure
dim hap_pdo() as happdo
strsql0="select coil_number from pdo"
Haprs_Open(strSql0)
ReDim hap_pdo(Haprs.RecordCount)
For i = 0 To Haprs.RecordCount - 1
hap_pdo(i).COIL_NUMBER = Haprs("COIL_NUMBER").Value
next i
VB.net里我这样把recordset的值赋给结构体数组竟然的赋不进去,也不报错。i和 Haprs("COIL_NUMBER").Value在变,但hap_pdo(i).COIL_NUMBER 一直是nothing。
这是调试的watch
name
value
type
i
1
Integer
Haprs("COIL_NUMBER").Value"7BS056287" {String}Object
hap_pdo(i).COIL_NUMBER
Nothing
String
有人可以帮忙解决一下吗
非常感激