vb点虐 输入对话框 vbs弹出输入框
请问vb点虐 如何弹出可以输入字符的对话框!谢谢大家了!
这个错误消息的提示是“不能在非用户界面的状态下使用模态对话框”,你的这个程序是console(命令行)或者是无界面的?只能在有界面的程序中使用对话框的。
创新互联建站客户idc服务中心,提供中国电信成都枢纽中心、成都服务器、成都主机托管、成都双线服务器等业务的一站式服务。通过各地的服务中心,我们向成都用户提供优质廉价的产品以及开放、透明、稳定、高性价比的服务,资深网络工程师在机房提供7*24小时标准级技术保障。
VB.NET 向指定(网页或软件)的输入框内输入字符,如何实现?
假如Form1有个TextBox1,双击TextBox1填入123
Public Class Form1
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick
System.Windows.Forms.SendKeys.Send("123")
End Sub
End Class
看你的VB.NET 版本了
用 My.Computer.Keyboard.SendKeys("123", True) 代替 System.Windows.Forms.SendKeys.Send("123") 也可以
原码:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick
My.Computer.Keyboard.SendKeys("123", True)
End Sub
End Class
求大神指点 vb点虐 怎么 弹出 多行输入框 inputbox("内容") 这个只能输入一行...
一共有三个地区啊,第一就是弹出来窗口上面蓝条下面的位置,显示比如“请输入”。第二就是弹出来窗口的标题了,第三个位置就是可输入部分显示的示范内容。
如inputbox("请输入生日","标题","1986-12-11")
vb点虐 中inputbox 用法
虽然下面代码也用了两个inputbox函数,但是比你的应该也要简单点,仅供参考
const
a
=
1.5
dim
v0
as
string
dim
vt
as
string
dim
t
as
long
dim
s
as
double
private
sub
form_load()
v0
=
inputbox("请输入初速度(m/s)",
"数据输入框")
text1.text
=
v0
t
=
inputbox("请输入时间(s)",
"数据输入框")
text2.text
=
t
vt
=
v0
+
a
*
t
s
=
v0
*
t
+
(1
/
2)
*
a
*
t
^
2
end
sub
private
sub
command1_click()
msgbox
"距离是"
s
end
sub
当前题目:vb点虐 输入对话框 vbs弹出输入框
当前地址:http://pwwzsj.com/article/ddggijh.html