VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2007/01/30(Tue) 13:34
投稿者ぶぶ
Eメール
URL
タイトルRe^10: フレックスグリッド

> ええと皆さんありがとうございます。
> おかげさまで幅の設定で隠すことはうまく行きました。
> 現在こんな感じでしています↓
> チョット考え中だったため返信が遅れてしまいました。
>  
> 文字が入力されている場合は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
中に設定する内容はPOINTさんが思っている値になってますか?
デバッグで確かめてみてください。
ステップ実行して、確認してくださいね。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -