海峽增加了額外的空間

Dim i As Integer 

i = Int((8 - 2 + 1) * Rnd + 2) 

Dim rg As String 
Dim con As String 

con = Str(i) 

rg = "B" & con 
MsgBox (rg)

這將返回「B 4」而不是「B4人知道這個問題海峽增加了額外的空間

來源

2013-08-01 user2642643

修剪避免任何標題/結束空白空間相關問題（con = Trim（Str（i）））。我總是在處理字符串時使用它。你的問題在下面得到解答，這只是一個通用的建議:) – varocarbas

從幫助頁面Str()

當數轉換爲字符串，領先的空間總是保留爲數字的符號如果數字是正數，則返回的字符串包含前導空格並且隱含加號

來源

2013-08-01 15:08:14

Str()爲標誌留下空間。

由於Excel有隱式轉換，你可以使用rg = "B" & i並獲得一系列你想要

來源

2013-08-01 15:08:36 SeanC

的Excel Concatonate基礎上，INT的字符串。

這裏有一個應將描述

https://stackoverflow.com/a/10004244/1504882

來源

2013-08-01 15:09:15 Elias

使用format（）函數...

con = format(i) 

rg = "B" & con 
MsgBox (rg)

來源

2013-08-01 15:15:49 matzone

使用裁剪功能刪除前導空間下：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
Dim i As Integer 

i = Int((8 - 2 + 1) * Rnd + 2) 

Dim rg As String 
Dim con As String 

con = Str(i) 

rg = "B" & Trim(con) 
MsgBox (rg) 
End Sub

來源

2013-08-01 15:19:43 rangan

使用Cstr（i）而不是Str（i） - Cstr不會添加空間

來源

2013-08-01 15:52:02

+1，在各種建議中，這是最直接的。 –

海峽增加了額外的空間

回答

相關問題