16进制 &HA I FF ,其中I为变量,怎么写,谁会了,急用,谢谢了!

[xingxingxiangrong]

急用,谢谢了!

[用户 昵称]

dim i as long
dim r as long
for i = 0 to 15
    r = &ha000 + i * 4096 + &hff
next i

[用户 昵称]

Private Sub Command1_Click()
    Dim i As Long
    Dim r As Long
    For i = 0 To 15
        r = &HA000 + i * 2 ^ 8 + &HFF
        If r < 0 Then
            r = r + 65536
        End If
        Debug.Print Hex$(r)
    Next i

End Sub

[xingxingxiangrong]

i是一个具体的值为什么要循环呢,谢谢了

[fishmans]

dim str as string
str="&HA"+"00"+"FF"
dim result as long
result=val(str)

是这意思么？

[xingxingxiangrong]

我可能没说清楚,不好意思!
下面是他提供的函数接口：

开关量输出
功能：设置16位输出数据DO0-DO15。
函数：long AC6610_DO（HANDLE hHandle,long iodata）
hHandle：入口参数，卡的操作句柄。
iodata：入口参数，要输出的数据。低16位有效。16位数据（D15-D0）分别对应输出端口DO15-DO0。
函数返回：出口参数，=0操作成功，其它失败。

例如

AC6610_DO hd6610,&hffff --这个&hfff由于电瓶高低的变化时刻变化，所以要用一个变量代替

他给例子就是１６进制变量，我试过long型提示类型不匹配