VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2007/01/30(Tue) 11:58 |
| 投稿者 | ： POINT |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^9: フレックスグリッド |
ええと皆さんありがとうございます。
おかげさまで幅の設定で隠すことはうまく行きました。
現在こんな感じでしています↓
チョット考え中だったため返信が遅れてしまいました。
文字が入力されている場合は1づつ加算、されていない場合は
0.01づつ加算って設定が難しくて考えておりました。
う〜む・・
Dim x As Integer
Dim y As Integer
Dim z As Integer
With grd_一覧
For x = .FixedRows To .Rows - 1
If Len(.TextMatrix(x, 0)) > 0 Then
.TextMatrix(x, 2) = x
Else
.TextMatrix(x, 2) = x + 0.01
End If
Next
End With
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）