VB把常量作为实参方法示例.rar

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 "班级" 　　s (25) 　　Print "输出完毕" '在窗体上打印 　　End Sub 　　本源码编译运行效果截图如下图所示。