2020年2月3日 19:33:01
說明:
一年多沒更新博客了,離開了之前美女如云的公司,開始了新生活。2020年,庚子鼠年,注定是要被記住的一年,科比去世,冠狀病毒。不知道接下來還會發生什么。就像2008年人們說的那樣,多難興邦,但愿如此。
最近想寫一個小工具,本來想用excel的,但是在一個表格里寫界面總覺得有點不倫不類,就想起了VB,感覺語法和VBA類似,拖控件的時候又和C#差不多。而且界面比較簡單,就一邊學習一邊做。
遇到不會的就百度查,昨天因為把一個控件當參數傳給函數,死活就是報錯,查了一下午,原來是調用函數的時候多加了個括號,真是日了狗了!讓人憤怒的語法。
寫個博客記錄下自己遇到的坑:
1. vb中圖象組合框(imagecombo)控件怎樣加載?
1、用將要在 ImageCombo 控件中使用的圖片充填 ImageList 控件。 2、單擊右鍵 ImageCombo 控件,單擊“屬性”打開“屬性頁”對話框。 3、在“通用”選項卡上,單擊“ImageList”框選擇已經充填過的ImageList 控件。 要在運行時把 ImageList 控件和 ImageCombo 控件相關聯,只需要簡單地將 ImageList 屬性設置為 ImageList 控件的名稱,如下例所示: Private Sub Form_Load() Set ImageCombo1.ImageList = ImageList1 End Sub
2. 怎樣能讓imagecombo在運行時有默認的圖片?我在使用圖像例表框,程序運行時沒有圖片在例表框上,只有點了下拉按扭才出現圖片。 請問大俠怎能使它有默認圖片?
Private Sub Form_Load() Me.ImageCombo1.ComboItems.Add , , "33", 1 Me.ImageCombo1.ComboItems.Item(1).Selected = True End Sub 這樣成馬,運行后自動顯示列表框中的一個選項
3. 代碼中字符串怎么換行?
加一個& vbCrLf &