Board logo

標題: [發問] VB 按鈕取TEXTBOX 問題。 [打印本頁]
作者: whoislee    時間: 2018-9-8 16:38     標題: VB 按鈕取TEXTBOX 問題。

我想在VB弄一個TEXTBOX,當我輸入了名稱後,按下按鈕他就會開我為這個檔案位置定義了的名稱的檔案出來,例如我設定 123為一個檔案的位置,當我在TEXTBOX中輸入123後再按下按鈕,他會打開我把他設定了123所存在的檔案出來,而我有很多檔案的位置需要設定,請問如何操作,本人是新手,希望能有高手指教一下。

查了一下資料,要在BUTTON內取Button裡面先去取出TextBox1.Caption的值,再用用Switch Case的方法去開檔案,但本人由於是沒有經驗,所以暫不知道如果操作,請指教一下,跪謝。
作者: faye59    時間: 2018-9-10 05:08

回復 1# whoislee


   
請先設計一個Form
在裡面設計一個TextBox及Button
TextBox=指定的檔案名稱
Button=確認程序執行
TextBox可以在屬性中修改name
一般依照TextBox流水編號建置
如第一個建置的TextBox為TextBox1
第二個建置的TextBox為TextBox2
程序中要提取出值寫為
  1. TextBox1.Text
複製代碼
如果name修改為ID程序中寫為
  1. ID.Text
複製代碼
指定要開啟的檔案類型宣告Object
  1. CreateObject(class,[servername])
複製代碼
開啟Excel範例:(片段程序)
  1. If name.Text = "" Then
  2. MsgBox("請輸入檔名", , "狀態訊息")
  3. Exit Sub
  4. End If
  5. Dim WB, XL As Object
  6. XL = CreateObject("Excel.Application")
  7. XL.Visible = False
  8. WB = XL.Workbooks.Open("\\路徑\ & name.Text & ".xlsx")
複製代碼




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)