求做一个最简单的vb计算公式程序的代码
一、设置控件属性
text1(被除数):text=(空)
label1:caption=“/”
text2(除数):text=(空)
label2:caption=“=”
text3(商):text=(空)
command1:caption=“计算”
command2:caption=“清空”
二、编写代码
Private Sub Command1_Click()
Dim a As Single,b As Single,c As Single
a=Val(Text1.Text)
b=Val(Text2.Text)
c=a/b
Text3.Text=c
End Sub
Private Sub Command2_Click()
Text1.Text=""
Text2.Text=""
Text3.Text=""
End Sub
text1(被除数):text=(空)
label1:caption=“/”
text2(除数):text=(空)
label2:caption=“=”
text3(商):text=(空)
command1:caption=“计算”
command2:caption=“清空”
二、编写代码
Private Sub Command1_Click()
Dim a As Single,b As Single,c As Single
a=Val(Text1.Text)
b=Val(Text2.Text)
c=a/b
Text3.Text=c
End Sub
Private Sub Command2_Click()
Text1.Text=""
Text2.Text=""
Text3.Text=""
End Sub
佚名
2024-06-01 10:11:16
类似问题(10)
-
佚名2024-06-01 02:31:49
问c语言多线程的socket简单模板,想参考一下写一个简单的程序
答中国络的Socket数据传输是一种特殊的I/O,Socket也是一种文件描述符。Socket也具有一个类似于打开文件的函数调用Socket(),该函数返回一个整...
-
佚名2024-06-01 16:07:32
问如何在VB中给程序增加一个菜单?(如图,高分悬赏)
答第一步,在编程环境的菜单里选“工具”、“菜单编辑器”,就会弹出一个“菜单编辑器”窗口。第二步,在窗口里的最上面一行输入“查看”,在“快捷键”里输入“Alt-E”...
-
佚名2024-06-01 15:41:30
问vb小程序大家帮忙看一下。
答Private Sub youganhuise_Click()Load shujuzhunbeiwith shujuzhunbei.Top = 1500.Lef...
-
佚名2024-06-01 07:21:52
问VB 程序设计
答565863*-+986389
-
佚名2024-06-01 09:00:31
问求一段最简单的asp在线无组件生成缩略图的代码
答服务器不支持任何插(组)件能生成缩略图的可能性几乎没有
-
佚名2024-06-01 01:55:19
问求一个抽签的VB程序,能把名字写入数据库,又能运行抽签? 源代码请发cht3068@sina.com
答Dim A() As StringPrivate Sub BEG_Click()Timer1.Enabled = TrueIf BEG.Caption = "开...
-
佚名2024-06-01 08:00:00
问我们班有53个同学,想用VB编写一个随机抽签的程序。上课随机抽人讲题用~ 求源代码。
答代码就这个了一个COMMANDBUTTON 一个TEXTBOXPrivate Sub click_Click() ' R=int((上限-下限+1)*rn...
-
佚名2024-06-01 08:00:00
问简单的个人网站html源代码
答你在网页中点击鼠标右键,然后在菜单里点击网页另存为,代码就复制下来了;
-
佚名2024-06-01 08:00:00
问VB问题,计时器走一次,代码如下,请指出问题
答Option ExplicitDim a As IntegerDim b As IntegerDim c As IntegerDim d As IntegerD...
-
佚名2024-06-01 08:00:00
问用vb的timer做一个计时器程序
答窗体上放一个Label,三个Command按钮:Dim h As Integer, m As Integer, s As Integer, ms As Inte...
风水
起名
网名
- 1 微信牛逼网名
- 2 带果汁网名
- 3 网名再加王者名
- 4 关于 十八 的网名
- 5 个性情侣昵称两个字的
- 6 对宝宝的昵称比如毛豆
- 7 可爱萌萌的女生昵称
- 8 好听的飞车手游昵称
- 9 快手电脑版怎么修改昵称
- 10 手机淘宝昵称怎么查
说说
- 1 李凯个性签名
- 2 三四个字的个性签名
- 3 qq签名同步空间说说
- 4 2015古风qq签名大全
- 5 让人心酸的霸气签名
- 6 阅读文中画线句子 说说此时
- 7 看到几年前的照片说说
- 8 有关背后说人的说说
- 9 短字感慨说说
- 10 女朋友在加班我该发什么说说