Dim 语句可以放在子过程外边
但是 i = 2.5555这一句就要放在子过程里边了，或者你对模块熟悉的话，单独在模块里做一些定义也是可以的，不过我对模块的设置不熟
Option Explicit

Private Sub Form_Load()
Dim i As Integer
i = 2.5555
MsgBox i
End Sub
这样就行了，当然，如果你愿意用Command按钮执行也可以哒
Option Explicit

Private Sub Command1_Click()
Dim i As Integer
i = 2.5555
MsgBox i
End Sub
就是这样啦