'如果你的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创建程序步骤等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)