石陆软件屋百度VB吧枫叶在线枕善居博客园紫水晶工作室
|
该过程由作者原创,就是速率可能不是很高 我考虑用个辅助过程,加快其速度
Function RandABC(N As Long, Optional Model As Long = 1) As String ''N是你想要得到字符串的长度 相关链接:vb | 随机字母 | 函数 | 过程 ![]() 任务拦高度 'Screen.Height - Me.Height - TaskbarHeight Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long Private Const SPI_GETWORKAREA = 48 相关链接:任务拦 | 高度 ![]() |