[求助]如何设置自动行高，自动换行？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何设置自动行高，自动换行？

共有2937人关注过本帖树形打印复制链接主题：[求助]如何设置自动行高，自动换行？

zto001

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：六尾狐帖子：1465 积分：10397 威望：0 精华：0 注册：2018/10/16 11:42:00

[求助]如何设置自动行高，自动换行？ 发帖心情

Post By：2021/4/16 13:32:00 [显示全部帖子]

[求助]如何设置自动行高，自动换行？

我有一个窗口表，如何设置自动行高以及自动换行？

zto001

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：六尾狐帖子：1465 积分：10397 威望：0 精华：0 注册：2018/10/16 11:42:00

Post By：2021/4/16 13:34:00 [显示全部帖子]

是按照某一列内容设置行高。

zto001

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：六尾狐帖子：1465 积分：10397 威望：0 精华：0 注册：2018/10/16 11:42:00

Post By：2021/4/16 14:19:00 [显示全部帖子]

Dim r As Row = Tables("表B").Current

Dim g As Graphics = basemainform.CreateGraphics

Dim size As Object

size = g.MeasureString(r(Tables("表B").ColSel), Tables("表B").Font, Tables("表B").grid.Cols(Tables("表B").ColSel+1).WidthDisplay)

Tables("表B").grid.Rows(r.Index + 1).Height = size.height+5

这个我没怎么看懂，执行后，有些并没有改变行高

zto001

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：六尾狐帖子：1465 积分：10397 威望：0 精华：0 注册：2018/10/16 11:42:00

Post By：2021/4/18 16:10:00 [显示全部帖子]

怎么让单元格内容自动换行显示？如果在一行，显示到后面看不到了，不会另起一行显示

主题：[求助]如何设置自动行高，自动换行？