【www.arisingsemi.com--语言培训】

回文结构
1）将窗体文件“” 和 工程文件“”上传到老师的ftp服务器上的
”周三下午” 或 ”周四下午” 或 ”周五下午” 你的文件夹中。
如：“31008888传媒1001张三”.

2）练习5-3，5-4，5-5 也同样将窗体文件和工程文件上传到老师的ftp
服务器上。
10
0
10
0
11
1
12345
54321
If str2 >= "a" And str2 = "A" And str2 k \ 2 Then
n = "是回文。"
Else
n = "不是回文。
"
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Click()
Dim i As Integer, w As Double, y As Double
w = 0
y = 0
n = InputBox("输入n：")
For i = 1 To n
y = 1 / i / (i + 1)
w = w + y
Next i
Print  “w=”;w
End Sub
w= 0.999900009999001        (n=10000)。

本文来源：http://www.arisingsemi.com/yuyanliuxue/141863/