开发者社区

文档建议反馈控制台

最新优惠活动

文章/答案/技术大牛

发布

在VB6中将Double拆分为Long loword和Long hiword

在VB6中，可以使用以下方法将Double类型拆分为Long类型的loword和hiword：

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

Public Sub SplitDouble(ByVal value As Double, ByRef loword As Long, ByRef hiword As Long)
    CopyMemory loword, value, 4
    CopyMemory hiword, value + 4, 4
End Sub

上述代码中，我们使用了API函数CopyMemory来实现内存拷贝操作。首先，我们声明了CopyMemory函数，然后定义了SplitDouble子过程。SplitDouble接受一个Double类型的值作为输入，并通过引用参数loword和hiword返回拆分后的结果。

在SplitDouble中，我们首先使用CopyMemory将前4个字节（32位）的数据从Double类型的值中拷贝到loword变量中，然后将后4个字节（32位）的数据拷贝到hiword变量中。这样就完成了将Double类型拆分为两个Long类型的操作。

使用示例：

Dim value As Double
Dim loword As Long
Dim hiword As Long

value = 1234.5678
SplitDouble value, loword, hiword

Debug.Print "loword: " & loword
Debug.Print "hiword: " & hiword

输出结果：

loword: 10794
hiword: 48059

这样，我们就成功将Double类型的值拆分为了两个Long类型的loword和hiword。

请注意，以上代码仅适用于VB6环境，不适用于其他编程语言或版本。

页面内容是否对你有帮助？

有帮助

没帮助

相关·内容

VB6对滚轮的支持

，找了一个可以使用的代码，来自 http://blog.csdn.net/areful/archive/2007/10/19/1832010.aspx 需要注意的是，在FormLoad...中增加Hook Map1.hWnd，在Form_Unload中增加UnHook Map1.hWnd 另外，在鼠标移动经过Map时，可以激发Map的mousemove事件，但滚轮无效，因为焦点不在...************************************************************ Public Function HIWORD(LongIn As Long) ...****************************************** Public Function LOWORD(LongIn As Long) As Integer ' 取出...32位值的低16位 LOWORD = LongIn And &HFFFF& End Function

99810 0

问题探讨01：如何使用鼠标滚轮使单元格中的数值增减？

可是很不幸，虽然VB解释所有的消息，却只让用户程序在事件中处理部分消息，VB自己处理其他的消息，或者忽略这些消息。...WM_MOUSEWHEEL fwKeys = LOWORD(wParam); /* key flags */ zDelta = (short) HIWORD(wParam); /...* wheel rotation */ xPos = (short) LOWORD(lParam); /* horizontal position of pointer */ yPos...= (short) HIWORD(lParam); /* vertical position of pointer */ 其中：fwKeys指出是否有CTRL、SHIFT、鼠标键(左、中、右、...但是，当我使用HIWORD(wParam)时，程序却崩溃了！有没有哪位朋友在这方面有研究的，可否指教一下：如何捕捉鼠标滚轮的向前或向后滚动？

1.8K1 0

【读书笔记】Windows程序设计5

这两个值分别是字符在基线智商和之下的最大高度。...); 其中，设备环境句柄指的是窗口句柄为hwnd的窗口客户区，从GetDC函数返回的句柄可以在整个客户区绘制，并且GetDC和ReleaseDC函数并不使任何客户区的无效区域变为有效。...如果DefWindowProc在处理WM_NCHITTEST消息之后返回HTNOWHERE，那么程序就能有效地阻止系统向窗口发送所有客户区和非客户区鼠标消息。...当用户在菜单项之间移动光标或鼠标时，程序可以收到许多WM_MENUSELECT消息，WM_MENUSELECT的参数如下 LOWORD(wParam)：所选的菜单项：菜单ID或弹出菜单的索引 HIWORD...(lParam), HIWORD(lParam), TRUE); return 0; case WM_INITMENUPOPUP: //Edit在菜单中位置索引为

2.4K1 0

CListCtrl控件使用方法总结

设置listctrl 风格及扩展风格 LONG lStyle; lStyle = GetWindowLong(m_list.m_hWnd, GWL_STYLE);//获取当前窗口...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo...判断是否点击在listctrl的checkbox上添加listctrl控件的NM_CLICK消息相应函数 void CTest6Dlg::OnClickList1(NMHDR...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo...TPM_RIGHTBUTTON, point.x, point.y, this ); } *pResult = 0; } ---- 16. item切换焦点时(包括用键盘和鼠标切换

1.9K13 0

