VB 强制类型转换的问题

Question

dbd = CInt(Mid(bdstrAll, 5, 1))
 Text1.Text = dbd & ":" & "http://***/" & Mid(dbstrall, 6, dbd)
dbstrall是从本地文件读取出来的字符，第5位是文件名长度
这样写的结果Mid(dbstrall, 6, dbd)一直为空是什么原因？

Answer 1

dbd = CInt(Mid(bdstrAll, 5, 1))
 Text1.Text = dbd & ":" & "http://***/" & Mid(dbstrall, 6, dbd)
颠倒了一对字母

Answer 2

Dim i as string 
dim iCtr as string
   i=Mid(bdstrAll, 5, 1)
   ictr=Mid(dbstrall, 6, 1)
   Text1.Text = i & ":" & "http://***/" & ictr