小分求超简单的VB小程序!!!!!

想做个小程序,来简化运算,大致就是这个样子
3个输入数值的框,一点按钮,在另外1-2个框里出现不同的结果
求高手说一下,每个框都是什么框,怎么写内容,按钮需要怎么写……
时间太长了,忘记怎么用了,下了一个迷你版,好像少东西呢
是啊,设计一个小程序,公式我自己填就可以……

框就文本框就可以了。

(Text1,Text2,Text3)

假如公式为:a + b = c

'按钮内容
Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))
'a = Text1 , b = Text2 , c = Text3

难的公式我就不会了!减可以把!
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-06-10
3个文本框,1个命令按钮控件,3个图形控件,用来显示文本
第2个回答  2009-06-10
下个完整版的吧 迅雷搜 CDKEY :121—111111
你说的是设计计算程序吗?

如何使用VB编写一个简单的小程序?
在桌面上,鼠标左键双击程序,在打开的VB6主界面上,左边是工具菜单栏,单击标签按钮,在Form1窗口上,绘制出一Label1,然后在其属性窗口上改个名字,如Caption为第一数,如下图所示。接着,用同样的方法,在Form1窗口上绘制出第二数,并且在左边工具菜单栏,单击文本框按钮,并绘制出来。在文本框属...

求助:求高人做个VB小程序,最简单的那种 百分悬赏
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1.ForeColor = vbGreen End Sub Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1.ForeColor = vbWhite End Sub Private Sub Timer1_Ti...

急求VB小程序。。。要 简单的
新建一个工程,表单里拉一个button,命名为btnDemo,写一行代码,即可执行。Private Sub btnDemo_Click()MsgBox ("Hello, China")End Sub

用VB做这个小程序怎么做啊??
用Webbrowser控件简单实现 新建工程(只有一个窗体)在工具箱中选右键菜单“部件”,先择“Microsoft Internet Control",单击“应用”,工具箱中就多出一个控件:"webbrowser"拖放一个Webbrowser,默认名为 WebBrowser1 代码:private sub form_load()const myurl="http:\/\/www.js-lottery.com\/view7.ph...

跪求编写个vb小程序啊,新手不懂,跪求大神指导啊,程序如下
Private Sub Command1_Click() If Text1.Text = "高兴" Then Msgbox "你是猪吗" Else If Text1.Text = "平和" Then Msgbox "还好了" Else If Text1.Text = "沮丧" Then Msgbox "别灰心,妹子会有的" End If End Sub ...

求vb摇奖小程序,非常简单,要求请看……
窗体1 单击按钮输入密码,一次一换,不正确退出 Dim y As Integer Private Sub Command1_Click()x = InputBox("请输入密码")If x <> y Then MsgBox "密码不正确": Unload Me ElseIf x = y Then Form2.Show: Form1.Visible = False: y = y + 1 '换密码 End If End Sub Private Sub...

vb有意思的小程序 ?
VB制作奇形怪状的窗体 普通的窗体都是方方的,使用API函数可以做出一些奇怪的形状。比如,窗体是圆角矩形,在中间挖一个椭圆形的洞。先要理解一个重要的概念:区域。区域是描述设备场景中某一块的GDI对象,每个区域都有一个句柄。一个区域可以是矩形,也可以是复杂的多边形,甚至是几个区域组织在一起。

求一个小程序 VBS VB C++ .NET 均可。程序很简单就是移动文件。可惜我不...
Public Fol As Folder Public Fil As File Dim filName As String '这个记录拖动文件到图标里后所得到文件路径及名称 Private Sub Form_Load()filName = ""filName = Command$ '获取拖入的文件 If filName = "" Then '没有拖入文件时候进行的操作 Else If Box.FileExists(filName) Then '在...

vb小程序,大家教我做~
著名的Hello World程序:Module Module1 Sub Main()Console.WriteLine("Hello World!")End Sub End Module

vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的制作方法
1、首先启动vb6.0,执行文件-新建命令,弹出新建工程对话框,在该对话框中选择标准的exe后点击打开按钮,进入vb程序主界面。2、在主界面中,按住鼠标左键按住窗体周围的任意一个小正方形进行拖拽,调节窗体的大小,直至自己满意为止。3、选择窗体,在其右边的属性中找到boderstyle属性,设置属性值为none,...

相似回答
大家正在搜