opengl NENE 教程第一课代码

WindowRect.left=(long)0; // 将Left 设为 0 WindowRect.right=(long)width; // 将Right 设为要求的宽度...WindowRect.top=(long)0; // 将Top 设为 0 WindowRect.bottom=(long)height; // 将Bottom 设为要求的高度...(lParam),HIWORD(lParam)); // LoWord=Width,HiWord=Height return 0; // 返回 } } // 向 DefWindowProc...done) // 保持循环直到 done=TRUE { if (PeekMessage(&msg,NULL,0,0,PM_REMOVE)) // 有消息在等待吗?...监视ESC键和来自DrawGLScene()的退出消息 if (active) // 程序激活的么?

1.8K1 0

什么是WPF_windows程序设计教程

一、wParam和lParam消息：部分说明需要查看MSDN 例如： 1 WM_PAINT消息，LOWORD(lParam)是客户区的宽，HIWORD(lParam)是客户区的高。...lParam消息参数分为6个域，有重复计数、环境代码、键的先前状态等。...在Win32中,wParam lParam是用来传递消息数据的最常用的手段....在Win32 SDK中消息本身是作为一个结构体记录传递给应用程序的，这个记录中包含了消息的类型以及其他信息。...(GetCurrentMessage()->wParam) ===>获得发消息的控件ID值 WORD HIWORD( DWORD dwValue ); WORD LOWORD( DWORD

6302 0

【JavaSE专栏5】Java 基本数据类型和取值范围

在计算机中，每一块内存都被划分为一个个最小存储单元。比特（位）是计算机中最基本的单位，位是最基本的概念，在计算机中，由于只有逻辑0和逻辑1的存在，即每一个逻辑0或者1便是一个位....在微型计算机中，用字节来表示存储器的存储容量。 ---- 1.2 Java 基本数据类型 Java 中有着 3 大类基本数据类型，分别是数值型、字符型和布尔型。...其中数值型分为整数的 byte、short、int、long，和浮点数 float、double，共计 8 种，如下图所示。...包装类有着不同的存储位置、初始值和使用方式。包装类的概念、使用方法和自动装箱拆箱在后续课时中会讲到。 ---- 2.2 取值范围验证在验证之前首先展示结果，如下图所示。...在下节课时中将讲解 Java 的基本类型转换，和自动拆箱的知识。

2082 0

【网络编程】异步选择模型

校验版本创建SOCKET 绑定地址与端口开始监听异步选择异步选择 int WSAAsyncSelect( SOCKET s, HWND hWnd, u_int wMsg, long...g_count - 1]; g_count--; break; } } } break; } //具体消息 switch (LOWORD...(lParam) 具体的消息种类 LOWORD(lParam) 窗口上打印数据 textout 优化每个窗口维护一定的消息，然后创建多线程，每个线程一个窗口，每个窗口投递一定数量的客户端...问题在一次处理过程中，客户端产生多次send，服务器会产生多次接收消息，第一次接收消息会收完所有信息。总结事件选择模型和异步选择模型是解决select模型中select()同步阻塞的问题的。...重叠I/O模型和完成端口模型将recv(send)操作变成异步的，从而这个网络模型没有阻塞。全都顺利执行下来，且执行效率非常高。

3531 0

使用鼠标

一、鼠标的介绍鼠标是计算机的输入设备之一, 在图形化的操作系统上, 鼠标的使用使一些复杂的操作变得简单, 随着科技的进步, 鼠标的种类也越来越多, 按接口类型可分为串行鼠标、PS/2鼠标、...按其工作原理及其内部结构的不同可以分为机械式，光机式和光电式。这里我们不讨论鼠标的硬件构造, 更多关于鼠标的硬件知识请自行查阅相关资料。 1>....其中低位字节表示x坐标, 高位字节表示y坐标, 利用LOWORD和HIWORD宏可以取得这些坐标值, 这里获取的坐标指的是相对于窗口客户区的坐标。...wParam 判断鼠标在窗口的位置, 这里获取鼠标位置是通过 LOWORD 和 HIWORD 宏完成的, 还有两个功能相同的宏也可以用来获取lParam中的鼠标信息, 他们是 GET_X_LPARAM...宏和 GET_Y_LPARAM, 不过这两个宏是定义在 WINDOWSX.H 头文件中的, 如果要使用这两个宏需要将 WINDOWSX.H 包含进来。

2.7K10 0

包装类装箱和拆箱

