V菜菜

我打了以下代码：
Private Sub cmdprint_Click()
Printgrid1.Unit = Centimeter
Printgrid1.PrintObject = MSHFlexGrid1
Printgrid1.DoPreView
End Sub

但测试就弹出错误框说：

“编译错误变量未定义”

“Private Sub cmdprint_Click()
PrintGrid1.Unit = Centimeter”
有错吗？我很菜，看不出。请指正
不然没法做了。

V菜菜

要打印MSHFlexGrid1的内容，其对象不是Printgrid1吗？
Centimeter是厘米啊，我写了“2”（2应该代表Centimeter吧？）。

V菜菜

在模块中的Option Explicit：
Option Explicit
Dim rs_hetong As New ADODB.Recordset
Dim rs_yushou As New ADODB.Recordset
Dim rs_yishou As New ADODB.Recordset
Dim getrow As Integer
Dim select_row As String
Dim select_house As String

我有按钮cmdprint，MSHFlexGrid1 控件啊，grid1是不是MSHFlexGrid1的简称啊？
怎么总是“编译错误变量未定义”，指这“Printgrid1”有错。