コラムがクリックされるとWM_NOTIFYメッセージの形で通知が来るので、
そこから情報を得ます。具体的には以下のような感じです。(^_^;
#const WS_CHILD	$40000000
#const WS_VISIBLE	$10000000
#const LVS_REPORT	$00000001
#const LVCF_TEXT	$00000004
#const LVCF_WIDTH	$00000002
#const LVM_INSERTCOLUMN	$0000101B
#const WM_NOTIFY	$0000004E
#const LVN_COLUMNCLICK	$FFFFFF94
	// リストビューを作成
	winobj "SysListView32", "",, WS_CHILD | WS_VISIBLE | LVS_REPORT, ginfo(12), ginfo(13)
	wList = objinfo(stat, 2)
	
	// コラムを追加
	dim lvc, 6	// LVCOLUMN structure
	lvc = LVCF_TEXT | LVCF_WIDTH
	lvc(2) = 100
	repeat 6
		s = "column"+ cnt
		lvc(3) = varptr(s), strlen(s)
		sendmsg wList, LVM_INSERTCOLUMN, cnt, varptr(lvc)
	loop
	
	oncmd gosub *on_notify, WM_NOTIFY
	stop
*on_notify
	dupptr nmhdr, lparam, 12, 4	// NMHDR structure
	
	// 通知コードがコラムのクリックなら...
	if (nmhdr = wList) & (nmhdr(2) = LVN_COLUMNCLICK) {
		dupptr nmlv, lparam, 40, 4	// NMLISTVIEW structure
		// クリックされたコラムのインデックスを見る
		title "Column index = "+ nmlv(4)
	}
	return