Question

VB把选中的控件赋值给一变量,后面可以根据变量判断是否已经选中相对应的控件，如何实现，谢谢！

VB把选中的控件赋值给一变量,后面可以根据变量判断是否已经选中相对应的控件，如何实现，谢谢！
如：在窗体中有多个命令按钮，我选中其中一个，把这个命令按钮的Caption值赋给变量，其它的窗体根据这个变量的值判断是那个命令按钮被选中，然后实现所需操作。
Private Sub Command1_Click()
'dddd 这里做个WITH可以吗？ 不过也不知如何实现，初学者谢谢，等毕业。
form2.Show "选中1", 1
atemp = "选中1", '这样实现不了。谢谢指教。这样每次都是从0开始什么也没有，选
Exit Sub ‘中第二次就有，但选第二个时，还显示是第一个，选第二次又正常
End Sub
Private Sub Command2_Click()
form2.Show "选中2", 1
atemp = "选中2",
Exit Sub
End Sub
Private Sub Form2_Load()
If (atemp= "选中1") Then
Me.Label1.Caption = "选中1"
form2.Caption = "选中1"
Else

Answer 1

你应该学习并掌握”变量的作用域“相关知识。

Answer 2

添加标准模块 定义全局变量

追问

If (atemp= "选中2") Then
Me.Label1.Caption = "选中2“
form2.Caption = "选中2"
Else
end if
end if
End Sub
我想这样，选中第1个，实现第一个的命令行，选中第二个就实现第2个命令行，谢谢

追答

form2代码修改

Private Sub Command1_Click()
    'Label1.Caption = "Form1中选中的按钮是：" & vbCrLf & s
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    If s = Form1.Command1.Caption Then
        Label1.Caption = "选中1"
    ElseIf s = Form1.Command2.Caption Then
        Label1.Caption = "选中2"
    ElseIf s = Form1.Command3.Caption Then
        Label1.Caption = "选中3"
    End If
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Sub

追问

谢谢，我不可以上传我的代码，我想在FORM2的LOAD事件那里做。   '这样实现不了。谢谢指教。这样每次都是从0开始什么也没有，选 中第二次就有，但选第二个时，还显示是第一个，选第二次又正常