求大佬怎么用Dreamweaver算出100以内的素数

//vb什么的实在不懂，只能帮到这儿了
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim sum As Integer,f As Boolean
For i = 2 To 100
For j = 2 To i - 1
If i Mod j = 0 And i 2 Then
f = True
Exit For
End If
Next
If Not f Then sum = sum + i
f = False
Next
MsgBox sum
End Sub

 for (var i = 2; i < 100; i++) {
                var flag = true;
                for (var j = 2; j <= i / 2; j++) {
                    if (i % j == 0) {
                        flag = false;
                        break;
                    }
                }
                if (flag)         
                    var str=' ';
                                        str+=i+',';
            }