Option Explicit
Dim JScript, CString, File, Control, System, NetWork '定义线程级变量 '每个线程不同
Dim Window, VBSlibrary
Dim HttpProgress
Const IsDebug = 0
Const Version = "0.0.0.7"
Sub Main()
If Globals("App").PrevInstance Then
Dim ws, WMI, Process
Set ws = CreateObject("wscript.shell")
ws.SendKeys "{HOME}"
Set WMI = GetObject("WinMgmts:")
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:52
hide
bbsi
Option Explicit
Const C_WorkProgress = 4
Class UI_Class
Public Form, Tip, config, AppName, Starting, Angel
Private Menu, hMenu1(1), hMenu2(0), timing
Private Tooptip
Private DisablePowerSave
Private Sub Create()
Dim i, v, s, j, arr
Set Menu = Control.Menu()
Set Form = Api.NewForm()
Set Tooptip = Control.Tooptip()
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:51
hide
bbsi
Option Explicit
Const C_GameWith = 1024
Const C_GameHeight = 768
Const C_GameSmallWith = 320
Const C_GameSmallHeight = 240
'黑带 16 20
Dim GamehWnd, dm, AppName, config, bgkms, KMData
config = ".\Angel.ini"
AppName = "Angel_BP"
Function CmpMutlColor(Args, Sleep)
Dim i
For i = 0 To UBound(Args)
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:50
hide
bbsi
/*
2022年3月29日17点24分
程序作用:输出所有的水仙数,即:一个三位数,其各位数字立方和等于该数本身。
*/
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
for(int i = 100; i <= 999; i++)
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 17:25
hide
bbsi
/*
2022年3月29日17点07分
程序作用:输出给定范围内的所有质数
*/
#include <iostream>
#include <cmath>
using namespace std;
bool IsPrime(int n)
{
bool IsPrime = false;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 17:07
hide
bbsi
/*
2022年3月29日16点34分
程序作用:输出斐波那契数列的第n项
程序特点:使用了递归算法
*/
#include <iostream>
using namespace std;
int f(int n)
{
int i;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 16:34
hide
bbsi
/*
2022年3月29日14点58分
程序作用:输出斐波那契数列的前n项
*/
#include <iostream>
using namespace std;
int main()
{
int a1 = 1, a2 = 1;
int n;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 16:03
hide
bbsi
/*
2022年3月29日14点58分
程序作用:输出九九乘法表
*/
#include <iostream>
using namespace std;
int main()
{
for (int i = 1; i <= 9; i++)
{
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 14:58
hide
bbsi
/*
2022年3月29日14点26分
程序作用:输入三个整数x,y,z,把这三个数由小到大输出。
程序特点:使用了指针
*/
#include <iostream>
using namespace std;
void exchange(int * a, int * b)
{
int t;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 14:40
hide
bbsi
/*
2022年3月29日14点26分
输入三个整数x,y,z,把这三个数由小到大输出。
*/
#include <iostream>
using namespace std;
int main()
{
int x, y, z;
cout << "请依次输入三个整数,用空格隔开" << endl;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 14:27
hide
bbsi