高中信息技术招聘VB编程题解说.doc

编程题（40题） 1、在文本框Text1中输入一个正整数N，按“计算”命令按钮Command1，产生N个0 ~ 100之间的随机整数，计算这N个随机整数的平均数，显示在标签Label1中。 将编写的程序存盘，工程文件名为Ex12nnnn.Vbp，窗体文件名为Ex12nnnn.Frm。 （当N足够大时，该平均值应趋向于50）。 Ex12nnnn.Vbp Ex12nnnn.Frm Private Sub Command1_Click ( ) N = Val (Text1.Text) Sum = 0 For k = 1 To N V = Int ( Rnd * 101 ) Sum = Sum + V Next k Label1.Caption = Sum / N End Sub 2、在文本框Text1中输入一正整数N，按“计算”命令按钮Command1，计算该数的阶乘N!，结果显示在标签框Label1中。按“结束”命令按钮Command2 结束程序。 Private Sub Command1_Click（） Private Sub Command2_Click（） N = Val