VB中 dim i as integer 中的integer是什么意思?
PublicSubdelstr(s1AsString,s2AsString)DimiAsIntegeri=InStr(s1,s2)1s2=Len(s1)DoWhilei>...
Public Sub delstr(s1 As String, s2 As String)
Dim i As Integer
i = InStr(s1, s2)
1 s2 = Len(s1)
Do While i > 0
1 s1 = Len(s2)
s1 = Left(s2)
s1 =lenft(s1,i) + right(s1,1s1 - (i + 1s2))
i = insr(sr, s2)
Loop
Private Sub command1_click()
Dim ss1 As String
ss1 = text1.Value
Call delstr(ss1, text2.Text)
End Sub
中哪里错了 ? 展开
Dim i As Integer
i = InStr(s1, s2)
1 s2 = Len(s1)
Do While i > 0
1 s1 = Len(s2)
s1 = Left(s2)
s1 =lenft(s1,i) + right(s1,1s1 - (i + 1s2))
i = insr(sr, s2)
Loop
Private Sub command1_click()
Dim ss1 As String
ss1 = text1.Value
Call delstr(ss1, text2.Text)
End Sub
中哪里错了 ? 展开
3个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询