怎么设计一个excel合并同类项求和的VB程序

如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数_百度知道
如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数
提问者采纳
三个数中最大的数是& & i & &输入第&quotprivate sub command1_click()dim maxfor i = 1 to 3n=val(inputbox(&))if n&max thenmax =nend ifnextprint &个数&quot
提问者评价
其他类似问题
为您推荐:
vb语言的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁天极传媒:天极网全国分站
您现在的位置: &&用VB设计一个简单的加法程序
用VB设计一个简单的加法程序
计算机与信息技术 15:43
  摘 要 VB作为一种可视化高级程序设计语言出现以来,使编程工作变得轻松快捷,使程序设计者摆脱了面向过程语言的许多细节,极大地提高了程序开发的效率。本文就以一种最简单的方法实现了运用加法程序进行计算的小例子,希望能激起大家们学习VB的兴趣。  关键词 计算机;VB;程序设计   计算机的多媒体技术已经广泛普及, 对于一般的用户来说, 采用可视化编程工具是最好的选择, VB程序设计语言就是其中一个典型的代表。Visual Basic是 Windows的编程语言。Visual Basic是在一个集成开发环境(IDE)中创建的,IDE使得程序员可以方便地创建、运行和调试Visual Basic程序。Visual Basic是世界上使用最广泛的快速应用程序开发语言。为提高大家学习VB的兴趣,在这里,我们以一个简单的加法程序来一下VB的强大功能。  首先我们启动VB,在出现"新建工程"对话框后,选择"标准EXE",单击"打开"按钮,即进入如下图的VB开发环境。
  第一步:单击工具箱中的"TextBox(文本框)"图标 ,移动指针到窗体Form1上,这时鼠标指针变成了"+"形状。拖出3个并排的有一点间距的方框出来,里面有text1、text2、text3的字样,分别选中它们,按鼠标退格键删除这些字样。再单击"Label(标签)"图标A,在刚才的3个方框之间拖2个标签框,分别键入加号"+"和等于号"=",最后单击"Command(命令按钮)"图标 ,在窗体的下方拖出一个按钮出来,拖出一个带有Command1字样的按钮,直接写上"计算"二字。如图所示:  第二步:双击"计算"按钮,会出现如下的代码窗口:  在Private Sub Command1_Click()和End Sub之间写上如下代码:
M = Val (Text1.Text)N = Val (Text2.Text)K = Val (Text3.Text)If m + n = k ThenLabel1.Caption = "正确!"ElseLabel1.Caption = "错误!"End If  第三步:关闭代码窗口,点"运行"---"启动"。在文本框中分别填写2、5、7,再点"计算"按钮,看窗体上出现什么文字,关闭Forml,再"启动",填写3、5、7后"计算",看窗体上出现什么文字。这时你会发现,在输入第一次数据时,会显示正确!在输入第二次数据时,会显示错误!  第四步:最后,我们来保存这个程序:首先点按"文件"----"生成工程"----选择保存地点为":\",文件名为"jiafa"----"确定"。再到"C:\"中去,找到这个"jiafa"文件,我们可以从它的后缀名中得知,这是个不依赖VB程序可以独立运行的可执行程序。运行一下,很有成就感吧。  短短四步,我们就可以编制出一个简单的加法程序,可见,软件的编制并不是那么神秘,只要你肯专心学习,一定会取得非凡成就的。以上程序已在vb6.0调试通过。以上所讲的只是VB的一些基本操作,仅取抛砖引玉的作用,希望各位VB高手能提出更多更好的方法,让我们在学习VB的过程中不断地得到提高。
(作者:木沙.哈森
阿勒玛.库赞拜责任编辑:方舟)
欢迎在新浪微博上关注我们
笔记本手机数码家电
document.write("");设计一个简单的VB程序_百度知道
提问者采纳
y1等Dim x1 As IntegerPrivate Sub Command1_Click()&#39,y换别的x1变量定义在最上面;-按钮x1= x1 - 1Me;+按钮x1 = x1 + 1Me.Caption = x1End SubPrivate Sub Command2_Click()&#39,最好变量名x
你这样定义变量了,可是没有写出X,Y,Z的初始值啊,我怎么知道X是从0开始叠加的呢?
定义一个integer类型的变量,它的默认值是0
这个是VB的特征。。。。
这样啊,我新开始学,很蛋疼啊。。。我有问题继续问你啊,大神。。
提问者评价
其他类似问题
为您推荐:
vb程序的相关知识
其他1条回答
别人怎么帮你。什么情况第二个值变。什么情况第一个值变你的五个输入值得变化规律都看不出来。你的显示又是代表什么都不清楚
我是刚开始学VB啊,难道我写的还不够清楚吗?就是像图上写的,简单的加减啊,按到关于X的按钮时,X才变,哪里有什么情况。。
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁如何用VB设计一个程序计算地球上两个城市的距离(劣弧)_百度知道
如何用VB设计一个程序计算地球上两个城市的距离(劣弧)
Const PI = 3, b As Double
Dim result As Double
r_lat1 = lat1 * PI &#47.7Const EARTH_RADIUS = 6378, _
ByVal lat2 As Double) As Double
Dim r_lat1 As Double, _
ByVal lat1 As D 180
result = 2 * G_Arcsin(Sqr((Sin(a &#47.14 * 1000'计算两经纬度间距离Function G_Distance(ByVal lng1 As Double, _
ByVal lng2 As D 180
a = r_lat2 - r_lat1
b = (lng1 - lng2) * PI &#47, r_lat2 As Double
r_lat2 = lat2 * PI / 2) ^ 2) + Cos(r_lat1) * Cos(r_lat2) * (Sin(b &#47有经纬度吗
用我给你的函数就行了
其他类似问题
为您推荐:
其他2条回答
这个问题的关键不是代码怎么写(cmd都可以写),而是在于算法
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁}

我要回帖

更多关于 excel表格合并同类项 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信