vb中msflexgrid控制項的使用細則(收集)
>> 將文字賦值給msflexgrid的單元格
msflexgrid.textmatrix(3,1)=」hello」
>> 在msflexgrid控制項單元格中插入背景圖形
set msflexgrid.cellpicture=loadpicture(「c:/temp/1.bmp」)
>>選中某個單元
msflexgrid.row=1
msflexgrid.col=1
>>用粗體格式化當前選中單元
msflexgrid.cellfontbold=true
>> 新增新的一行
使用additem方法,用tab字元分開不同單元格的內容
dim row as string
row=」aaa」&vbtab&」bbb」
msflexfrid1.additem row
>>怎樣來實現msflexgrid控制項單數行背景為白色,雙數的行背景為藍色?
dim i as integer
with msflexgrid1
.allowbigselection = true 』 設定網格樣式
.fillstyle = flexfillrepeat
for i = 0 to .rows - 1
.row = i: .col = .fixedcols
.colsel = .cols() - .fixedcols - 1
if i mod 2 = 0 then
.cellbackcolor = &hc0c0c0 』 淺灰
else
.cellbackcolor = vbblue 』 蘭色
end if
next i
end with
>> msflexgrid控制項如何移到最後一行
msflexgrid1.toprow = msflexgrid1.rows – 1
>>如何判斷msflexgrid有無滾動條
declare function getscrollrange lib "user32" (byval hwnd as long, byval nbar as long, lpminpos as long, lpmaxpos as long) as long
public const sb_horz = &h0
public const sb_vert = &h1
public function vsscroll(mshgrid as mshflexgrid) as boolean 』判斷水平滾動條的可見性
dim i as long
vsscroll = false
i = getscrollrange(mshgrid.hwnd, sb_horz, lpminpos, lpmaxpos)
if lpmaxpos <> lpminpos then vsscroll = true
end function
public function hescroll(mshgrid as mshflexgrid) as boolean 』判斷垂直滾動條的可見性
dim i as long
hescroll = false
i = getscrollrange(mshgrid.hwnd, sb_vert, lpminpos, lpmaxpos)
if lpmaxpos <> lpminpos then hescroll = true
end function
>>程式執行時,想動態增加msflexgrid的列數
在第2列後插入一列:
private sub form_load()
me.mshflexgrid1.cols = 5
mshflexgrid1.rows = 2
for i = 0 to me.mshflexgrid1.cols - 1
me.mshflexgrid1.textmatrix(0, i) = i
me.mshflexgrid1.textmatrix(1, i) = i
next
end sub
private sub command1_click()
me.mshflexgrid1.cols = me.mshflexgrid1.cols + 1
me.mshflexgrid1.colposition(5) = 3
end sub
>> 請教msflexgrid中的對齊功能的使用
設定msflexgrid1.colalignment(index)=n
>>得到msflexgrid控制項中當前選中的一行
msflexgrid1.row sel就是當前選中行
>> 如何通過**調節列寬度
msflexgrid1.colwidth(i)=4000
VB版機房收費 MSFlexGrid控制項
一 在機房中遇到的問題 問題一 用msflexgrid控制項的時候,設定click事件以達到查詢的目的,並且將查詢內容顯示在控制項中,需要刪除上一次查詢的內容,有兩種方法。第一種方法是,在第二次顯示內容的時候先判斷控制項的第二行是否有內容,有的話則刪除,用迴圈語句來判斷,直到第二行 除了第一行的表頭...
MSFlexGrid控制項
在做學生管理系統時在查詢這個模組中,將查詢的內容顯示給使用者。用的是msflexgrid控制項。首先在使用前在工程 部件進行控制項的新增。新增的是microsofy flexgrid control 6.0。功能 msflexgrid控制項可以顯示網格資料,也可以對其進行操作。提供了靈活的網路排序 ...
MFC 使用MSFlexGrid6 0控制項經驗
在做專案的時候使用到了額外引用了msflexgrid控制項,因為專案是unicode環境,支援多語言,其中包括中文 簡體,gb2312 和中文 繁體,big5 winxp作業系統語言是簡體中文時,軟體選擇不同的語言環境,msflexgrid上的控制項的語言能正常顯示 winxp作業系統選擇語言為正體...