¿Cómo utilizar API en vb (cómo escribir código)? ¿Cómo funcionan las distintas funciones API? ¿Existe algún manual relevante?
lf.lfEscapement = 600 'Dividir una semana en 3600 puntos
hnFont = CreateFontIndirect(lf)
hoFont = SelectObject(hdc, hnFont )
ramp; = TextOut(Me.hdc, 280, 180, "Microsoft", 9)
Fin Sub
Escritura del archivo del módulo Enter :
Opción explícita
Const pública LF_FACESIZE = 32
Const pública LF_FULLFACESIZE = 64
Tipo público LOGFONT
lfAltura mientras dure
lfAncho mientras dure
lfEscape mientras dure
lfOrientación mientras dure
lfPeso mientras dure
lfCursiva como byte
lfUnderline como byte
lfStrikeOut como byte
lfCharSet como byte
lfOutPrecision como byte
lfClipPrecision como byte
lfQuality como byte
lfPitchAndFamily como byte
lfFaceName(1 a LF_FACESIZE) como byte
Tipo de fin
p>Función de declaración pública CreateFontIndirect Lib "gdi32" Alias "CreateFontIndirectA" (lpLogFont As LOGFONT) siempre
Función de declaración pública SelectObject Lib "gdi32" (ByVal hdc Mientras, ByVal hObject Como Long ) As Long
Función de declaración pública TextOut Lib "gdi32" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long ) Siempre que
Hay un manual, busque en Baidu: vb api; o consulte /detail/math2357/245158
Hay un manual, busque en Baidu: vb api.