从品牌网站建设到网络营销策划,从策略到执行的一站式服务
方法如下:
成都创新互联公司专注于企业网络营销推广、网站重做改版、江都网站定制设计、自适应品牌网站建设、HTML5、商城建设、集团公司官网建设、成都外贸网站建设、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为江都等各大城市提供网站开发制作服务。
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体,出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码:
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心,这样运行窗体可以发现,屏幕的大小与例1.6中通过属性设置的大小是一致的。
DLL在生成后,里内的函数会有变化,所以你要先用软件exesc查一下它变化的结果是什么
之后这样写,我是用C#写的,对你应该有帮助
[DllImport("facecom.dll", EntryPoint = "?fnfacecom@@YAHXZ")]
public extern static int fnfacecom();
?fnfacecom@@YAHXZ
这个就是那个就是在软件里查到的改变后的结果,你写在入口号处就可以了
这个我用过了没问题
你这是在declare语句里忘了写alias子句了。。。
Private Declare Function LogonUser Lib "advapi32.dll" Alias "LogonUserA" (ByVal lpszUsername As String, ByVal lpszDomain As String, ByVal lpszPassword As String, ByVal dwLogonType As Integer, ByVal dwLogonProvider As Integer, ByRef phToken As IntPtr) As Boolean
还有你在vb里最好要也像C#一样,用dllimports特性而不是declare来引用api函数。需要引入
Imports System.Runtime.InteropServices
命名空间。用尖括号开头,如下:
DllImport("advapi32.dll")
Public Shared Function LogonUser(ByVal lpszUsername As String, ByVal lpszDomain As String, ByVal lpszPassword As String, ByVal dwLogonType As Integer, ByVal dwLogonProvider As Integer, ByRef phToken As IntPtr) As Boolean
End Function
当然你这里注意下logonUser函数的返回值只有在这个函数执行失败的时候才会返回false
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图