[VB代码]弹出输入框 输入内容显示在label1 当中

单击按钮 弹出输入框
输入数字 单击确定以后 输入的数字显示在label1 当中

求这个的代码
谢谢了

第1个回答  推荐于2016-03-04
Private Sub Command1_Click()
dim a as integer
a=inputbox("输入数字")
label1.caption=a
End Sub本回答被提问者采纳
第2个回答  2009-04-28
Private Sub Command1_Click()
Label1.Caption = InputBox("请输入数字")
End Sub
第3个回答  2009-04-28
Option Explicit

Private Sub Command1_Click()
Dim a
a = InputBox("prompt", "title")
Label1.Caption = a
End Sub
第4个回答  2009-04-28
Label1.Caption = InputBox("请输入数字")
相似回答