VB裡怎樣實現點選命令按鈕就使Filelistbox裡的檔案被選中

2022-02-28 02:10:17 字數 1463 閱讀 9132

1樓:匿名使用者

file1.listindex = 0

filelistbox 是排序的 無法自定義位置

vb中怎麼實現點選一次一個命令按鈕使第一個文字框輸出一個東西,然後過幾秒第二個文字框再輸出一個東西?

2樓:閃星

知道菌!哼哼!

option explicit

private sub command1_click()text1.text = "我是一個東西"

'2秒後顯示另外一個東西

timer1.interval = 2000timer1.enabled = trueend sub

private sub timer1_timer()text2.text = "我是另外一個東西"

timer1.enabled = falseend sub

另附工程**

如何做單擊vb的一個命令按鈕開啟某一個檔案?

3樓:匿名使用者

用cmd 開啟檔案:

shell "cmd.exe /c start "+chr(34)+chr(34)+" "+chr(34)+"你的檔案路徑"+chr(34),vbhide

有效防止shell打不開除exe以外格式的程式。

4樓:卡卡少佐

做程式的是不是都太複雜了,是不是可以直接shell「貼上exe程式源地址」,是不是就好了,那麼複雜,但是移動了原始檔,這個命令就失效了

5樓:匿名使用者

private declare function shellexecute lib "shell32.dll" alias "shellexecutea" (byval hwnd as long, byval lpoperation as string, byval lpfile as string, byval lpparameters as string, byval lpdirectory as string, byval nshowcmd as long) as long

private const sw_shownormal = 1開啟:shellexecute 0, "open", "c:\1.

txt", "", vbnullstring, sw_shownormal

"c:\1.txt", ""

分別為檔案路徑和執行引數(一般是exe)

vb中,點選命令按鈕,怎麼彈出對話方塊,用來選取檔案路徑

6樓:匿名使用者

新增commondialog控制元件

private sub command1_click()commondialog1.showopentext1.text = commondialog1.filename

end sub

用通用對話方塊,**參考

怎麼在VB的標籤裡實現換行,在VB中怎麼怎麼設定label自動換行

有兩種方式復 制1 編寫 實現 換行 bai label1.caption 第一行內容du vbcrlf 第二行內容 vbcrlf就是zhi一個回車符,dao實現換行 2 編輯label的屬性,實現自動換行 將autosize 設定為false,將wordwrap設定為true,此時在caption...

怎樣實現excel自動按段落輸入

整體思路 先將資料轉換為txt檔案,再將其匯入到excel中。具體步驟如下 先將word文件另存為txt檔案,開啟此txt檔案,用查詢替換功能將多餘的空格替換去掉。然後在excel中,單擊選單 資料 匯入外部資料 匯入資料 在彈出的 選取資料來源 對話方塊中,檔案型別選 文字檔案 找到剛才轉換的tx...

怎樣在VB中實現時間的到計時呢

dim t,m,s as long private sub command1 click if val text1.text 1 then msgbox 輸入定時時間 else m text1.text s 0 t m 60 timer1.interval 1000 end if end sub p...