下面这几个语句是什么意思,Enc(0),Enc(1)的最终结果是多少?请详细解释一下,谢谢Enc(0) = String(80, 0)
Enc(1) = String(80, 0)
For i = 0 To 1
Enc(i) = Left(Enc(i), InStr(1, Enc(i), Chr(0)) - 1)
Next
Enc(1) = String(80, 0)
For i = 0 To 1
Enc(i) = Left(Enc(i), InStr(1, Enc(i), Chr(0)) - 1)
Next
解决方案 »
- 问个比较弱智的问题,入门级
- 假设i代表"3123123"又代表"0891231",怎样的代码???急求!!
- 请教高手!一个关于textbox和treeview的问题,在线等!:( 郁闷呀!
- vb调用sql server存储过程提示"精度无效",在线等...感激
- 在C编的程序窗口里运行一个VB的EXE程序,大家请给点建议。
- 关于对象拖放
- 导入到word或excel文件?
- 怎摸刷新一个窗体?就象form1.refresh一样。
- printer打印的问题(在线等待)。
- langzhi:一个菜鸟数学问题:知道三角SIN和COS的值,如何求出孤度或角度?
- 怎样在vb中实现点一下菜单该条菜单前面打上对勾,在点一下对勾消失?
- 请问VB中有控件可以接受EXCEL中表格数据的粘贴吗?
Enc(1) = String(80, 0)Enc(0)也有 80个 chr(0) 字符
For i = 0 To 1
'把Enc的字符截去最右边的chr(0)字符,可能程序以为最右边的chr(0)字符是没用的字符
Enc(i) = Left(Enc(i), InStr(1, Enc(i), Chr(0)) - 1)
Next
Enc(1) = String(80, 0)
For i = 0 To 1
Enc(i) = Left(Enc(i), InStr(1, Enc(i), Chr(0)) - 1)
'i=0时,instr(1,enc(0),chr(0))-1=0
'left(end(0),0)=""
'所以,最后是enc(0)和enc(1)都为长度为0的空字串。
Next
前兩行分別給Enc(0)和Enc(1)值,其內容為80個值为0的字符串
第三至六行分別給Enc(0)和Enc(1)重新賦值,不過都為空(長度為0),
因為InStr(1, enc(i), Chr(0)) - 1=0結果Enc(0)=vbNullString
Enc(1)=vbNullString