第一问答网»论坛 › 中问网 › 问答 › 用VB编写随机12位代码，数字+大写字母

用VB编写随机12位代码，数字+大写字母

11 |

1 | 2010-8-15 19:41:09 | 显示全部楼层 |阅读模式

Private Sub Command1_Click()Randomizea = ""For i = 0 To 11n = RndIf n > 0.5 Thena = a & Int(10 * Rnd)Elsea = a & Chr(Int(26 * Rnd + 65))End IfNext iPrint aEnd Sub

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 麻烦那位pes2011大哥给发个基于V2.1补丁的最新冬季转会存档！谢谢了！！我的箱：[email protected]
2 黑莓9000 ,用联通卡3G卡,股票软件上不去,如何能解决?
3 星球大战:原力释放1的游戏怎么玩到第一关就没法玩了
4 我想要订做一个时间长的沙漏，有谁是做这一方面的吗？？？？
5 男友偷偷结婚了，新娘不是我。没有告诉我他结婚，只说我们不合适。他是不是没爱过我？
6 河南理工大学信管专业考研的都考去哪了，近几年情况怎样啊，我大三了，考985高校的得多少分啊
7 我家电脑进不去网页。
8 怎样延长二手笔记本电脑电池寿命
9 理解词性与学好英语的关系？
10 关于正方体和对角线
11 西财会计专业考研初试专业课考哪些
12 有谁知道好一点的养成游戏地址吗？
13 4399里面下了侠盗飞车4打不开为什么?
14 两个人生日不过百天怎么办啊？
15 我想办个小型的打币工作室，内行人进
16 怎么才能满嘴跑火车？
17 放射医学技术考试大纲(初级士) 题
18 我的联想手机td36t为什么不支持TXT电子书格式呢
19 成都保税区是干什么的?
20 我用的电脑是三星R429，但是，我现在电脑屏幕的亮度快捷键不能用，而且，电脑的快捷驱动器还在···求救
21 急！急！请问2011年考川大生科院研究生我学长学姐们，656普通生物学到底看的是第二版还是第三版？
22 癞蛤蟆爬到鱼头上不肯离开是什么原因
23 小说分章节下载要TXT的
24 我们要写中考百日誓词，因为我们是实验班，所以要写出特色来。不要太长
25 2011哪个医学院收文科生
26 辨别虎皮鹦鹉！
27 黑格尔的名言“熟知并非真知”是什么意思
28 滦县老兵KTV的蹦迪歌曲是什么
29 CF的体验服是哪来的？？？
30 广州富康美发学校一天上多少个小时课？
31 a,b,c为三角形的三边长，求证方程ax²+bx（x-1）＝cx²-2b是关于x的一元一次方程。急！！！！现
32 cf styer aug” a1多少GP 我想在练个号，买这把枪还有M4A1和一个手榴弹，初使gp够吗，帮我算下，我cf坏了
33 看看我的机器到底是几代？？？touch研究高手进啊版本：4.2.1 型号MB533ZP
34 我是新手，接了一个餐饮店的会计，不知道如何入手，老板交给一堆装修发票和一些费用的发票，如何记账呢？
35 谁知道三鞭振雄丸是什么药品？在那可以买的到！什么价位谢谢了！！！
36 暗夜怎样防守兽族初期骚扰强压?
37 古罗马文中锐利该怎么读
38 和空姐同居的日子冉静的手机是什么型号
39 关于感情问题，我有几点不明，请各位大虾赐教
40 技嘉 GA-M55SLi-S4 主板支持迪兰恒进 HD5550恒金256M D5 HM512吗？
41 ps制作海报的问题
42 求一电动机正反转电路图
43 初三两道数学题，急急急！！！！！请高手
44 求shinee hellobaby这一类的动图，里面有图片
45 看中一款翡翠挂件，不知道多少价格买下合算？望行家指点。谢谢！重量：11.96g 规格：42×28×5毫米
46 初三三角函数问题3（写出理由）
47 真三国无双OL进不去
48 谁有没这樱花图大图
49 正方形边长4厘米，长方形长5厘米，求长方形宽
50 这是我的射击LR天赋~~~求高人看看如何~~~
51 安装了新系统后电脑无缘无故多了一个盘，为什么？怎么删除？
52 orbit downloader怎么使用
53 苹果4代播放器怎么下载进去东西？？越详细越好。。谢谢
54 我买了个城际通CD200，手机，导航一体的，可是怎么下载qq软件啊？上3G网挺麻烦的，能安装qq软件吗？
55 十宗罪中国十大恐怖凶杀案都是哪些真是的案件
56 安装windows 7 service pack 1 失败
57 一幅油画~应该是名画来的··画里有一个女孩抱着一只白灰色色兔子！！！图在这里http://ww1.sinaimg.cn/l
58 y460驱动安装问题求助？
59 最近电脑老是重启，一天十几次到几十次，我也重装了系统还是这样，同学说cpu风扇转速不够只有1250左右
60 这个图片是什么系列？很好看~请看下面的图~
61 希望大家能帮帮我，我的笔记本的触摸板关不上，希望大家给字典迷津，在此，先谢谢大家啦！！！
62 数学题50道
63 软考初级报哪个比较好？
64 若在三角形abc中，向量ab点乘向量bc＋向量ab的平方＝0，也三角形abc的形状是？
65 我想取一个可爱、非主流、小女生，浪漫的网名，最好是原创的，有诗意的！
66 长江家具有限公司工资待遇怎么样？
67 苏教版威尼斯商人课后题
68 怎么能看出一个铺地板砖的人是不是专业的?
69 该怎样表白
70 成都纺织高等专科学校到火车站怎么走
71 美国留学费用介绍?
72 四川哪些公司有水利一级和堤防一级资质
73 “地方千里”的“方”解释为“方圆”，它是什么词性？动词吗？
74 d300s+85mm/1.8D 拍人像怎么样？
75 你好，我想开实体店，卖韩国衣服，你能帮我从韩国那边拿货吗
76 聚便宜牛仔裤怎么加盟有什么有求
77 建筑八大员哪个价值更高些，施工员与安全员相比较哪个更重要？
78 杭州到江西南丰到哪里坐车
79 高一物理。很急。谢谢帮忙。详解。有分。
80 佳能数码相机性价比比较高的我是学生在天津
81 承德市平泉县榆树林子镇到付家店范仗子宋营子喇嘛店嘎海沟二道杖子敖牛沟这几个村的详细乘车路线
82 17 10 28 32 48 这5个数的因数各列出3个来。球了
83 帮忙分析一下我的自行车怎么丢的
84 13岁还算年龄小吗？
85 谁有新加坡网友有给个QQ
86 翻译（中文到英文）
87 上海市房屋产权证面积是如何计算的?
88 我想问一下去大酒店做推销应该找谁啊。采购还是经理。
89 沁阳哪里有修公路自行车的？？
90 你们银行有没有适合我们年轻人得，贷款？
91 之前在手机的收音机里无意中听到一首很好听的国语歌曲，男女对唱的，听的不是很清楚，歌曲大概是这样。
92 我有设备和未收货款值三十万另有俩人想加入合伙请问他俩该入多少资金利益又该如何分配
93 济南去青岛的动车
94 学校无线网络为什么下载也有200K，而玩游戏和看电影总是卡呢？
95 初中英语题求解
96 从百草园到三味书屋
97 科鲁兹不打开车窗，不打开空调，有办法让车内通风吗？
98 我想去法国自主旅游，去看朋友，不跟旅行社，要怎么签证过的几率大吖。急吖，拜托好心人帮帮忙哦。