关于变量的一个小问题

Private Sub Command2_Click()
If TreeView1.SelectedItem Is Nothing Then
MsgBox ("请选择节点")
Else
Call 存列表
Call 存数据库
Call 存节点
End If
End Sub

我在“存数据库”函数里面，定义并赋值了一个变量ｄｙｉｄ
现在在“存节点”中想继续使用，我不想重新在定义和赋值一遍，想问：像这种时候，这个变量应该怎么设置？

我的研究：
如果把变量定义赋值在这个Command2_Click下，又让代码显得很乱。
由于我只研究过窗体，所以我自己去看了下类模块，好像可以定义这种变量，没怎么看懂，如果这种方法可以定义，请懂的同志给我一个通俗易懂的解释文本，或者给我一个最最简单的例子，我好以此类推，网上找到的例子内容太大，解释太少。