国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學(xué)院 > 開發(fā)設(shè)計 > 正文

VB常見問題解答(1)

2019-11-18 17:33:13
字體：大 中 小
供稿：網(wǎng)友
問：在一個床體中設(shè)置了2個命令按鈕，Command1，Command2。Commamd1執(zhí)行一個費時的操作，包括調(diào)用多個過程和函數(shù)，而Command2則是終止/暫停Command1的運行，不是退出該程序，不知用VB5.0如何解決?
答：你可以采用一種變通的方法，在程序中定義一個Boolean變量，在執(zhí)行command1中的程序時監(jiān)視該變量，如果為False退出程序，在command2中加入代碼，只要點擊command2就將該變量設(shè)置為False下面是例程
DimbMarkAsBoolean
Operatingsystem.
Text1.Text=Str(I)
IfNotbMarkThen
ExitSub
EndIf
NextI'Incrementloopcounter
EndSub

PrivateSubCommand2_Click()
bMark=False
EndSub

問：有位大俠編了如下代碼:
PrivateSubcmdCalendar_Click()
DimUserDateAsDate

UserDate=CVDate(txtDate)
IffrmCalendar.GetDate(UserDate)Then
txtDate=UserDate
EndIf
EndSub

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 巢湖市| 同德县| 历史| 芦溪县| 隆德县| 乐安县| 青龙| 临夏市| 富川| 平度市| 高唐县| 昌吉市| 延庆县| 改则县| 探索| 郓城县| 遵化市| 南雄市| 顺平县| 辉南县| 内江市| 航空| 盐池县| 温泉县| 阿克陶县| 咸宁市| 万盛区| 革吉县| 安化县| 镇雄县| 温宿县| 蒙自县| 蓬溪县| 砀山县| 永清县| 密云县| 南通市| 新干县| 繁昌县| 西丰县| 甘孜|