利用gdi函数可以实现在屏幕上写字，结合其它的函数可以做出在电脑屏幕上倒计时的效果，代码如下：
Declare Function GetDC Lib "user32" (ByVal hWnd As Long[......]阅读全文>>>
-
如何用vba在电脑屏幕的中央倒计时？
-
如何在vba中定义常量？
在编写vba代码的过程中对于经常使用的不变的数据，我们可以通过定义常量的形式把使得该数据的含义更加清晰。
比如要在一段vba代码中要反复使用3000这个数字，它代表的是基础工资，那么可以定义如下的常量:[……]
阅读全文>>> -
在vba中用lineto函数画线时如何修改线型、大小、颜色？
在如何在vba中用GDI函数LineTo在屏幕上画线？一文中我们介绍了用gdi函数lineto在屏幕上画线。
如果对所画的线的大小、颜色等不满意，想要调整，这时候可以使用如下的步骤：
1.用Cre[……]
阅读全文>>> -
VBA代码大全028：如何用vba生成随机的不重复整数？
在如何用vba生成随机数？一文中我们介绍了用vba函数Rnd生成随机的0到1之间的不重复实数。
如果要生成区间范围更大的随机整数，比如生成4到10之间的随机整数，可以使用如下的代码：
Sub QQ17[......]
阅读全文>>> -
vba代码大全027：如何用vba生成0-1之间的随机数？
在excel中，可以用工作表函数RAND生成一个小于1，大于等于0的随机实数。
这个函数是没有参数的，用法很简单，直接=RAND()即可。
根据算法，即使整个工作表的单元格都使用这个函数，生成的[……]
阅读全文>>> -
如何用vba获取任意月份的最后一天的日期？
在excel 中有个工作表函数EOMONTH，可以返回指定日期的月所在最后一天的日期。
在vba中没有这样的函数，但是可以使用DateSerial函数变通的获取到任意月的最后一天的日期。
代码如下[……]
阅读全文>>> -
excel隐藏工作表函数DATEDIF的用法
-
如何在vba中用GDI函数LineTo在屏幕上画线？
-
如何在vba中修改TextOut函数所用的字体？
在如何在vba中用GDI在屏幕上写字？一文和如何在vba中修改TextOut函数所用字体的颜色？ 一文中我们分别介绍了如何在屏幕上用TextOut函数写字，以及如何修改用TextOut函数写字时所用的字体颜色[……]
阅读全文>>> -
如何在vba中修改TextOut函数所用字体的颜色？
在如何在vba中用GDI在屏幕上写字？ 一文中我们介绍了如何用TextOut函数在屏幕上写字，但是字体的颜色是黑色的。
如果要修改所用字体的颜色，可以使用SetTextColor直接选择要用的字体的颜色[……]
阅读全文>>>
感谢你的支持，我将持续地写出更好的文章。
微信支持
微信公众号
