求助：修改变量

access新新新手

请问如何用代码改变变量的值

如：Public Const str As String = "提示"

用代码改变为：Public Const str As String = "系统提示"
或者
Dim str As String
str = "提示"
改为：str = "系统提示"

tmtony

Const的话就是常量，不能修改
没有Const的话，就是变量，在后面 可以修改它的值
str = "你想要的内容"

todaynew

看不出这是问题。

access新新新手

tmtony 发表于 2016-10-17 09:53
Const的话就是常量，不能修改
没有Const的话，就是变量，在后面 可以修改它的值
str = "你想要的内容"

老师我是说可不可以用代码去改

不是手工改

access新新新手

todaynew 发表于 2016-10-17 09:54
看不出这是问题。

老师您好！
Sub ces()
Dim str As String
str = "提示"

End Sub

可不可以用代码改为：
Sub ces()
Dim str As String
str = "系统提示"

End Sub

todaynew

access新新新手 发表于 2016-10-17 10:12
老师您好！
Sub ces()
Dim str As String

你的问题应该是这样吧：存在一个类级别的变量或者一个公共变量，是否可以在子程序中修改它的值？或者是参数带入的值是否在子程序中可以修改？

access新新新手

todaynew 发表于 2016-10-17 10:21
你的问题应该是这样吧：存在一个类级别的变量或者一个公共变量，是否可以在子程序中修改它的值？或者是参 ...

老师就是这个意思，不知道可不可以修改，修改后下次运行就是现在修改的参数了。

todaynew

access新新新手 发表于 2016-10-17 10:40
老师就是这个意思，不知道可不可以修改，修改后下次运行就是现在修改的参数了。

只要你定义的不是常量，就可以修改。比如：
dim str as string

sub p1()
    str="1"
    msgbox str
end sub

sub p2()
    str="2"
    msgbox str
end sub

access新新新手

todaynew 发表于 2016-10-17 10:44
只要你定义的不是常量，就可以修改。比如：
dim str as string

老师我的意思是可不可以直接把sub p1()过程里面的 str="1"用代码改为 str="2"这样
sub p1()
    str="2"
    msgbox str
end sub
不知道行不行

todaynew

access新新新手 发表于 2016-10-17 11:16
老师我的意思是可不可以直接把sub p1()过程里面的 str="1"用代码改为 str="2"这样
sub p1()
    str="2 ...

改成什么都可以嘛。
改的结果能改变变量的值是重点，改成什么不是重点。你可动态的改变一个变量的值。比如

dim str as string

sub p1(s as string)
    str=s
end sub

也就是实际调用时，通过给形参s一个值，来间接改变str的值。