1楼：岔路程序缘
privatesubform_click()dima(10)asstring
dimiasinteger,kasintegerform1.autoredraw=truerandomize
print"产生bai的十个字母是du：zhi"
fori=1to10
a(i)=chr(int(rnd*26+97))printa(i);
next
fori=1to10
ifa(i)=chr(97)thenk=k+1next
print"出现字母";chr(97);"的个数是dao：";k
endsub
已经运回行答过。
产生10个随机小写字母放在数组中，并输出字母“a”出现的次数
2楼：爱是一责任
#include
#include
#include
#define max 10
int main()
printf("%s,a有%d",sum,a);}
vb试题用随机函数产生 10个两位数的整数放在数组a中并输出，用随机函数产生10个一位数的整数放入数
3楼：匿名用户
新建一bai工程，在窗体上拖入一du***mand控件。然后进zhi入**区
dao，删除所有**后，粘内贴以下**即容可。
optionexplicit
privatesub***mand1_click()dima(9)asinteger,b(9)asinteger,c(9)asinteger
dimiasinteger
randomize
clsprint"数组a","数组b","数组c"
fori=0to9
a(i)=rnd()*9+10'产生随机两位整数b(i)=rnd()*9'产生随机一位整数c(i)=a(i)+b(i)'将对应的随机数相加printa(i),b(i),c(i)'结果输出到窗体上nexti
endsub
运行效果如下图所示：
vb编程题，用数组实现随机输出十个小写英文字母
4楼：匿名用户
private sub form_click()dim a(10) as string
dim i as integer, k as integerform1.autoredraw = truerandomize
print "产生的十个字母是："
for i = 1 to 10
a(i) = chr(int(rnd * 26 + 97))print a(i);
next
for i = 1 to 10
if a(i) = chr(97) then k = k + 1next
print "出现专
字母 "; chr(97); " 的个数属是："; k
end sub
5楼：听不清啊
private sub ***mand1_click()dim a(10) as string * 1randomize
for i = 1 to 10
a(i) = chr(int(rnd * 26) + 97)next i
for i = 1 to 10
print a(i);
next i
end sub
在vb中，随机生成小写字母的**要怎么写
6楼：庆年工坊
privatesub***mand1_click()randomize
printchr(int(rnd*26+97))endsub
7楼：匿名用户
randomize
printchr(int(rnd*((122-97+1)+97)))
用vb编程 产生10个随机小写字母放在数组中,并输出字母"a"出现的次数
8楼：匿名用户
privatesub***mand1_click()dima(10)asstring
fori=1to10
a(i)=chr(rnd*26+asc("a"))ifa(i)="a"thens=s+1next
msgbox"字母""a""出现"&s&"次"
endsub
vb编程问题：1使用随机函数产生10个10~100之间的随机整数存放在一维数组a中,并把该数组排序后显示在一个
9楼：匿名用户
根据已有的程序行，缺的内容主要就是一个排序过程。添加一个排序的过回
程就答行了。但是不知道该添在**，请说明程序的空白处是在**？能不能标出来，比如用括号，星号什么的，标一下需要补充到**？
或者，能不能说明一下，各文本框，按钮的功能是什么？ d = val(text3.text)，这个应该是要插入的数据了，说明text3是用来输入的，text2.
text = text2.text & str(a(i))，这说明text2是显示排序后的结果的，
那有没有text1？用作什么？两个按钮定义的功能是什么？插入的数据怎么插？是随机插入一个位置，并替换掉原来的数据还是将数组重新定义随机插入后，后面的数向后移？
这些需要说明一下，或者把需要填写的位置标清楚，不然，不好确定该怎么填。