-
-
1本人身份证:370305199506054*** 绝对不骗人骗人的***,6.5……
-
0Public Function fac(ByVal n As Integer) If n = 1 Then fac = 1 Else fac = n * fac(n - 1) End If End Function Private Sub Command1_Click() Dim i As Integer Dim sum As Long sum = 0 For i = 1 To 10 sum = sum + fac(i) Next i Text1.Text = Str(sum)
-
6怕怕哦
-
0迟到,早退
-
2
-
1心疼死了
-
1
-
2擦
-
1老了
-
0
-
0貌似不是日语就不好听了
-
0却又在困难面前乏力
-
6受刺激了?
-
1爽歪歪
-
1下雨不停
-
1啪啪啪
-
7不用升旗哈
-
2
-
10月底了,没钱了
-
2去市内
-
3还有六天,怎么办
-
2今天350拿来一百个充电宝
-
1吧主,求你了
-
1这么冷的天去爬山
-
2清明节也不知道几天假
-
3郁闷
-
2
-
1宅得很彻底
-
2
-
0来报道
-
1我爱你们
-
1果然还是吧主快了一步
-
2召唤
-
4被人骗了200块钱,现在很不爽
-
0速度来几个
-
0
-
2缺钱的时候,我经常会想,要是能中五百万多好啊! 然后就在心里仔细盘算这五百万该怎么花,盘算半天,心情就会特好特满足! 但是我从来不买彩
-
1
-
2为终究不能像他们这样有勇气去追逐自己的梦想而遗憾
-
2贝齐为何不去做声优,不是萌娘么
-
1这是在逗我怎么当的老师!
-
3什么垃圾学校
-
1原来你偷偷给我加了,不好意思,下掉吧,好么