Question

VB中标准模块的新手问题

第一次接触VB中标准模块的问题没找到关于标准模块的资料，都是跟类模块的对比，我就耐心看了看类模块的解释，最后还是有点云里雾里，所以现在直接来找人求教标准模块的应用。
如下面的例子（我比较喜欢用例子反推，学起来简单）：
窗体中有一个command按钮，窗体代码是：
Private Sub Command1_Click()
Call acc
End Sub

Private Sub Form_Load()
End Sub

我添加一个模块，双击模块，在通用里面如下代码：
Sub acc()
Print "a="
End Sub

运行后，提示我 “没有适当的对象，方法无效”
弱智问题，求解释！
你们三个都给了我一个很好的解释，
lidajiangzw的解释试验成功，谢谢，我懂了！我想选你们三个都为满意答案！

Answer 1

标准模块 就是 所有 窗口 的 公共 能使用和访问的的地方
Print "a=" 这句是在窗口中 打印字符，如果你这么写放在 某个窗口的 方法中，他就默认 打印在该窗口中，
如何 是 在 标准模块 中写 Print "a=" ，请问他打印在哪里，标准模块就是存放公共数据的地方，没有窗口，这句代码 又是 在窗口打印字符，就要保存，找不到对象，所以在 标准模块中加上 form1.Print "a=" 指明 是使用哪个窗口打印字符

Answer 2

你用简单例子说明问题，这个想法很好！我当年也是这么学习的，从简到难。但是有一点你要注意，Print语句不能用在模块中，它是在窗体区域显示字符串用的，你可以改成Debug.Print，就可以了！

追问

按照你的方法改后，程序运行没有问题，在立即窗口中显示了"a=" ,但是窗体中不显示，是不是就是说用标准模块定义一个过程，不能用print。只有窗体才有这个功能

追答

是的

追问

不好意思，貌似只能选一个正确答案！

Answer 3

只有用PUBLIC声明才可以在其它地方使用，窗体也可以看成一个模块
Public Sub acc()
Debug.Print "a="
End Sub

Answer 4

在同一目录下，放有数字（HScroll1取值范围）.jpg图片文件
Private Sub HScroll1_Change()
image1.picture=loadpicture（HScroll1.Value & ".jpg"）
End Sub