
5个回答
展开全部
Private Sub Command1_Click()
Text1.Text = 1
End Sub
Text1.Text = 1
End Sub
展开全部
在窗体上添加,一个按钮,再添加一个文本框,输入如下代码:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim prompt, a As String
prompt = "请输入1"
a = InputBox(prompt, , )
TextBox1.Text = a
End Sub
End Class
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim prompt, a As String
prompt = "请输入1"
a = InputBox(prompt, , )
TextBox1.Text = a
End Sub
End Class
追问
能解释下吗
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Text1.text = text1.text & 1
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
……
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询