㈠ 在 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"