导航:首页 > 程序命令 > 双命令VB

双命令VB

发布时间:2022-09-11 01:15:14

㈠ 在 vb 程序设计中设计一个程序,窗体中有2个文本框,2个命令按钮。

按要求在窗体上添加一个标签和一个文本框以及一个命令按钮,双击命令按钮,删除所有代码,复制如下代码到程序中
private
sub
command1_click()
if
val(text1)
mod
2
=
0
then
label1
=
"偶数"
else
label1
=
"奇数"
end
if
end
sub
private
sub
text1_keypress(keyascii
as
integer)
'判字符
if
keyascii
<
48
or
keyascii
>
57
then
keyascii
=
0
'0-9字符之外屏蔽
end
sub
若满意请及时采纳,谢谢

㈡ VB怎样把两个DOS命令连接起来

你不是已经解决了吗?命令怎么会出现多于一行的情况?
Private Sub Command1_Click()
Shell "cmd.exe /k ipconfig & netstat -an & dir", vbNormalFocus
End Sub

㈢ VB中单击一个按钮怎么执行两条命令

比如
private sub command1_click() '按钮事件
msgbox " "

debug.print " "

end sub

㈣ vb中如何实现两命令中间间隔几秒钟

两个命令? 是两个事件吧 或者是让一个事件每隔几秒执行一次? 在界面上加一个时间控件 控制它的时间间隔

㈤ 在 vb 程序设计中设计一个程序,窗体中有2个文本框,2个命令按钮。

Option ExplicitDim s(9) As Long
Private Sub Command1_Click()
Dim i As Long
For i = 1 To 9
PaiXu i
Next
Text2.Text = ""
For i = 0 To 9
Text2.Text = Text2.Text & s(i) & ","
Next
End Sub

Private Sub Form_Load()
Dim i As Long
Text1 = ""
Text2.Text = ""

Randomize
For i = 0 To 9
s(i) = Fix(Rnd() * 90 + 10)
Text1.Text = Text1.Text & s(i) & ","
Next

End Sub

Public Sub MaxS(a As Long, b As Long)
Dim c As Long
If b < a Then
c = a
a = b
b = c
End If
End Sub

Public Sub PaiXu(n As Long)
Dim i As Long
DoEvents
If n < 0 Or n > 8 Then Exit Sub
MaxS s(n), s(n + 1)
PaiXu n - 1
End Sub

㈥ 在VB中,怎样使一个按钮有两种命令

一个按钮何止只能实现两种命令:
1.
通过改变caption属性可实现多种命令,即每次按下都去改变Caption,根据不同Caption执行不同的命令;
2.
根据MouseMove、Mousedown、MouseUp等事件及Shift值可实现至少21种不同的操作;
3.
定义一个全局变量,每次按下按钮后使此全局变量递增,再根据其值进行不同的操作;
4.
其他事件的响应操作,可参照VB中CODE模块右上方的事件列表框的提示;
5.
不同的KEY操作和mouse操作类似,也能实现很多不同的命令。

㈦ VB如何单机一次按钮执行命令,双击执行另一个命令

单击和双击是存在逻辑上的冲突关系的,因为从原理上来说双击是由“两次短时间内的单击”组成的,因此产生双击事件时,必然会先产生单击事件,而电脑在接收到单击消息时,却无法立即判断这次单击是“双击的第一次单击”还是“真正的单击”?
这也就是为什么VB的按钮控件只有单击事件(Click)却没有双击事件(DblClick)的原因!因为两者是无法共存的!虽然通过软件方式可以模拟出双击事件,但却无法避免上述的逻辑冲突,单击和双击只能二选一。

㈧ VB脚本 关于双重条件执行命令

IfColor 492,210,00FFFF,0
IfColor 609,493,d0d0d0,0
Delay 2000
MoveTo 516,625
Delay 2000
LeftClick 1
Delay 8000
else
MoveTo 609,493
LeftClick 1
Delay 60000
KeyPress 27,1
endif
Else
MoveTo 609,493
LeftClick 1
Delay 60000
KeyPress 27,1
EndIf

㈨ vb 命令大全

VB 可用指令、函数

A
Abs 求绝对值 ActiveControl 得到焦点的对象
ActiveForm 得到焦点的表单 Array 指定数组
App 得知程序信息 AppActivate 激活执行中的应用程序
Asc 求字符的内码 AscB 求字符的ASCII
AscW 求字符的UniCode Atn 求Tan-1

B
Beep 发出预设的警示声

C
Call 调用子程序 Calendar 选择月历
Choose 取出一列值的某个值 CBool 数值转成布尔数
CByte 数值转成位元格式 CCur 数值转成货币格式
CDate 数据转成时间 CDbl 数值转成双精度浮点数
CDec 数据转成十进数 ChDir 改变目前路径缓充的路径
ChDrive 改变目前磁盘缓充的磁盘 Chr 由内码求得一字符
ChrB 由ASCII求得一字符 ChrW 由UniCode求得一字符
CInt 数据转成Integer CLng 数据转成Long
Command 读出程序的参数 Const 定义常数
Cos COS CSng 数值转成单精度浮点数
CurDir 得知目前路径缓充的路径 CVar 数值转成可变变量

