【急】请问VB中如何添加程序

【急】请问VB中如何添加程序,第1张

'如果你的xxbat放在c:\

Private Sub CommandButton1_Click()

Shell ("c:\xxbat")

End Sub

'打开记事本

Private Sub CommandButton1_Click()

Shell ("notepadexe")

End Sub

'用记事本打开c:\M1319log文件

Private Sub CommandButton2_Click()

Shell ("notepadexe c:\M1319log")

End Sub

VERSION 500

Begin VBForm Form1

Caption = "Form1"

ClientHeight = 3090

ClientLeft = 60

ClientTop = 450

ClientWidth = 4680

LinkTopic = "Form1"

ScaleHeight = 3090

ScaleWidth = 4680

StartUpPosition = 3 '窗口缺省

Begin VBCommandButton Command1

Caption = "Max!"

Height = 375

Left = 2280

TabIndex = 5

Top = 1680

Width = 975

End

Begin VBTextBox Text5

Height = 375

Left = 960

TabIndex = 4

Top = 2160

Width = 1215

End

Begin VBTextBox Text4

Height = 375

Left = 960

TabIndex = 3

Top = 1680

Width = 1215

End

Begin VBTextBox Text3

Height = 375

Left = 960

TabIndex = 2

Top = 1200

Width = 1215

End

Begin VBTextBox Text2

Height = 375

Left = 960

TabIndex = 1

Top = 720

Width = 1215

End

Begin VBTextBox Text1

Height = 375

Left = 960

TabIndex = 0

Top = 240

Width = 1215

End

End

Attribute VB_Name = "Form1"

Attribute VB_GlobalNameSpace = False

Attribute VB_Creatable = False

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Dim a(3) As Long

Dim nMax As Long

Dim i As Integer

a(0) = Val(Text1)

a(1) = Val(Text2)

a(2) = Val(Text3)

a(3) = Val(Text4)

nMax = 0

For i = 0 To 3

If nMax < a(i) Then nMax = a(i)

Next

Text5 = nMax

End Sub

把以上存为frm即可~运行就是了。支持任意多的文本框。

1新建工程。创建一个应用程序首先要打开一个新的工程。

2创建应用程序主界面。使用工具箱在窗体上放置所需控件。其中,窗体是用户进行界面设计时在其上放置控件的窗口,它是创建应用程序界面的基础。

3设置属性值。通过这一步骤来改变对象的外观和行为。可通过属性窗口设置,也可通过程序代码设置。

4对象事件过程的编程。通过代码窗口为一些对象有相关事件的编写代码。

5保存文件。运行调试之前,一般要先保存文件。

6程序运行与调试。测试所编程序,若运行结果有错或对用户界面不满意,则可通过前面的步骤修改,继续测试直到运行结果正确,用户满意为止,再次保存修改后的程序。

以上就是关于【急】请问VB中如何添加程序全部的内容,包括:【急】请问VB中如何添加程序、用VB写出的设计程序、VB创建程序步骤等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10105698.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存