vb编程 感谢请大神帮我p 谢谢

哪位大神帮我一下,任意输入三个整数,比较大小,输出其中最大值_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:51,436贴子:
哪位大神帮我一下,任意输入三个整数,比较大小,输出其中最大值收藏
这是执行结果图
新手上路 迷茫~~~
暂且不理编程,你先说说,怎么通过数学,比较三个数大小?
dim a,b,c,x as integer......(省略若干步骤)if a&b thenx=aelsex=bif x&c thenprint xelseprint c
语句写的比较简单,没有写完整,仅提供思路
iif(a&b,iif(a&c,x=a,x=c),iif(b&c,x=b,x=c))print x
x = IIf(a & b, IIf(a & c, a, c), IIf(b & c, b, c))Print x
是不是应该去掉括号OR加上Call
随便怎么做都行,只要能取得最值就好,方法N多
Private Sub Command1_Click()Dim a, b, c, x As Integera = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If a & b Thenx = aElsex = bEnd IfIf x & c ThenText4.Text = xElseText4.Text = cEnd IfEnd Sub
这是写的 高手指点一下 看看能不能更简单明了!!!
回复4楼:这个我都会~我还没学过vb~百度就有完整代码~
Private Sub Command1_Click()ReDim a(1 To 3) As LongDim cMax As Longa(1) = Val(Text1): a(2) = Val(Text3): a(3) = Val(text4)cMax = a(1)For i = 2 To 3If a(i) & cMax Then cMax = a(i)NextMsgBox cMaxEnd Sub
Command_ClickDim a!,b!,c!,t!a=Val(Inputbox(&a=&))b= Val(Inputbox(&b=&))c= Val(Inputbox(&c=&))Print a,b,ct=IIf(a&b,a,b)t=IIf(c&t,c,t)Print tEnd Sub
登录百度帐号我的游戏推荐游戏
后查看最近玩过的游戏
为兴趣而生,贴吧更懂你。或请大神帮帮我,怎样在windows编程中建立菜单与资源菜单,在此先谢谢大神了!_百度知道
请大神帮帮我,怎样在windows编程中建立菜单与资源菜单,在此先谢谢大神了!
我有更好的答案
按默认排序
三种方法:1、自己写资源文件,就是纯文本格式的自己写,不使用任何IDE。这个可以参考
老罗的 win32汇编程序设计 上面菜单一节有详细介绍。2、SDK编写的时候添加资源脚本,然后插入资源,具体 在VC或者VS中点击插入按钮,找到菜单资源插入即可。3、MFC中,这个就更方便了,建立程序后,基本都带菜单,自己改下就能用。。如果是单对话框的程序,也是使用SDK中的方法加载菜单。
大神 ,我把代码给你,你帮我看看要怎么才能运行出来。#define IDM_New
101#define IDM_Open
102#define IDM_Save
103#define IDM_Exit
104#define IDM_Cut
201#define IDM_Copy
202#define IDM_Paste 203#define IDM_About 301
其他类似问题
windows编程的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁用VBA还是用别的编程语言?谢谢了,大神帮忙啊_百度知道
用VBA还是用别的编程语言?谢谢了,大神帮忙啊
谢前答我EXCEL问题 VBA我懂兴趣 看面别答都让我LEN&FIND两公式插入—名称—定义
非谢谢答 能采纳两答案所…… 现更难困扰我久问题想问希望能帮我 知道具体该问明再具体问题告诉今简明介绍点: 需要工作簿工作表进行每工作表都独立作用面都定程序(数值进行简单四则运算已)数据我每用都要同工作表调用些程序进行数据处理处理数据放另外工作表觉特别麻烦没种用寻找哪工作簿工作表直接固定界面(或工作表)直接输入数据用相应工作表程序处理并处理结放固定工作表
期待答 能够解决问题 再给百
提问者采纳
,打VBA,添加窗体.向面添加控件,控件事件面添加您需要实现代码OK啦!希望采纳
其他类似问题
编程语言的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁c#编程!求各位大神帮我解决这个问题,谢谢!_百度知道
c#编程!求各位大神帮我解决这个问题,谢谢!
某航空公司规定:根据月份和订票数量决定机票价格的优惠程度,在旅游的旺季7-9月份,如果订票数超过20张,票价优惠15%,如果订票数在20张以下,票价优惠5%;在旅游的淡季1-5月、10月份、11月份、如果订票数超过20张,票价优惠30%,如果订票数在20张以下,票价优惠20%;其他情况一律优惠10%。编写一个应用程序实现上述功能。
提问者采纳
int mon = System.DateTime.Now.M
int ticket = 票数;
int price = 票单价;
if (7 &= mon && mon &= 9)
if (ticket & 20)
Console.WriteLine(ticket*price*(1-0.15));
Console.WriteLine(ticket*price*(1-0.05));
else if ((1 &= mon && mon &= 5) || (mon == 10) || (mon == 11))
if (ticket & 20)
Console.WriteLine(ticket * price* (1-0.30));
Console.WriteLine(ticket * price *(1- 0.20));
Console.WriteLine(ticket * price *(1- 0.10));
Console.WriteLine,这句是做什么用?
输出作用,没用,你改成你要的处理就行了。
提问者评价
其他类似问题
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 vb excel编程实例 的文章

 

随机推荐