是一个称重管理软件，没法通过编译，提示　　未找到方法或数据成员

Private Sub Command10_Click()
Dim pkey As String
pkey = Grid.TextMatrix(Grid.Row, 0)
If pkey = "" Then
MsgBox "不可对空数据进行操作！", vbOKOnly, "警告："
Exit Sub
End If

.Row 处提示　未找到方法或数据成员

我这里编译运行一切正常。不知道你那里加载时有什么错误提示，或者安装的VB6不完整？我的是vb6 +sp6简体中文企业版。