重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
只要先把VB程序编译成EXE文件,就可以在C程序中调用:
西市网站制作公司哪家好,找创新互联!从网页设计、网站建设、微信开发、APP开发、自适应网站建设等网站项目制作,到程序开发,运营维护。创新互联于2013年成立到现在10年的时间,我们拥有了丰富的建站经验和运维经验,来保证我们的工作的顺利进行。专注于网站建设就选创新互联。
#include "stdio.h"
void main()
{
int a;
scanf ("%d",a);
if(a==5)system("d:\daojishi.exe");
}
打开VB,工程-引用-浏览-找到DLL文件并确定
dim a as new dll文件的类名
在这就可以引用dll文件中的函数了
C写代码模块(注意没有main())编译为dll,在VB中调用其函数模块,并在VB工程编译环境LINK时加入DLL。C与VB混合编程时,函数调用的变量有相关约定(VB与C不一样)可参考混合编程书籍和案例。
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""说我是猪,不说我是猪就一分钟关机,不信,试下…"" ",0 ,true
dim a
do while(a "我是猪")
a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run " cmd.exe /c shutdown -r -t 2100 –c ",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,好乖"
把代码 放到记事本里 保存 然后 改个扩展名 .vbe