不知为什么不能编译：
Private Sub Form_Load()
  Private　Type book
      x As Variant
      name As String
      a1 As String
      b2 As String
      c3 As String
   End Type
 Dim booktvar As book
 Dim pos As Integer  '记录号变量
 Dim number As Integer '记录总个数变量
 Dim l As Boolean
 
   
End Sub
为什么一编译就会出现＂无效内部过程＂

Type 语句只能在模块级使用，不能在过程中使用

剪切出来！

to 楼上
   此言差异

to 1楼
   type可以在form的通用区域定义 不是必须在模块级使用
但不能在过程中使用

to 楼上

模块的概念有点狭义

“form的通用区域”本身就是一个模块