在Form1上画一个命令按钮,标题为“输入成绩”,单击该按钮则使用InputBox函数输入10个学生的成绩。当输入
2个回答
展开全部
无语了,这是最基础的啊!下面字符你把保存为Form1.frm
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3090
ClientLeft = 60
ClientTop = 450
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3090
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton C1
Caption = "Command1"
Height = 375
Left = 1200
TabIndex = 1
Top = 960
Width = 2175
End
Begin VB.TextBox Text1
Height = 375
Left = 1320
TabIndex = 0
Text = "0"
Top = 360
Width = 2055
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub C1_Click()
End Sub
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3090
ClientLeft = 60
ClientTop = 450
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3090
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton C1
Caption = "Command1"
Height = 375
Left = 1200
TabIndex = 1
Top = 960
Width = 2175
End
Begin VB.TextBox Text1
Height = 375
Left = 1320
TabIndex = 0
Text = "0"
Top = 360
Width = 2055
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub C1_Click()
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询