VB tooltiptext换行

为什么别人做的程序，tooltiptext可以换行，里面的内容是从access里面提取的。这个怎么实现的啊提取数据我会Adodc1.CommandType=adCmdTe... 为什么别人做的程序，tooltiptext可以换行，里面的内容是从access里面提取的。

这个怎么实现的啊
提取数据我会
Adodc1.CommandType = adCmdText
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\aaa.mdb"
Adodc1.RecordSource = "select * from HeroData"
Adodc1.Refresh
然后可以用Adodc1.Recordset.Fields(4).Value，把字段的内容赋值给tooltiptext……求大神指教展开

 我来答

若以下回答无法解决问题，邀请你更新回答

1个回答

#合辑# 机票是越早买越便宜吗？

百度网友bdb9803
2014-09-25 · TA获得超过1.1万个赞

知道大有可为答主

回答量：1.1万

采纳率：53%

帮助的人：1亿

我也去答题访问个人页

关注

展开全部

从access里面提取数据会吗？这个会了就简单了。

更多追问追答

追问

求大神指教

追答

Private Sub Form_Load()
    Dim x As String
    Adodc1.CommandType = adCmdText
   Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\aaa.mdb"
   Adodc1.RecordSource = "select * from HeroData"
   Adodc1.Refresh
    Set m_objTooltip = New CToolTip
    With m_objTooltip
      .Create Me.hwnd
      .MaxWidth = 400 ' In Pixels
      .VisibleTime = 2000 ' In Milliseconds, 2000 = 2 seconds
      .DelayTime = 500 ' In Milliseconds
      x = Adodc1.Recordset.Fields(4).Value
      .AddControl Picture1, x
      x = Adodc1.Recordset.Fields(5).Value
      .AddControl Picture2, x
      '...............
    End With

本回答被提问者采纳

已赞过 已踩过<

评论收起

1条折叠回答

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

VB tooltiptext换行

为你推荐：