-
这个为什么打印“1 2 12”而不是“1212”?PrivateSubCommand13_Click()s=1ForI=1To3Forj=0ToI-1s=s+s*jNextjPrints;NextIEndSub这个为什么打印“1212”而不是“1212”?QQ472152323 时间:08-14 + 阅读全文
-
指定excle名单,想进行随机分组,怎么做啊?本人想做一个随机分组程序用于教学,从excle或txt中读取姓名,输入分成若干组,然后生成每组的名单,请问如何能够实现啊?求源码!不甚感激啊!!hfzrx 时间:08-14 + 阅读全文
-
vb6怎么调用google网页翻译?翻译text1中的网址比如源网址在text1中手工输入,例如:www.alibaba.com目标语言是:中文 我想要的是网页翻译。不是文字翻译。是网页翻译:输入是网址,输出是翻译后的网页内容。谢谢!xinrensheng 时间:08-13 + 阅读全文
-
想让google翻译我text1中自定义的网站的话,要怎么写完整的网址?我试了http://translate.google.com/translate?u=text1不对这个地址应该是什么呢?要怎么实现调用这个google网站翻译功能呢?不好意思我分不多了.谢谢!!xinrensheng 时间:08-13 + 阅读全文
-
两个窗体,我想弄个按钮,点击关闭1窗体,打开2窗体。但不行?PrivateSubCommand1_Click() Form1.showForm2.HideEndSub 我这样写不行哦?2窗体等于是隐藏了,而不是关闭。。关闭得如何写啊??我用UnloadMe或Unloadform2也不行,这样直接关闭了,不会显示出form1。。gdxinge2 时间:08-13 + 阅读全文
-
怎么将vb中的日期和时间组合在 一起,并且写入数据库中的某个表的字段中呢???怎么将vb中的日期和时间组合在一起,并且写入数据库中的某个表的字段中呢???纯属帮忙谢谢!xhf55555 时间:08-13 + 阅读全文
-
老问题,新手问。请教MSHFlexGrid分页。我用的是Access数据库的。请看源码,帮助增加全部只有40分了。望谅解。以下是全部代码。VBcodeOptionExplicitPrivateConstc_bh=0PrivateConstc_xm=1PrivateConstc_xb=2PrivateConstc_nl=3PrivateConstc_dh=4PrivateConstc_dz=5PrivateConswanmeikakaxi 时间:08-13 + 阅读全文
-
vb 随机数分组,每组不重复'1.实现随机产生的数字'2.随机产生的数字不能重复'3.根据输入的数字判断分多少个组'4.每组随机产生的数字不能重复'5.根据输入的数字判断每组产生多少个随机数'6.用户可输入数字作为判断基数''''以下是我的代码,不能实现,麻烦高手帮帮忙PrivateSubCommand1_Click()Dima(20)AsInteger,b(20)AsIntegejohnmo 时间:02-04 + 阅读全文