將值和文本添加到標籤 - VBA

我需要在VBA中放置一個變量和一些文本（本例中爲「％」）以標記。下面的代碼不起作用：將值和文本添加到標籤 - VBA

Private Sub Form_Load() 

    Dim CurrentValue As String 
    CurrentValue = DLookup("AvgOfutil_MPS", "AverageDescending", "[dates]") 
    Me.Label34.Caption = Round(CDbl(CurrentValue), 2) + "%" 

End Sub

來源

2017-01-03 Bart Ch.

不以何種方式工作？ 'CurrentValue'的價值是什麼？（總是使用'＆'而不是'+'來進行字符串連接） –

（總是使用＆不+字符串連接） - 完美工作，謝謝！ –

試試下面

Private Sub Form_Load() 

    Dim CurrentValue As String 
    CurrentValue = DLookup("AvgOfutil_MPS", "AverageDescending", "[dates]") 
    Me.Label34.Caption = Cstr(Round(CDbl(CurrentValue), 2)) & "%" 

End Sub

來源

2017-01-03 13:17:39

我在想你定義一個字符串，然後根據該字符串計算一個Double。你爲什麼不馬上使用Double？

對於你的問題，正如Alex K.所說：嘗試「&」來連接。

來源

2017-01-03 10:21:54 snibbo

我以爲DLookup會返回String值，所以我可以將它轉換爲數字。在我的情況下，CurrentValue是這樣的21.2354325。我會嘗試使用雙重馬上。順便說一句「＆」幫助:) –

將值和文本添加到標籤 - VBA

回答

相關問題