在Java的设计之中，一直提倡一个原则：一切皆对象，这个原则本身有一个漏洞 —— 基本数据类型不是对象，所以这个原则就出现了问题。那么如果说现在这个问题由我们来解决，该如何做呢？...（Long）、float（Float）、double（Double）、boolean（Boolean）、char（Character），而这八种包装类又分为两大阵营： · 数值型（Number子类）：Byte...、Short、Integer、Float、Double、Long； · 对象型（Object子类）：Boolean、Character。...var = new Double(15.5) ; // 装箱 double result = var.doubleValue() ; // 拆箱 System.out.println(result...* result) ; } } 到了JDK 1.5之后，Java提供了自动的装箱和拆箱机制，并且包装类的对象可以自动的进行数学计算了。

4390 0

【JavaSE专栏6】Java 基本类型转换、包装类、自动装箱、自动拆箱

简单来说 long + int 会自动转换为 long + long 再进行计算。同理 int + double 也会自动转换为 double + double 再进行计算，如下代码所示。...同理，在 double 类型强制转换为 int 时，也会出现数据精度丢失（数据丢失），如下代码所示。...---- 二、自动装箱和自动拆箱在学习自动装箱和自动拆箱之前，首先了解什么是包装类。 2.1 包装类是什么？在 jdk1.4 中，新增了 8 个基本数据类型的对应包装类，如下表所示。...基本类型包装类 byte Byte short Short int Integer long Long float Float double Double char Character boolean...如果不进行自动拆箱，两个不同类型的变量无法进行比较。就好比拿苹果和电视比较性能，这是不可行的。 Java 只能将包装类 Integer 拆箱为 int 才能和 int 值进行比较。

1772 0

CListCtrl详细使用方法

