关于数组问题

auroralccy 2003-03-13 03:56:32
Dim abc(0 to 10) As Byte
我要对abc赋初值怎么写?
比如:把“123456789a”赋值给abc
...全文
75 19 打赏 收藏 转发到动态 举报
写回复
用AI写文章
19 条回复
切换为时间正序
请发表友善的回复…
发表回复
auroralccy 2003-03-21
  • 打赏
  • 举报
回复
多谢dyugao(风舞神枭)
dyugao 2003-03-21
  • 打赏
  • 举报
回复
C的API有一个参数声明为ByRef inBuff As Byte,现在我要传一个空指针给这个参数,在C里
传NULL就可以了,在VB里怎么传呢?

声明成 Byref inBuff as Any
传0就可以了
gang75 2003-03-21
  • 打赏
  • 举报
回复
gz
fbmsf 2003-03-20
  • 打赏
  • 举报
回复
把你的声明写来看一下!
如果是PB,我不懂
piaocl 2003-03-20
  • 打赏
  • 举报
回复
Dim Byt(0 To 9) As Byte
Dim i As Integer
For i = LBound(Byt) To 9
'Debug.Print CInt(Asc(Mid("abcdefghig", i + 1, 1)))
Byt(i) = CInt(Asc(Mid("123456789g", i + 1, 1)))

Next i

Dim strI As String
For i = LBound(Byt) To 9
strI = strI + CStr(Chr(Byt(i)))
Next i
auroralccy 2003-03-20
  • 打赏
  • 举报
回复
我用VC写的DLL里的一个输出函数,有个参数要传Byte的指针,在PB里肯定要声明为ByRef inBuff As Byte了, 而在VC里,要对这个参数传NULL, 在PB里怎么传呢?
lxcc 2003-03-19
  • 打赏
  • 举报
回复
split函数!
auroralccy 2003-03-19
  • 打赏
  • 举报
回复
To : fbmsf
我是想让你回答这个问题:

C的API有一个参数声明为ByRef inBuff As Byte,现在我要传一个空指针给这个参数,在C里
传NULL就可以了,在VB里怎么传呢?
fbmsf 2003-03-19
  • 打赏
  • 举报
回复
哪个api函数。?????

一般要改声明,
byval inBuffer as long
这样传0,就可以了
look4u 2003-03-18
  • 打赏
  • 举报
回复
GZ!!!
auroralccy 2003-03-18
  • 打赏
  • 举报
回复
To : fbmsf
第2个问题怎么不回答?
fbmsf 2003-03-18
  • 打赏
  • 举报
回复
为什么不用asc,mid呢?
因为你想按字节处理,
asc,mid是根据字符类型来处理的。

fbmsf 2003-03-17
  • 打赏
  • 举报
回复
ascb,midbb表示按字节(byte)来处理。
asc,mid对于不同的字符类型 有不同的结果。
auroralccy 2003-03-17
  • 打赏
  • 举报
回复
To : fbmsf
你是最棒的,真正理解了我的意思。
为什么要用ascb,midb呢?为什么不用asc,mid呢?

To:所有高手

C的API有一个参数声明为ByRef inBuff As Byte,现在我要传一个空指针给这个参数,在C里
传NULL就可以了,在VB里怎么传呢?
另,我知道在VB里传Null会出错。
fbmsf 2003-03-14
  • 打赏
  • 举报
回复
dim abc(10) as byte
For i = 0 To 10
abc(i) = ascb(Midb("123456789a", i+1, 1))
Next

用户 昵称 2003-03-13
  • 打赏
  • 举报
回复
For i = 0 To 10
abc(i) = Mid("123456789a", i+1, 1)
Next
northwolves 2003-03-13
  • 打赏
  • 举报
回复
一般这样用:

Dim abc() As Byte
abc = "123456789a"
auroralccy 2003-03-13
  • 打赏
  • 举报
回复
行不通,Mid出错。
CityhunterID 2003-03-13
  • 打赏
  • 举报
回复
For i = 0 To UBound(abc) - 1
abc(i) = Mid("123456789a", i, 1)
Next

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