标题:急呀,关于外部引用问题 兄弟请进看看谢谢
只看楼主
yts111
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-5-17
 问题点数:0 回复次数:5 
急呀,关于外部引用问题 兄弟请进看看谢谢

Private Declare Function getdata Lib "sgid.dll" Alias "_GetData@4" (ByVal s As String) As Boolean//这是VB的对sgid.dll的外部引用方法;
Dim n As Long
Dim fp As Long
Dim file1 As String
Dim b As Boolean
Dim s As String * 40
List1.Clear
n = getdatanum(mm, nn)
If n > 0 Then
fp = FreeFile
file1 = Year(Date) & Format(Month(Date), "00") & Format(Day(Date), "00") + ".txt"
Open App.Path & "\" & file1 For Append As fp

aaa: b = getdata(s)
If b = False Then
GoTo endd
End If
Print #fp, s
List1.AddItem (s)
GoTo aaa
Else
If n = 0 Then
List1.AddItem ("无数据")
Else
List1.AddItem ("错误")
End If
Exit Sub
endd:
Close fp

End If//这是对VB通过调用那个动态库的函数。。。。。。。
现在问题是,我C#写该怎么写,各位,指点指点呀。谢谢,,给个大概或者代码,可以吗,谢谢了

搜索更多相关主题的帖子: Dim 兄弟 String Date 
2006-11-30 09:11
yts111
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-5-17
得分:0 
主要是这个getdata这个函数的调用操作。。

希望能和大家交流一起进步我的QQ:274405946 欢迎加我
2006-11-30 09:12
jacklee
Rank: 7Rank: 7Rank: 7
来 自:XAplus
等 级:贵宾
威 望:32
帖 子:1769
专家分:104
注 册:2006-11-3
得分:0 
CS API申明和VB不同。

XAplus!
讨论群:51090447
删吧删吧,把我的号给删了!
2006-11-30 09:17
yts111
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-5-17
得分:0 
那该怎么办?

希望能和大家交流一起进步我的QQ:274405946 欢迎加我
2006-11-30 09:25
jacklee
Rank: 7Rank: 7Rank: 7
来 自:XAplus
等 级:贵宾
威 望:32
帖 子:1769
专家分:104
注 册:2006-11-3
得分:0 
using System.Runtime.InteropServices;
[DllImport("User32.dll")]
public static extern int MessageBox(int h, string m, string c, int type);


XAplus!
讨论群:51090447
删吧删吧,把我的号给删了!
2006-11-30 09:30
jacklee
Rank: 7Rank: 7Rank: 7
来 自:XAplus
等 级:贵宾
威 望:32
帖 子:1769
专家分:104
注 册:2006-11-3
得分:0 
这是CS API申明的样子

XAplus!
讨论群:51090447
删吧删吧,把我的号给删了!
2006-11-30 09:30



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-106261-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.971059 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved