分类: 电脑/网络 >> 程序设计 >> 其他编程语言
问题描述:
Private Sub Command1_Click()
s = 0
For i = 1 To 15
x = 2 i - 1
If x Mod 3 = 0 Then s = s + 1
Next i
Label1Caption = s
End Sub
以上是什么意思,最好解释清楚点!还有我要用VB做加法减法运算怎么做,把程序告诉我建一个Command1按钮改为相加,然后建立两个TEXTBOX之后在这两个文本框中输入数字,按相加按钮,答案显示在LABEL中
(答的对加50-100积分)
解析:
Private Sub Command1_Click() '按钮点击时间
s = 0 '把S初始为0 也就是设S=0
For i = 1 To 15 '使i的值从1到15递增,i每改变1次就执行下面两行一次
x = 2 i - 1 '求X的值
If x Mod 3 = 0 Then s = s + 1 '如果X是3的倍数,那么S=S+1,即增加1
Next i
Label1Caption = s '把S写在标签里面
End Sub
总体意思是 当I=1,2,3,。。。15时 记录2I-1 的值为3的倍数的 个数
相加的代码
Private Sub Command1_Click()
Label1Caption = Val(Text1text) + Val(Text2text)
End Sub
就可以了,当然 - / 和+的道理一样,改一下符号就可以了
if pictruebox1top>pictruebox2top+pictruebox2height 是说,如果picturebox1的上边界在picturebox2的下边界的下面
pictureboxmove picturebox1left,picturebox1top-5 -a,picturebox1width,pictureboxheight
是说,当条件满足时picturebox将移动到picturebox1的上面某一位置,宽度和picturebox1一样,每次定时器定时时间到,picturebox就会移动一点,a是改变每次移动多少,a=a+1,表示每次移动都比上一次移动还多,就是说picturebox逐渐向上移动,每次移动的距离都比前一次多(由a=a+1)决定。不明白再Hi我吧
以上就是关于关于VB程序的解释,很容易全部的内容,包括:关于VB程序的解释,很容易、vb 程序解释、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)