摘要:
Dim x1Dim x2Dim x3Dim x4x1 = "1"x2 = "0"x3 = "0"x4 = "0"Dim aDim a1Dim a2Dim a3Dim a4a1 = 0a2 = 0a3 = 0a4 = 0a = 2015For 10a=a+1a1 = a \ 1000a2 = (a mod 1000) \ 100a3 = (a mod 100) \ 10a4 = a mod 10x1 = CStr(a1)x2 = CStr(a2)x3 = CStr(a3)x4 = CStr(a4)'===== 阅读全文
摘要:
ShowWindow(SW_MINIMIZE);////由于没有头文件,需要自己声明函数typedef void (WINAPI *PSWITCHTOTHISWINDOW) (HWND,BOOL);PSWITCHTOTHISWINDOW SwitchToThisWindow;HMODULE hUser32=GetModuleHandle(_T("user32"));SwitchToThisWindow=(PSWITCHTOTHISWINDOW)GetProcAddress(hUser32,"SwitchToThisWindow");//现在就可以使用此函 阅读全文