Call Mida("2.1458", A, B, C)
创新互联从2013年创立,是专业互联网技术服务公司,拥有项目网站设计、成都做网站网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元龙华做网站,已为上家服务,为龙华各地企业和个人服务,联系电话:18980820575
msgbox(A)
msgbox(B)
msgbox(C)
Sub Mida(Myi As integer,ByRef A As Integer, ByRef B As Integer, ByRef C As Integer)
msgbox(myi)
A=2
B= 14
C = 58
End Sub
以上是过程,如果是在模块里就将Sub改用Function
应该定义为double或者single,string类好像不能进行运算。我简单说一下控制台的方法,你要一次性输入和差积商,首先声明两个变量用来储存两个数,然后用算法一次性输出结果就ok。
Sub Main()
Dim FN As Single
Dim SN As Single
Dim ResultNum As Single
Console.WriteLine("请输入第一个数") : FN = Console.ReadLine
Console.WriteLine("请输入第二个数") : SN = Console.ReadLine
ResultNum = FN + SN
Console.WriteLine("它们的和: " ResultNum)
ResultNum = FN - SN
Console.WriteLine("它们的差: " ResultNum)
ResultNum = FN * SN
Console.WriteLine("它们的积: " ResultNum)
ResultNum = FN / SN
Console.WriteLine("它们的商: " ResultNum)
Console.ReadLine()
End Sub
简单的输入有:
inputbox
textbox
简单的输出有:
textbox
label
debug.print
分享名称:vb.net输入输出流 c输入输出流
转载源于:https://www.cdcxhl.com/article2/dodhpoc.html
成都网站建设公司_创新互联,为您提供网站收录、网站设计公司、搜索引擎优化、企业网站制作、网站建设、标签优化
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联