易截截图软件、单文件、免安装、纯绿色、仅160KB

VC++与VB数据类型对应关系


 VC++
与VB
数据类型对应关系
  在做VC与vb程序间互相调用,需要注意两种语言不同编译器对数据类型的定义区别,此时两者数据类型的对应关系就显得十分的重要,对应关系以及声明方式如下所示。
VC++

VB

short
Integer
int
Long
long
Long
UNIT
Long
ULONG
Long
WORD
DWORDLong
WPARAM
LPARAMLong
WMSG
UMSGLong
HRESULT
Long
BOOL
Boolean
COLORREF
Long
HWND,HDC,HBRUSH,HKEY,
等 等
Long
LPSTR
LPCSTRString
LPWSTR,OLECHARBSTR
String
LPTSTR
String
VARIANT_BOOL
Boolean
unsignedchar
Byte
BYTE
Byte
VARIANTVariant
(
任何 以*
或**
结尾的数据类型)
Long
 
 
 
 
 
c
中的数据类型
VB
中的声明
结果
 
 
 
 
 
ATOM
ByVal variable As Integer
结果为Integer
类型的表达式 
 
BOOL
ByVal variable As Boolean
结果为 Long
类型的表达式 
 
BYTE
ByVal variable As Byte
结果为 Byte
类型的表达式 
 
CHAR
ByVal variable As Byte
结果为 Byte
类型的表达式 
 
COLORREF
ByVal variable As Long
结果为 Long
类型的表达式 
 
DWORD
ByVal variable As Long
结果为 Long
类型的表达式 
 
HWND, HDC, HMENU
ByVal variable As Long
结果为 Long
类型的表达式等Windows
句柄 
 
INT, UINT
ByVal variable As Long
结果为 Long
类型的表达式 
 
LONG
ByVal variable As Long
结果为 Long
类型的表达式 
 
LPARAM
ByVal variable As Long
结果为 Long
类型的表达式 
 
LPDWORD
variable As Long
结果为 Long
类型的表达式 
 
LPINT, LPUINT
variable As Long
结果为 Long
类型的表达式 
 
LPRECT
variable As type
自定义类型的
任意变量 
 
LPSTR, LPCSTR
ByVal variable As String
结果为 String
类型的表达式 
 
LPVOID
variable As Any
任何变量(在传递字符串的时候使用ByVal
) 
 
 
LPWORD
variable As Integer
结果为Integer
类型的表达式 
 
LRESULT
ByVal variable As Long


相关文档:

C/C++数组名与指针区别深层探索

作者:宋宝华 e-mail:21cnbao@21cn.com
1.    引言
指针是C/C++语言的特色,而数组名与指针有太多的相似,甚至很多时候,数组名可以作为指针使用。于是乎,很多程序设计者就被搞糊涂了。而许多的大学老师,他们在C语言的教学过程中也错误得给学生讲解:“数组名就是指针”。很幸运,我的大学老 ......

C/C++文件操作[转载]

掌握文本文件读写的方法
了解二进制文件的读写方法
C++文件流:
fstream  // 文件流
ifstream  // 输入文件流
ofstream  // 输出文件流
//创建一个文本文件并写入信息
//同向屏幕上输出信息一样将信息输出至文件
#include<iomanip.h>
#include<fstream.h>
void main()
{
  ofstream f1("d:\\ ......

VB —万年历实例 (2)

上集中只是显示星期几,不够全面,完善后如下:
1、创建lbl1、lbl2、lbl3、txt1、cmd1、Timer1
2、lbl:“输入年月日(如2000-8-16):”,设置lbl、txt1、cmd1的字体大小和颜色。Timer1的Enable属性设为False,Interval属性设为:1000。
3、双击cmd1,进入代码编辑窗口,敲入:
Private Sub Timer1_Timer() ......

VB实例 —万年历 (3)

原来的错误是:Timer1的Enabled属性设为True。
代码错误是:
Private Sub Timer1_Timer()
Dim c As Date
    c = Time
    lbl3.Caption = CStr(c)
End Sub
————————————————&mdas ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号