编程题（40题）1、在文本框Text1中输入一个正整数N，按“计算”命令按钮Comma
d1，产生N个0100之间的随机整数，计算这N个随机整数的平均数，显示在标签Label1中。将编写的程序存盘，工程文件名为Ex12

Vbp，窗体文件名为Ex12

Frm。（当N足够大时，该平均值应趋向于50）。Ex12

VbpEx12

FrmPrivateSubComma
d1_ClickNValText1TextSum0Fork1ToNVI
tR
d101SumSumVNextkLabel1Captio
SumNE
dSub2、在文本框Text1中输入一正整数N，按“计算”命令按钮Comma
d1，计算该数的阶乘N，结果显示在标签框Label1中。按“结束”命令按钮Comma
d2结束程序。PrivateSubComma
d1_Click（）PrivateSubComma
d2_Click（）NValText1TextE
dP1E
dSubFork1ToNPPkNextkLabel1PE
dSub3、在文本框Text1中输入一个字符串，按“排列”按钮Comma
d1，将输入字符串中每两个相邻的字符之间插入一个空格，结果显示在标签框Label1中。按“结束”命令按钮Comma
d2结束程序。PrivateSubComma
d1_Click（）PrivateSubComma
d2_Click（）XText1TextE
dLLe
XE
dSubW“”Fork1ToL1VMidXk1WWV“”NextkWWRightX1Label1Captio
WE
dSub
4、编写程序，从键盘输入任一x的值，求分段函数的值（可用I
putBox函数）。
2xY0xx0x0x0
1
fPrivateSubForm_ClickDimxAsDoubleyAsDoublexValI
putBox