VB里的“Private Sub Command1_Click()”是啥意思？

Posted 2023-05-13

那个横，和那个括号又是什么意思？

意思就是：当你用鼠标点击名为Command1的按钮时，就执行这一行下面的多行代码，直到遇到End Sub结束。

那个下划线（也就是“横”）左边的是控件名（Command1），右边的是事件（Click），括号里包含的是参数（空白就表示没有参数）。

扩展资料：

常用的vb语言代码

abs（num）： 返回绝对值

sgn（num）： num〉0 1; num=0 0; num〈0 -1;判断数值正负

hex（num）： 返回十六进制值 直接表示：&Hxx 最大8位

oct（num）： 返回八进制值 直接表示：&Oxx 最大8位

sqr（num）： 返回平方根 num〉0

int（num）： 取整 int（99.8）=99; int（-99.2）=100

fix（num）： 取整 fix（99.8）=99; fix（-99.2）=99

round（num，n）： 四舍五入取小数位

mid（str，起始字符，［读取长度］）：截取字符串中间子字符串

left（str，nlen）：从左边起截取nlen长度子字符串

right（str，nlen）：从右边起截取nlen长度子字符串

InStr（［起始字符，］str，查找字符串［，比较方法］）：检测是否包含子字符串 可选参数需同时选 返回起始位置

InStrRev（str，查找字符串［，起始字符］［，比较方法］）：反向检测是否包含子字符串 返回起始位置 space（n）：构造n个空格的字符串

string（n，str）：构造由n个str第一个字符组成的字符串 StrReverse（str）：反转字符串

split（str，分割字符串［，次数］［，比较方法］）：以分割字符串为分割标志将字符串转为字符数组 可选参数需同时选

参考技术A 那个下划线（也就是“横”）左边的是控件名（Command1），右边的是事件（Click），括号里包含的是参数（空白就表示没有参数）。
整个的意思就是：当你用鼠标点击名为Command1的按钮时，就执行这一行下面的多行代码，直到遇到End Sub结束本回答被提问者采纳 参考技术B Private Sub Command1_Click()是命令按钮Command1的单击（Click）事件处理程序的起始句，在其下编写实现该事件过程的程序。
VB中事件处理程序的一般格式:
Private Sub 对象名_事件名([参数表])
程序代码
End Sub
例如：命令按钮Command1的Click事件过程
Private Sub Command1_Click( )
......
End Sub
又如：窗体的Click事件过程
Private Sub Form_Click()
......
End Sub 参考技术C Command1_Click是一个整体，表示的是这个函数的名称，下划线没有特殊的含义。
在函数后面的括号里是跟的参数表，包括参数名，参数类型以及参数的传递方式，如果没有参数则可以保持为空。前面的private表示此函数是私有的，sub代表这个函数兼有子过程的特性。 参考技术D command1按钮单击事件子程序定义段
下面就是执行该事件后触发的代码段

VB之中如何将多个TEXT里的内容都同时加到1个list里面

VB之中如何将 多个TEXT里的内容都同时加到1个list里面，比如说一个通讯录里面，在多个text里输入姓名，电话等内容后，点击 确定 ，然后这些内容同时出现在一个list里面，而且是在一行里面
求解答。。。

参考技术A Private Sub Command1_Click()
List1.AddItem "姓名:" & Text1 & " 电话:" & Text2 & " 住址:" & Text3
End Sub 参考技术B 如果要在list里面增加项可以使用 list.additem text1.text 方法添加对应的项。追问

那个倒是按你说的解决了
现在还有个疑问 就是我list里一行的内容太长了 然后就显示不出来 现在怎么弄一个水平滚动条来解决这个问题？

追答

VB自带的List是没有横向滚动条的，解决办法只能是把List的宽度拉宽。或者你要是会API也可以解决。

本回答被提问者采纳