कैसे कई पंक्तियों

Question

मैं अपने कोड में इस डालने बयान का उपयोग कर रहा VBA एक्सेल में करने के लिए लंबी स्ट्रिंग को तोड़ने के लिए, लेकिन मैं एक से अधिक पंक्ति

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & " _ 
,'" & txtContractStartDate.Value & "' _ 
,'" & txtSeatNo.Value & "' _ 
,'" & txtFloor.Value & "','" & txtLeaves.Value & "')" 

यह त्रुटि दे रहा है "में तोड़ने में सक्षम नहीं कर रहा हूँ बयान का अपेक्षित अंत "। कृपया मदद करें।

Answer 1

आप एक स्ट्रिंग के अंदर वीबी लाइन-निरंतरता चरित्र का उपयोग नहीं कर सकते हैं।

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & _ 
"','" & txtContractStartDate.Value & _ 
"','" & txtSeatNo.Value & _ 
"','" & txtFloor.Value & "','" & txtLeaves.Value & "')" 

Answer 2

यदि एकाधिक लाइनों की लंबी स्ट्रिंग आपको भ्रमित करती है। फिर आप mz-tools addin इंस्टॉल कर सकते हैं जो एक फ्रीवेयर है और इसमें उपयोगिता है जो आपके लिए रेखा को विभाजित करती है।

Download Mz-tools

अपने स्ट्रिंग की तरह नीचे

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & "','" & txtContractStartDate.Value & "','" & txtSeatNo.Value & "','" & txtFloor.Value & "','" & txtLeaves.Value & "')" 

सीधे शब्दों में स्ट्रिंग का चयन लग रहा है> सही VBA आईडीई पर क्लिक करें> चुनें MZ-उपकरण> स्प्लिट लाइन्स

Answer 3

आप

हो सकता है कि आप अपनी स्ट्रिंग को कई चरणों में बना सकें, थोड़ा अनावश्यक लेकिन यह कोड को पठनीय रखने और स्वच्छता बनाए रखने के दौरान रखता है डिबगिंग या संपादन

SqlQueryString = "Insert into Employee values(" 
SqlQueryString = SqlQueryString & txtEmployeeNo.Value & " ," 
SqlQueryString = SqlQueryString & " '" & txtEmployeeNo.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtContractStartDate.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtSeatNo.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtContractStartDate.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtSeatNo.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtFloor.Value & "'," 
SqlQueryString = SqlQueryString & " '" & txtLeaves.Value & "')"