VB6.0函数过程调用教程

函数过程调用在 VB6.0 中是一个常见且有用的操作。简单来说,它就像是常用的函数调用,只不过它有点儿,参与了表达式的运算。比如,你在代码中调用了MyReplace函数,并且传入了不同的参数,它就会根据你给定的实参,返回修改后的字符串。听起来有点复杂,但其实挺好理解的。你只需要确保传入的参数个数、位置和类型都匹配,函数就会按预期运行。
对于一个例子,可以看这样的一段代码:

Private Sub Command1_Click()
  Text1 = MyReplace(Text1, "cd", "3")
  ST = ("Visual Basic 程序设计教程 5.0 版")
  Print MyReplace(ST, "5.0", "6.0")
End Sub
Function MyReplace$(s$, OldS$, NewS$)
  Dim i%, lenOldS%
  lenOldS = Len(OldS)
  i = InStr(s, OldS)
  Do While i > 0
    s = Left(s, i - 1) + NewS + Mid(s, i + lenOldS)
    i = InStr(s, OldS)
  Loop
  MyReplace = s
End Function
这段代码就展示了如何通过MyReplace函数替换字符串中的部分内容。
如果你想深入了解更多,可以参考下面的相关文章,了解如何在 VB6.0 中更好地使用函数过程。

ppt 文件大小:3.12MB