自己在公司里面维护了一个小金库的Excel,当某个人的余额小于0的时候,Outlook会自动给这个人发一封邮件,同时将这个Excel附在邮件中,具体的代码如下: Public Function sendEmail(mailTo As String) Application.ScreenUpdating = False Dim outapp As Object Dim outmail As Object Dim body As String Dim fname As String Set outa…
在for循环里创建 widget,比如test类 不能使用 test t; 而要使用 test t = new test(): for (i=0;i<=3;i++) { QPushButton* p = new QPushButton(t2); p->setGeometry(i*100,100,100,100); }…