扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
程序源代码如下:
专注于为中小企业提供网站设计制作、做网站服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业农安免费做网站提供优质的服务。我们立足成都,凝聚了一批互联网行业人才,有力地推动了1000多家企业的稳健成长,帮助中小企业通过网站建设实现规模扩充和转变。
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);
}
vb.net是一个编程软件,启动后不需要登陆,而是让你选择是新建还是打开,新建的是winfowm、webform还是其它类型的源代码,所以你说的登录一次桌面看不太懂什么意思。
要设置软件随开机启动,可以这样写通过写入注册表,来达到你要的效果:
在适当位置,插入如下代码:
Dim regname As RegistryKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\\microsoft\\windows\\currentversion\\run", True)
regname.SetValue("自己软件的名称", """" Application.StartupPath "\ 自己软件的名称.exe""")
你把:“自己软件的名称” 替换成自己的应用程序的名称!!
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
Microsoft.Win32.Registry.LocalMachine.OpenSubKey("Software\Microsoft\Windows\Currentversion\Run", True).DeleteValue("工作提醒")
LocalMachine也可能是CurrentUser要看你的开机启动注册在哪个下面。
将你自己的程序添加到注册表的开机启动项中 具体路径如图所示
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流