显示一列带有小图标的item LVS_REPORT: 显示item详细资料直观的理解：windows资源管理器，“查看”标签下的“大图标，小图标，列表，详细资料” 设置listctrl 风格及扩展风格 LONG...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo; lvinfo.pt =...= -1) { DWORD dwPos = GetMessagePos(); CPoint point( LOWORD(dwPos), HIWORD(dwPos)...TPM_LEFTALIGN | TPM_RIGHTBUTTON, point.x, point.y, this ); } *pResult = 0; } item切换焦点时(包括用键盘和鼠标切换.../napster.asp http://www.codeguru.com/Cpp/controls/listview/article.php/c4187/ (6) 动态改变subitem的颜色和背景色

1.1K2 0

深入理解 Java 基本数据类型

本文已归档到：「blog」数据类型分类值类型值类型和引用类型的区别数据转换自动转换强制转换装箱和拆箱包装类、装箱、拆箱自动装箱、自动拆箱装箱、拆箱的应用和注意点小结参考资料...从内存方面来说基本类型：变量在声明之后，Java 就会立刻分配给他内存空间。...这些类型由“小”到“大”分别为：(byte，short，char) < int < long < float < double。...，如下： Byte byte Short short Integer int Long long Float float Double double Character... short Integer int Long long Float float Double double Character char Boolean

1.1K2 0

Java——扩展概念（匿名内部类、包装类、装箱与拆箱、数据类型的转换）

8中基本数据类型包装类： byte(Byte)、short(Short)、int(Integer)、long(Long)、float(Float)、double(Double)、char(Character...这8种包装类也分为两种类型：对象型（java.long.Object直接子类）：Character、Boolean；数值型(java.lang.Number直接子类)：Byte、Short、Integer...y.doubleValue(); 所有的装箱与拆箱操作基本都是一个路子，以上方法都是在JDK1.5之前使用的，JDK1.5后提供了自动装箱与拆箱的支持： Integer x = 100...在包装类中提供转换方法，以常用的几个类型为主： Integer类方法：public static int parseInt(String s); Double类的方法：public static double...==比较时，要使用eauals()方法最为保险，和String的情况类似。

5843 0

春眠不觉晓，Java数据类型知多少？基础牢不牢看完本文就有数了

在下图中我们将Java中的数据类型分为三个部分：基本数据类型，包装类型，引用数据类型基本数据类型在Java中“boolean、char、byte、short、int、long、float 和 double...等级由低到高 byte -> short -> int -> long -> float -> double char -> int -> long -> float -> double int a =...自动装箱与拆箱在Java中不仅仅基本类型之间存在着转换，基本数据类型与包装类型之间同样存在着转换，在JDK1.5之前是不支持自动装箱与拆箱的，所以那时候需要通过显示的方法调用来实现转换，而JDK1.5...//JDK1.5之前是不支持自动装箱和自动拆箱的，定义Integer对象，必须 Integer i = new Integer(8); //JDK1.5开始，提供了自动装箱的功能，定义Integer...引用数据类型 Java的数据类型除了8种基本数据类型和对应的包装类型外，还有一个分类为引用数据类型，在文章开头的树形图中已经分好，引用类型分为：数组，类和接口。那为什么叫他引用数据类型呢？

1030 0

Java——扩展概念（匿名内部类、包装类、装箱与拆箱、数据类型的转换）

参考链接： Java中自动装箱和扩展的方法重载目录 1、匿名内部类 2、包装类实现原理分析 3、装箱与拆箱 4、数据类型转换 5、总结本文讲解的扩展内容，包括：匿名内部类、包装类实现原理分析...8中基本数据类型包装类： byte(Byte)、short(Short)、int(Integer)、long(Long)、float(Float)、double(Double)、char(Character...这8种包装类也分为两种类型：对象型（java.long.Object直接子类）：Character、Boolean；数值型(java.lang.Number直接子类)：Byte、Short、Integer...(); 所有的装箱与拆箱操作基本都是一个路子，以上方法都是在JDK1.5之前使用的，JDK1.5后提供了自动装箱与拆箱的支持： Integer x = 100; //自动装箱为类 ...在包装类中提供转换方法，以常用的几个类型为主： Integer类方法：public static int parseInt(String s);Double类的方法：public static double

5251 0

CListCtrl使用「建议收藏」

对于列表控件可能取值和对应的数据结构为： •LVN_BEGINLABELEDIT 在开始某项编辑字符时发送，所用结构：NMLVDISPINFO •LVN_ENDLABELEDIT...LVS_REPORT: 显示item详细资料直观的理解：windows资源管理器，“查看”标签下的“大图标，小图标，列表，详细资料” ---- 设置listctrl 风格及扩展风格 LONG...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo; lvinfo.pt = point...= -1) { DWORD dwPos = GetMessagePos(); CPoint point( LOWORD(dwPos), HIWORD(dwPos) ); CMenu.../排序 *pResult = 0; } 23.CListCtrl显示样式的改变 m_pCtrl = &this->GetListCtrl(); //获得指针 //CListCtrl样式改变 LONG

1.1K2 0

Java 性能笔记：自动装箱拆箱

先不管造成差异的原因，让我们来仔细琢磨下Java中“自动装箱”和“自动拆箱”的概念。 Java中变量被分为两类：基础数据类型和引用数据类型。...byte Byte char Character float Float int Integer long Long short Short double Double 如下代码片段列举了“自动装箱...”和“自动拆箱”的例子。...代码片段中，一个“long”类型的值被添加到“Long”类型值的列表中。在JDK1.4中，要想执行以上操作，我们必须将基础数据类型放到与之对应的引用数据类型中（装箱）。...所以我们可以利用转化后的代码（创建不必要的“Long”实例）来解释处理速度缘何变慢。 ? 结论，如果我们想要写出处理速度更快的代码，我们需要仔细琢磨“自动装箱”和“自动拆箱”的概念。

4391 0

CListCtrl

设置listctrl 风格及扩展风格 LONG lStyle; lStyle = GetWindowLong(m_list.m_hWnd, GWL_STYLE);//获取当前窗口...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo..., LRESULT* pResult) { DWORD dwPos = GetMessagePos(); CPoint point( LOWORD...(dwPos), HIWORD(dwPos) ); m_list.ScreenToClient(&point); LVHITTESTINFO lvinfo...-1) { DWORD dwPos = GetMessagePos(); CPoint point( LOWORD

6031 0

opengl_NeNe 第九课,移动图像代码.vs 2010_express OPENGL 2.0

WindowRect.left=(long)0; // 将Left 设为 0 WindowRect.right=(long)width; // 将Right 设为要求的宽度...WindowRect.top=(long)0; // 将Top 设为 0 WindowRect.bottom=(long)height; // 将Bottom 设为要求的高度...(lParam),HIWORD(lParam)); // LoWord=Width,HiWord=Height return 0; // 返回 } } // 向 DefWindowProc...done) // 保持循环直到 done=TRUE { if (PeekMessage(&msg,NULL,0,0,PM_REMOVE)) // 有消息在等待吗?...监视ESC键和来自DrawGLScene()的退出消息 if (active) // 程序激活的么?

1.4K3 0

点击加载更多

扫码

添加站长进交流群

领取专属 10元无门槛券

手把手带您无忧上云

扫码加入开发者社群

相关资讯

热门标签

活动推荐

运营活动

活动名称

广告关闭