Question

用VB如何写1到100之间所有能被3整除而不能被7整除的整数的和与个数的程序

Answer 1

VB代码如下：

 Dim i, j
j = 0
For i = 1 To 100
If (i Mod 3 = 0 Or i Mod 7 = 0) And i Mod 21 <> 0 Then
Print i,
j = j + 1
If j = 7 Then
Print
j = 0
End If
End If
Next i

扩展资料

vb语言的特点：

VB 的中心思想就是要便于程序员使用，无论是新手或者专家。VB使用了可以简单建立应用程序的GUI 系统，但是又可以开发相当复杂的程序。VB 的程序是一种基于窗体的可视化组件安排的联合，并且增加代码来指定组件的属性和方法。

因为默认的属性和方法已经有一部分定义在了组件内，所以程序员不用写多少代码就可以完成一个简单的程序。过去的版本里面 VB 程序的性能问题一直被放在了桌面上，但是随着计算机速度的飞速增加，关于性能的争论已经越来越少。

VB 的程序可以包含一个或多个窗体，或者是一个主窗体和多个子窗体，类似于操作系统的样子。有很少功能的对话框窗口（比如没有最大化和最小化按钮的窗体）可以用来提供弹出功能。

VB 的组件既可以拥有用户界面，也可以没有。这样一来服务器端程序就可以处理增加的模块。