1樓：匿名使用者
一樣的地方可以設定成函式。
private function x()
(一樣的內容局譁)
end function
然後在需要的地方進行呼叫就可以了。
但是如果只有一句兩句建議枝桐就不要使用自定義函式了，直接用猛臘坦**好了。
2樓：網友
可改成如下**。
if 3+2=5 then
msgbox"對"
select case index
case 1
case 2
case 3
end select
else msg box"鉛亂錯"
select case index
case 1
"槐答檔22222222"
case 2
case 3
"舉悔66666666"
end select
end if
3樓：老人與孩v動手洞腦
private sub command1_click(index as integer)
if 3+2=5 then
msgbox"對"
select case index
case 1
if 3+2<>5 then
msg box"仔纖錯"盯慶。
"22222222"凱戚握。
end if
case 2
end select
end sub
4樓：匿名使用者
把**發一部分上來，我幫你優化。
vb使用data控制元件引用ACCESS問題
伱是不是用 microsoft office access 做的資料庫？這個版本的access vb6.0不能識別 所以伱要在伱的vb6.0裡面運用 add in 也就是外接程式來建立資料庫 在外接程式 add in 中選 視覺化資料管理器 visdata 點 檔案 file 新建 new micr...
關於vb6 0 text控制元件問題
你可以建立一個順序檔案。開啟時從順序檔案裡面讀。沒有這個檔案時我們設個預設值。dat 檔案的讀取在form的 load中讀取。修改後又儲存到順序檔案裡面在text的change裡面儲存 這樣就有你要的效果了。vb 6.0 text控制元件事件 因為文字框先相應了你的keypress事件，所以先響應了...
VB如何使用time控制元件
timer 控制元件 最主要的就是enabled屬性，和interval屬性，下面有詳細介紹 通過引發 timer 事件，timer 控制元件可以有規律地隔一段時間執行一次 語法。timer 說明。timer 控制元件用於背景程序中，它是不可見的。以下是他的屬性 enabled 屬性。返回或設定一個...