D
Date 得到目前电脑的时间 Date$ 得到目前电脑时间字符串
DateAdd 日期加法得日期 DateDiff 日期相减得数值
DatePart 日期部份资讯 DateSerial 字符串转日期
DateValue 数字转日期 Day 得知日期变量内是几号
DDB 折旧的计算 DeleteSetting 删除系统登录内的数据
Dir 得知目前路径内的文件名 DoEvents 闲置函数

E
End 结束程序 Environ 取得环境变量的数据
EOF 某个文件缓冲的指标是否到档尾 Erase 重新初始化数组
Err 错误资讯 Error 错误代码信息
Exp 得到自然对数

F
Fix 去除小数 FileCopy To 复制文件
FileAttr 文件开启模式 FileDateTime 文件存档日期
FileLen 文件长度 Filter 筛选数组

Format 数据格式化输出 FreeFile 空的文件编号
FV 求得定期、定额支付且固定利率下之年金的值

G
GetAllSetting 得到所有系统登录的资讯 GetAttr 得知文件属性
GetSetting 得到系统登录的资讯

H
Hex 将数值转成16进数表示的字符串 Hour 得知日期变量内是几时

I
If . Then . Else 判断结构 IMEStatus 得知IME输入法状态
InStr 寻找字符串里的字符串 InStrB 寻找字符串里的ASCII
IntStrRev 由字符串右边开始寻找字符串里的字符串
Int 取整数

J
Join 将数组数据加入分隔字符后组合成一新字符串

K
Kill 删除文件

L
LBound 得知数组最小起始范围 LCase 字符串转小写
Left 截取字符串左边几个字 Len 得知字符串的字数
LenB 得知变量占用记忆体几个Byte LoadPicture 载入图形
Log 求对数值 LSet 字符串向左对齐
LTrim 移除字符串最左边的空白字符

M
Mid 截取字符串里某些字符串 Minute 得知日期变量内是几分
MkDir 建立新的数据颊 Month 得知日期变量内是第几月

N
Name As 更改文件名 Now 得知目前点脑的日期与时间
O Oct 字符转成八进制的字符串 Option VB内部一些选项设定

P
PopupMenu 跳出菜单 Print 打印数据

Q
QBColor 设定颜色(16色)

R
Randomize 随机数初始化声明 Replace 取代字符串中某些字符串 VB6提供

RGB 设定颜色(255*255*255色) RmDir 移除数据颊
Rnd 得到一个随机数 RSet 字符串向右对齐
RTrim 去除字符串最右边的空白字符

S
SavePicture 储存图形 Screen 得知屏幕简易资讯
Second 得知日期变量内是几秒 SetAttr 设定文件属性
Sgn 得知是整数还是负数v Shell 执行外部程序
Sin 得知Sin Space 填入数个空白字符
Split 以某字符串将字符串拆解成数组 VB6提供
Sqr 求平方根
Str 数值转字符串 StrComp 比较字符串
StrConv 改变字符串型态 String 设定一个重覆的字符串
StrReverse 字符串反转 VB6提供

T
Tab 打印n个制表符 Tan 得知Tan
Time 得知、设定电脑时间 Time$ 得知、设定时间字符串
Timer 得知今天电脑总秒数 TimeSerial 字符串转时间
TimeValue 数字转时间 Trim 去除字符串首尾的空白字符
TypeName 得知变量类别的名称

U
UBound 得知数组的最值 UCase 字符串转大写

V
Val 将字符串转成数字 VarType 得知变量的类型

W
WeekDay 得知日期变量内是星期几 WeekdayName 将WeekDay传回值改成文字显示

Y
Year 得知日期变量内是几年

㈩ VB怎样执行2条连续的CMD命令

批处理有中自己的连接符 &

shell "cmd /c telnet 12.34.56.78 & ping 127.1 & ipconfig"

阅读全文

与双命令VB相关的资料

热点内容
myeclipselinux破解版 浏览:416
批处理命令语法不正确 浏览:888
pdf合并成一个pdf在线 浏览:383
柱加密区构造要求 浏览:514
地板木龙骨标准跟加密区别 浏览:150
解压放松的好地方河南 浏览:965
搜狗怎么移动到文件夹 浏览:617
文件自动选择到文件夹 浏览:794
赠送的app怎么在ipad下载 浏览:508
颈椎解压后神经恢复 浏览:849
怎么看app订阅扣费 浏览:314
linux系统的负载均衡 浏览:419
遇到挫折解压视频 浏览:778
什么指令看服务器运行负载 浏览:84
因硕智能门锁卡片是加密的么 浏览:336
为什么会服务器不可用 浏览:290
wow宏命令设置 浏览:264
解压神器一张纸折叠魔术球 浏览:23
怎么样可以取消加密软件oppo 浏览:580
屏幕共享源码哪家比较不错 浏览:665