vb.net自动开机,vbs开机自启

vb.net实现开机自启

程序源代码如下:

main()

{

int i,j,k;

printf("\n");

for(i=1;i5;i++)／*以下为三重循环*/

　for(j=1;j5;j++)　

for (k=1;k5;k++)

　{

if (i!=ki!=jj!=k) 　/*确保i、j、k三位互不相同*/

printf("%d,%d,%d\n",i,j,k);

　 }

}

main()

{

long int i;

int bonus1,bonus2,bonus4,bonus6,bonus10,bonus;

scanf("%ld",i);

bonus1=100000*0.1;bonus2=bonus1+100000*0.75;

bonus4=bonus2+200000*0.5;

bonus6=bonus4+200000*0.3;

bonus10=bonus6+400000*0.15;

　if(i=100000)

bonus=i*0.1;

　else if(i=200000)

　bonus=bonus1+(i-100000)*0.075;

else if(i=400000)

bonus=bonus2+(i-200000)*0.05;

　else if(i=600000)

　bonus=bonus4+(i-400000)*0.03;

else if(i=1000000)

bonus=bonus6+(i-600000)*0.015;

　else

bonus=bonus10+(i-1000000)*0.01;

printf("bonus=%d",bonus);

}

相关问答

Q1: vb.net 开机自动启动 不需要登录桌面

vb.net是一个编程软件，启动后不需要登陆，而是让你选择是新建还是打开，新建的是winfowm、webform还是其它类型的源代码，所以你说的登录一次桌面看不太懂什么意思。

Q2: VB.NET编写软件随开机启动代码

要设置软件随开机启动，可以这样写通过写入注册表，来达到你要的效果：

在适当位置，插入如下代码：

Dim regname As RegistryKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\\microsoft\\windows\\currentversion\\run", True)

regname.SetValue("自己软件的名称", """" Application.StartupPath "\ 自己软件的名称.exe""")

你把：“自己软件的名称” 替换成自己的应用程序的名称！！

Q3: 求高手给一个VB.NET的程序开机启动和关闭开机启动的示例代码

Private Sub 开机自动启动_Click(sender As Object, e As EventArgs) Handles 开机自动启动.Click

Dim a As Microsoft.Win32.RegistryKey = My.Computer.Registry.CurrentUser.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Run")

a.SetValue("查看.exe", Application.StartupPath "\查看.exe")

End Sub

Private Sub 关闭开机自启_Click(sender As Object, e As EventArgs) Handles 关闭开机自启.Click

Dim a As Microsoft.Win32.RegistryKey = My.Computer.Registry.CurrentUser.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Run")

a.DeleteValue("查看.exe")

End Sub

Q4: vb.net如何取消软件的开机启动 我是通过修改注册表实现的开机启动，如何编写取消开机启动代码

Microsoft.Win32.Registry.LocalMachine.OpenSubKey("Software\Microsoft\Windows\Currentversion\Run", True).DeleteValue("工作提醒")

LocalMachine也可能是CurrentUser要看你的开机启动注册在哪个下面。

Q5: 怎样实现vb.net的开机自动运行

将你自己的程序添加到注册表的开机启动项中 具体路径如图所示