English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
所有分類

我是vb新手正在建立一資料庫系統假設現在做了一個表單,表單內放了一般客戶資料表功能鍵包含搜尋、新增、刪除等等等當我完成後執行還沒有輸入任何要搜尋值時,表格內已經列出第一筆資料如果我希望預設值是沒有資料的(表格空白)那我應該怎麼做?謝謝

2006-05-17 16:58:28 · 5 個解答 · 發問者 show 4 in 電腦與網際網路 程式設計

我看了一下...無從下手耶
而且如果我用Private Sub Form_Activate()設定所有的text清空,搜尋功能就不能使用了
有沒有辦法從表單上直接設定text的屬性阿?

2006-05-17 19:55:54 · update #1

照片的話請看這邊
http://www.wretch.cc/album/show.php?i=cloe1010&b=9&f=1055348778&p=0

2006-05-18 06:57:56 · update #2

開始執行,此時所有欄位都自動跑出第一筆資料(如網址)
其他功能是能夠執行的,程式的話就是一般撰寫的式子
比如說搜尋:
Private Sub Command1_Click() '搜尋
Dim find As String
find = InputBox$("請輸入欲查詢姓名", "姓名搜尋", "請輸入姓名") '
If find "" Then '輸入字串不為空白,且按下確定鍵
find = "姓名='" & find & "'"
Data1.Recordset.FindFirst find
End If
End Sub

2006-05-19 08:30:53 · update #3

5 個解答

如果不能從property直接將text設為空白
可以直接在程式碼裡面
設定form一開始執行text就為空白

例如:
Private Sub Form_Load()

text1.text = "" '姓名欄位
text2.text = "" '單位欄位

End Sub

2006-05-18 08:27:26 · answer #1 · answered by 小熊餅乾 1 · 0 0

到下面的網址看看吧

▶▶http://qoozoo201409150.pixnet.net/blog

2014-09-19 21:53:50 · answer #2 · answered by Anonymous · 0 0

Function fundbset(intx As Integer)
If intx = 1 Then
Data1.Enabled = True
Data1.Refresh
Else
Data1.Enabled = False
Text1.Text = ""
Text2.Text = ""
End If
End Function
下call fundbset(1)就是開啟控制項
call fundbset(0)關閉控制項且清空
所以有幾個text就補上去吧

2006-05-19 18:01:57 · answer #3 · answered by 小南 2 · 0 0

可能要請你描述清楚一點喔~~~

2006-05-18 02:49:40 補充:
可以的話, 連畫面一起貼上來參考會比較有幫助

2006-05-17 22:48:36 · answer #4 · answered by 憂鬱的貢丸湯 5 · 0 0

你應該是一啟表單就open資料庫並且顯示資料,你可以把open、顯示資料等程式碼,放在想要顯示時的事件上,就行了。

2006-05-18 22:27:48 補充:
把程式碼po上來吧

2006-05-17 19:15:27 · answer #5 · answered by 上官 5 · 0 0

fedest.com, questions and answers