永发信息网

请VB高手帮忙注释

答案:2  悬赏:70  手机版
解决时间 2021-04-27 23:47

Public Class Form1
Public Sub c(ByRef _b As Integer)
Dim a, b As Integer
b = 1
For a = 1 To 5
b *= a
Next
_b = b
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim j, _b As Integer
Call c(j)
Label1.Text = Label1.Text & ControlChars.CrLf & "5!的阶乘是:" & j.ToString
End Sub
End Class

还有就是为什么不能用(Byref sender As System.Object, ByVal e As System.EventArgs)

最佳答案

Public Sub c(ByRef _b As Integer)
Dim a, b As Integer
b = 1
For a = 1 To 5
b *= a
Next
_b = b
End Sub


这段就是所谓的求5的阶乘的子程序,但是b *= a这句似乎是C的语法(也许是我对VB研究还不透彻).


之所以不能用(Byref sender As System.Object,.....)是因为button控件规定的,它的事件函数的原型在微软编写button控件时就已经固定了,你不可随意更改的。

全部回答
b *= a ‘是VB.net语法 接近C b=b*a
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
诛仙创建人物名字怎么加特殊符号?
江苏爱家乡饮品有限公司在什么地方啊,我要过
小学一年级班级口号,小学一年级体育课每周几
绿玫瑰:纯真简朴,青春长驻的翻译是:什么意
用脱毛液毛孔会被堵塞吗
使用天宏在线一卡通绑定业务,QQ积分增加吗?
撒买260CF
谢谢你,祝福你,我爱你……
天龙的资料忘了难道就只有官网上说的那个方法
双青高地址在哪,我要去那里办事
Q宠大乐斗帮上收人 ID324159 啊??
想换一款3G、智能、拍照的滑盖手机,不知有哪
淘宝注射账号
这只狼怎么样 能不能带
我的大黄蜂改装引擎+6燃料+4点火+2进气+6这样
推荐资讯
东莞松山湖门票多少钱,松山湖梦幻百花洲门票
请帮推荐一部智能手机, 价位在1700一下的
鸡西矿区社会保险服务中心我想知道这个在什么
炫舞荣誉怎么升?急
飞轮海第四张专辑叫什么?
彩虹岛收点的那些人的游戏币怎么来的?
什么成群四字成语,带"成群"的成语
家的一篇说明文800字
IBM P60 15寸的和14寸的有什么区别
1如何治失眠?
砌筑是什么意思,挤浆法 刮浆法 满口灰法 三一
经典美容美发(分店)地址有知道的么?有点事想
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?