输出无边界的空心字(代码)
来源:互联网 发布:怎么删除淘宝差评 编辑:程序博客网 时间:2024/05/09 14:53
Private Declare Function BeginPath Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function EndPath Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function PathToRegion Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function 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) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Sub Form_Load()
Dim hRgn As Long
Me.WindowState = 2
Me.FontName = "Arial"
Me.FontSize = 100
Me.BackColor = vbRed
BeginPath Me.hdc
TextOut Me.hdc, 0, 0, "I love you !", 12
EndPath Me.hdc
hRgn = PathToRegion(Me.hdc)
SetWindowRgn Me.hWnd, hRgn, True
DeleteObject hRgn
End Sub
- 输出无边界的空心字(代码)
- 空心菱形的输出
- 输出空心的菱形
- Java输出空心菱形,代码超简洁
- 做一个输出任意行(奇数)的空心菱形
- hdu 空心三角形(输入、输出格式的问题)
- 输出图案(六)---输出空心矩形
- 第一次动手写java的简单代码,实现输出一个空心菱形。
- 空心三角形(图形的输出)c语言
- 运用循环输出一个空心的菱形
- 空心三角形的输出oj题目详解
- 输出星号图(空心三角)
- 托管代码和非托管代码互操作无边界
- 托管代码和非托管代码互操作无边界
- java 循环问题 大全 求2~100a之内的素数。求水仙花数:(1~1000)。有1、2、3、4四个数字,输出所有能组成的互不相同且无重复的三位数。打印空心菱形
- Android的无边界程序设计理念
- Android的无边界程序设计理念
- TCP无保护消息边界的解决
- apache2.05+mysql4.18+php5+phpmyadmin2.57安装终结版含下载
- Crypto—一个类模块(转贴)
- 新的一天
- VC++.NET第二章结束
- 在N-Gage上折腾一个Hello World程序
- 输出无边界的空心字(代码)
- 新型D.o.S(伪造TCP连接进行数据传输的D.o.S)
- VB编程的好帮手--【VB源码之友】快速进阶
- 挂钩Windows API
- 任意用户模式下执行 ring 0 代码
- 基于SPI的数据报过滤原理与实现
- 总结windows下堆溢出的三种利用方式
- 内核级HOOK的几种实现与应用
- 向ADI学习模拟电路布线