
private sub command1_click()
text1.visible=false
end sub
private sub command2_click()
text1.visible=true
text1.text="程序设计"
end sub

private sub command1_click()
text1.visible=false
end sub
private sub command2_click()
text1.visible=true
text1.text="程序设计"
end sub