求1-100之间能够被5 或7整除的数,同时在图片框中每行4个输出出来.并在文本框中显示这些数的和.vb编程语

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/14 21:08:04
求1-100之间能够被5 或7整除的数,同时在图片框中每行4个输出出来.并在文本框中显示这些数的和.vb编程语
x͒Ok@ƿʰP&3$)瞼Kf2iFIdk*]PnPZ"do$ۈޤ0fNܸ= pOuWYF~tؠ-4DsU'횸ޕk~D J_D~B6GpP}og%B5+MLA閩iA-aQ\8:;[\EcjԄa*"/łT,':&D,8x|qzkVs;\W@:BTI'ifj9A ~U

求1-100之间能够被5 或7整除的数,同时在图片框中每行4个输出出来.并在文本框中显示这些数的和.vb编程语
求1-100之间能够被5 或7整除的数,同时在图片框中每行4个输出出来.并在文本框中显示这些数的和.vb编程语

求1-100之间能够被5 或7整除的数,同时在图片框中每行4个输出出来.并在文本框中显示这些数的和.vb编程语
const N = 100
dim i,iCount
iCount =0 '计数
dim sum : sum =0
for i=1 to N
if i mod 5 =0 or i mod 7 =0 then
iCount = iCount + 1
textBox1.Text = textBox1.Text & cstr(i)
sum = sum + i
if iCount mod 4=0 then
textBox.Text = textBox1.Text & vbcrlf
end if
end if
next
textBox.Text = cstr(sum)