1. form1.text1.text2.写义个全局变量，将form1.text的值赋给它，调用即可
在form2里输入以下代码Private Sub Combo1_Click() Shell "notepad.exe " & Form1.Text1.Text & "\1.txt", vbMaximizedFocusEnd Sub
como1.AddItem form1.text1.text
