VB如何才能在立即窗口中显示内容

立即窗口只能在程序处于调试阶段（就是在VB开发环境中运行）时才有效的，是VB开发环境为了程序调试方便而特意设置的。编译为EXE文件后，程序就已经脱离了VB开发环境了，这时候立即窗口就不再有效了。

Debug的意思就是查错。打个比方，一件产品只有在研发阶段才能不断测试、查错、修改等等，如果批量生产到了用户手中仍然处于测试、差错的状态，谁会买你的产品？

补充一句：VB程序在VB开发环境中的运行并不是真正的“运行”，充其量只能说是“模拟运行”，在这种状态下，VB才能对你的程序进行各种断点、跟踪、调试。只有编译为EXE后才算是真正意义的运行！

VBA print 函数，如果后面不带 *** 作符表示换行，如果带了''表示连接

你的语句改成：

Public Sub 随机数()

Dim i, j As Integer

Debug.Print " "

For i = 1 To 9

Debug.Print Format(i, "0#")" "

Next

End Sub

就可以了

更新一下之前写的Excel的数据库类，将其改成函数的形式，调用更简单（省却了生成类实例的步骤）。现在这个代码在工作中用了一年多，已经比较健壮。

无需任何配置。在VBA中新建模块，并把代码复制转帖过去即可使用。

有以下函数：执行数据库语句、查询数据库、结果复制到单元格（Excel中最常用）、将Excel表格上传到数据库。基本覆盖Excel中对数据库的常用 *** 作。

会在立即窗口显示数据库错误信息，方便查错。

在数据库连接字符串字典中配好数据库连接信息后，数据库访问时可直接使用配好的链接字符串。

---