用户表单多页面控制 - 页面标题左对齐

Question

我在网上到处搜索，如果可以将多页控件（在用户表单上）页面标题对齐到左侧，则无法找到结果（见下图）。

我希望所有页面标题都与左边对齐 - 现在它们在中心（视觉上）对齐时看起来并不是这样。

由于

Answer 1

在属性页面上将 TabOrientation设置为2 - frmTabOrientationOnLeft

我不喜欢标签的外观（第二表格）所以我将样式更改为1- frmTabStyleButtons 。您也可以从此处更改选项卡高度和宽度。

我想念这个问题。标签标题没有文字对齐方式。但这将有效地让你看起来左对齐：

• 使用等宽字体（Courier，Courier New，Lucida Console，Monaco）
• 在每个标题的末尾添加多余的空格，直到每个标题具有相同数量的字符。

Answer 2

您可以在字幕字符串末尾使用vbTab执行此操作。在我的示例中，我使用了TabFixedWidth属性值为90.对于第3页的较短标题，需要插入vbTab两次。对于第7页较长的标题，不需要vbTab。

mpgBid.Pages.Item("pg1").Caption = "1 Overview" & vbTab
mpgBid.Pages.Item("pg2").Caption = "2 Tables" & vbTab
mpgBid.Pages.Item("pg3").Caption = "3 Forms" & vbTab & vbTab
mpgBid.Pages.Item("pg4").Caption = "4 Databases" & vbTab
mpgBid.Pages.Item("pg5").Caption = "5 Reports" & vbTab
mpgBid.Pages.Item("pg6").Caption = "6 Examples" & vbTab
mpgBid.Pages.Item("pg7").Caption = "7 More Examples"

screenshot