思路是这样的,比如我向某一存储设备的8个字节存储单元中用VC写入日期数据,从b(0)这一单元开始, 我不知道用VC应该如何写(我知道一定可以实现的),假设是通过以下代码实现的: Dim dat As Date Dim b(8) As Byte '定义8个字节数组来存放日期 dat = DTPicker1 'DTPicker1为日期控件 '给b(0)赋值,让其成为确定的单元 CopyMemory b(0), dat, Len(dat)然后在VB中用如下代码从该存储单元中读取数据: CopyMemory dat, b(0), Len(dat) DTPicker2 = dat如果不作处理,定入的值和读出的值是不相同的,而且没有固定的规律! 请问如何可以实现,让DTPicker1和DTPicker2的值相同,
VB:
DateTime as Date <与 Double等价>
VC:
COleDateTime DateTime;半天(12Hours):0.5
1天又5Hour又7Minutes又10Seconds:1+5/24+7/1440+10/86400
例:
dim myear as string
dim mmonth as string
dim mday as string dim date1 as string myear=DTPicker.year
mmonth=..
mday=..
date1=myear+"-"+mmonth+"-"+mday
则所有的日期都会是: xxxx-xx-xx的形式了。就可以通存通取了。
个人见解,不知那位大大有更好的方法。
我不知道用VC应该如何写(我知道一定可以实现的),假设是通过以下代码实现的:
Dim dat As Date
Dim b(8) As Byte '定义8个字节数组来存放日期
dat = DTPicker1 'DTPicker1为日期控件
'给b(0)赋值,让其成为确定的单元
CopyMemory b(0), dat, Len(dat)然后在VB中用如下代码从该存储单元中读取数据:
CopyMemory dat, b(0), Len(dat)
DTPicker2 = dat如果不作处理,定入的值和读出的值是不相同的,而且没有固定的规律!
请问如何可以实现,让DTPicker1和DTPicker2的值相同,
参考:
http://community.csdn.net/Expert/topic/3242/3242831.xml?temp=.6571924
用VC写入,然后用VB读出来!让写入的内容和读出的内容一致!