在窗体上已经建立了一个文本框Txt和一个命令按钮Comd，运行程序后单击命令按钮，则在文本框Txt中显示的内容是DimaAsIntegerPrivateSubComd_Click()DimbAsIntegera=b=CallMySub(b)Txt.Text=a+bEndSubSubMySub(x)x=xMod+aEndSubABCD