vb中参数究竟有什么作用，它和Dim有什么不同吗？ 我指的参数不是ByVal或ByRef。而是普通的× as ×

Question

我指的参数不是ByVal或ByRef。而是普通的× as × 例：Button As integer

Answer 1

举个例子来看。追问

Private Sub Form_MouseUp(Button As integer,Shift As integer,X As interger, Y As integer)
if Button=2 Then
Popupmenu Form1.file
End if
End sub

追答

没有写的情况下，默认为ByRef。
ByRef Button As integer,ByRef Shift As integer,ByRef X As interger,ByRef Y As integer
实际是这样，没有区别

追问

那么参数就是传递用的喽…
您能给我解释一下参数的概念吗？我买的书没有专门写到

追答

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a = 1
b = 1
MsgBox ("初始值：a=" & Str(a) & " b=" & Str(b))
Call xxx(a, b)
MsgBox ("调用函数之后：a=" & Str(a) & " b=" & Str(b))
End Sub

Private Sub xxx(ByVal a As Integer, ByRef b As Integer)
Dim c As Integer
a = 2
b = 2
c = a + b
MsgBox ("C=" & Str(c))
End Sub这个例子演示byval byref的区别
参数其实也就是在不同的过程或者函数中间传递的变量。
比如上面的a和b

Answer 2

这是定义变量的类型。比如：Dim I As Integer是定义I为整型变量，Dim J As String定义J为字符串变量。
你在窗体上添加两个文本框text1和text2，里面分别填写上数字，在代码窗口粘贴下面代码并运行，看看结果是怎么样的。
Private Sub Command1_Click()
Dim I1 As Integer, I2 As Integer, I3 As Integer
Dim J1 As String, J2 As String, J3 As String
I1 = Text1
I2 = Text2
J1 = Text1
J2 = Text2
I3 = I1 + I2
J3 = J1 + J2
Print I3, J3
End Sub追问

可是做菜单时确实在后面的括号中可以加这种参数啊

Answer 3

这不是参数，是变量，看MSDN吧，看多了什么都知道了

Answer 4

这么说吧，VB 中的数据参数存放总要有个地方吧，这个地方也有大小吧，你的数据是否能放的进去这个地方，就是数据的参数了，比如这个仓库里只有整数那么小integer两个字节的空间，你放个浮点数会溢出，也就是流出来，就像倒水一样一桶倒到一瓶子里会溢出的，所以这个数就不是你想要的数了。
所以参数是声明变量和常量的数据类型的,比如:定义A是整数,那么: Dim A As Integer.
dim的作用是声明变量并分配存储空间，在模块级别中用 Dim 声明的变量，对该模块中的所有过程都是可用的。在过程级别中声明的变量，只在过程内是可用的。
Dim使用在Sub或Function过程中使用，在退出Sub或Function过程后变量的值保留。