代码搜索:LONG
找到约 10,000 项符合「LONG」的源代码
代码结果 10,000
www.eeworm.com/read/379682/9188516
frm frmtip.frm
VERSION 5.00
Object = "{935C9182-411B-4FFB-9512-97C8745743BC}#2.4#0"; "AResize.ocx"
Begin VB.Form frmTip
BackColor = &H00FF8080&
BorderStyle = 3 'Fixed Dialog
Caption
www.eeworm.com/read/379678/9189233
frm frmabout.frm
VERSION 5.00
Begin VB.Form frmAbout
BorderStyle = 3 'Fixed Dialog
Caption = "About FamTree"
ClientHeight = 3855
ClientLeft = 45
ClientTop = 3
www.eeworm.com/read/379678/9189259
cls clsphotoname.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
www.eeworm.com/read/379662/9190504
bas module3.bas
Attribute VB_Name = "Module3"
Private Const STATUS_INFO_LENGTH_MISMATCH = &HC0000004
Private Const STATUS_ACCESS_DENIED = &HC0000022
Private Const STATUS_INVALID_HANDLE = &HC0000008
Private Const
www.eeworm.com/read/379662/9190507
bas module1.bas
Attribute VB_Name = "Module1"
Public Const HKEY_LOCAL_MACHINE = &H80000002
Public Const REG_SZ = 1
Public Const HKEY_CLASSES_ROOT = &H80000000
Declare Function RegCreateKey Lib "advapi32.dll" Al
www.eeworm.com/read/182765/9192243
cpp 阶乘.cpp
#include
#include
#include
const int N=1000;
int compute(unsigned int *s,int n)//s用来存储一次的计算结果,n为本次计算的乘数,函数返回结果中有效数据的节数
{
unsigned long p; //暂时存放一节的结果
www.eeworm.com/read/379598/9192290
cpp crc.cpp
/* crc.cpp -- contains table based CCITT 32 bit CRC function.
This file is in the Public Domain.
*/
#define CRC_MASK 0xFFFFFFFFL
#define CRC32_POLYNOMIAL 0xEDB88320L
#include "
www.eeworm.com/read/182726/9193973
cls settintags.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
www.eeworm.com/read/182726/9193979
cls digitizetinline.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
www.eeworm.com/read/379404/9198912
frm frmabout.frm
VERSION 5.00
Begin VB.Form frmAbout
BorderStyle = 3 'Fixed Dialog
Caption = "医院医务信息管理系统V1.0"
ClientHeight = 3555
ClientLeft = 2340
ClientTop =