VB6.0把常量作为实参方法示例,书中的代码,分享给大家,后附完整源码下载。 Sub s(n As Integer) '定义子过程 Dim i As Integer For i = 1 To n '子过程的功能是输出n个空格 Print " "; Next i End Sub Private Sub Command1_Click() '事件过程 Print "姓名"; '原样输出 s (10) '调用子过程 Print "性别" Print "年龄"; s (10) '常量作实现进行传递 Print "班级"