UC知道提问~提问~VB问题
来源：百度知道 编辑：UC知道 时间：2024/07/04 13:29:19
嘛~光回答问题了，我也来测试以下提问看看都什么流程
问题1。如何判断复杂结构体是否相等？例
Private Type pos
x As Long
y As Long
End Type
Private Type A
a1 As Integer
a2 As Long
a3() As Single
a4 As String
a5 As Boolean
a6 As pos
End Type
Private Sub Command1_Click()
Dim b As A, c As A
ReDim b.a3(3)
b.a3(1) = 3
b.a6.x=5
c.a6.x=4
Command1.Caption = b=c'这显然是不对的，但请问除了一个一个比较有没有更简单的方法，结构体非常长的情况下
End Sub
问题2。我做了一个程序，资源都在app.path & "\Data"文件夹下，请问如何实现将此文件夹丰入一个文件"data1.dat"中，并在程序中能解包调用？
问题3。VB里如何实现指针功能？例如调用一个C++写的函数
Declare function abc lib "123.dll"(byval lpBuffer as Any) as Long
如何将一个整数值传入此函数？
dim a%,B&
B=abc(a)这会报错，只能传入指针值，但如何在VB中得到指针？除了字符串
swx1995完全没有理解我的意思貌似？
第一个，command1.caption=b=c的意思是把b=c这个布尔表达式的值赋给command1.caption，关键是b=c这个判断不能是结构体这个问题怎么解决
第二个，byref这是VB里的用法，和lp不完全一样
例，dim a%,B&
B=abc(a)会报错
但是 d
问题1。如何判断复杂结构体是否相等？例
Private Type pos
x As Long
y As Long
End Type
Private Type A
a1 As Integer
a2 As Long
a3() As Single
a4 As String
a5 As Boolean
a6 As pos
End Type
Private Sub Command1_Click()
Dim b As A, c As A
ReDim b.a3(3)
b.a3(1) = 3
b.a6.x=5
c.a6.x=4
Command1.Caption = b=c'这显然是不对的，但请问除了一个一个比较有没有更简单的方法，结构体非常长的情况下
End Sub
问题2。我做了一个程序，资源都在app.path & "\Data"文件夹下，请问如何实现将此文件夹丰入一个文件"data1.dat"中，并在程序中能解包调用？
问题3。VB里如何实现指针功能？例如调用一个C++写的函数
Declare function abc lib "123.dll"(byval lpBuffer as Any) as Long
如何将一个整数值传入此函数？
dim a%,B&
B=abc(a)这会报错，只能传入指针值，但如何在VB中得到指针？除了字符串
swx1995完全没有理解我的意思貌似？
第一个，command1.caption=b=c的意思是把b=c这个布尔表达式的值赋给command1.caption，关键是b=c这个判断不能是结构体这个问题怎么解决
第二个，byref这是VB里的用法，和lp不完全一样
例，dim a%,B&
B=abc(a)会报错
但是 d
第一个问题，VB内部没有提供更好的方法，你只能逐项比较。
如果你像玩刺激的话你可以把它们的地址求出来送一些块比较API。
第二个问题，资源看是什么资源了，如果是可以从内存流中读取的资源的话可以open这个文件，读取某区块创建内存流。如果是一些必须要文件路径的读取方式那就只能建立临时文件了。
第三个问题，VB中求地址其实很简单，使用一个隐藏的函数：VarPtr() ，已知地址求值也不难，借助CopyMemory就可以。
想要在VB中玩更刺激的指针技术就去查SafeArray结构吧，或者baidu搜“VB6指针模块”
Command1.Caption = b=c'
这个……我貌似也不知道啊
一个方法：
a=xxxx
b=xxxx
Command1.Caption=a……这样来 应该比较简单了吧。……
byval 不是传值嘛。。直接给他就行了
如果要实现指针 则要传址（传内存地址）
呵呵 楼上拿两分，我在拿被采纳率 我的采纳率35％ 哈哈 高于1/3 哈哈………………………………所以我不会的我从来不回
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
我知道 C里面的*x指针是指向一个内存地址，然后其它的东西去读这个内存地址而不是去读这个值，但是VB貌似也是这样的，传址应该就是类似与指针了吧。。。
=============================================
哦 终于知道你的意思了，第一个问题貌似没有什么解决办法 除非你里面的内容是一个数组弄起来的，这样可以用Lbound，UBound来循环一下……