谢谢你啊！然后能不能麻烦你帮我看下我的作业，1、2、3、4、7我不会，其他题可不可以请你帮我检查一下？

如题所述

1)10    5

2)24328

3)23

4)看不懂

7)

Private Sub Command1_Click()

For i = 2 To 100

  k = 1

  For j = 2 To Sqr(i)

    If i Mod j = 0 Then k = 0: Exit For

  Next j

  If k = 1 Then

    s = s + i

    Print Format(i, "@@@@");        '不要的话可删除

    n = n + 1                                    '不要的话可删除

    If n Mod 10 = 0 Then Print         '不要的话可删除

  End If

Next i

Print

Print "100以内素数的和="; s

End Sub

第四题是这样的
下面的If语句与y=(x>=10)?3*x-11：(x<1)?x：2*x-1; 的功能相同，请补充完整
if——then——
if——then——
y=2*x-1
else y=x
else
拜托拜托，大神哥哥帮我解一下！谢谢啦！

你这是VB的什么版本，有点不太懂。
if x>=10 then
y=3*x-11
else
if x>=1 then
y=2*x-1
else
y=x
end if
end if

谁知道啊，老师出的题目，怪怪的，不过真的很感谢你啦！谢谢谢谢！