Private Sub Command1_Click() Dim AAA, BBB As String Dim I, JJ As Integer I = 0 BBB = "" AAA = "sd12f5/6t/0/20f100" For JJ = 1 To Len(AAA) If Asc(Mid(AAA, JJ, 1)) >= 48 And Asc(Mid(AAA, JJ, 1)) <= 57 Then BBB = BBB & Mid(AAA, JJ, 1) Else I = I + Val(BBB) BBB = "" End If Next I = I + Val(BBB) MsgBox I End Sub
答：同意楼上的说法。一般字符串用字符型数组或字符指针实现。VC++里可以使用srting类型。这个新类型可以方便地实现字符串合并等常用操作。详情>>
答：线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问：电脑安装了VB6.0，为什么打开方式里面没有VB程序选项，进安装好的VB里去关联...
答：打开方式最下面还有一个《选择程序》，点开后查VB的安装目录的EXE，找到后直接打开，下次就会在打开方式里查到了详情>>
