新聞中心
vb輸出語句問題
你這個是VB.NET環(huán)境,Print 語句與VB6里的功能已經(jīng)不一樣了。
目前創(chuàng)新互聯(lián)建站已為上1000+的企業(yè)提供了網(wǎng)站建設(shè)、域名、雅安服務(wù)器托管、網(wǎng)站托管維護、企業(yè)網(wǎng)站設(shè)計、青秀網(wǎng)站維護等服務(wù),公司將堅持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長,共同發(fā)展。
解決的方法可以兩種:
方法一:
把 Print(a) 改成 msgbox(a)
方法二:
在窗體上添加一個標(biāo)簽控件Label1
把 Print(a) 改成 Label1.Text = a
vb.net 循環(huán)語句中循環(huán)一次輸出一個值
把 TextBox2.Text = Chr(Val("H" B))
改為
TextBox2.Text =TextBox2.Text Chr(Val("H" B)) VbCrlf
試試?而且 TextBox2 的MultyLine屬性要事先改為True
或者是:
TextBox2.Text =TextBox2.Text Chr(Val("H" B)) “ ”
VB.net如何輸出代數(shù)式,比如計算帶參數(shù)的一元二次方程,請寫清程序
額,我可以用vb6.0的語句回答您,給您參考,就是不知道您可以轉(zhuǎn)化成.net語句與否。
'添加text1,text2,text3用于記錄a,b,c的值
Private?Sub?Command1_Click()
On?Error?GoTo?check
Dim?a,?b,?c,?result1,?result2
a?=?Text1.Text
b?=?Text2.Text
c?=?Text3.Text
result1?=?(((-1)?*?b)?+?Sqr(b?^?2?-?4?*?a?*?c))?/?2?*?a
result2?=?(((-1)?*?b)?-?Sqr(b?^?2?-?4?*?a?*?c))?/?2?*?a
MsgBox?"x1=?"??result1??"??x2=?"??result2
Exit?Sub
check:
MsgBox?"error!please?check?your?number!"
End?Sub
vb.net 如何實現(xiàn)輸出一串字符串中的所有字符以及每個字符的出現(xiàn)次數(shù)?
使用一個單重的循環(huán)掃描這個字符串中的所有字符,對每一個字符的出現(xiàn)次數(shù)進行統(tǒng)計,最后輸出每個字符的出現(xiàn)次數(shù)。
Private Sub Command1_Click()
s = InputBox("請輸入一個英文字符串:")
Dim a(128) As Integer
For i = 1 To Len(s)
t = Asc(Mid(s, i, 1))
a(t) = a(t) + 1
Next i
For i = 1 To 127
If a(i) 0 Then Print Chr(i); ":"; a(i)
Next i
End Sub
vb.net ByVal 值的輸出
事實上,在B =陣列(...)數(shù)組參數(shù)短語的主要問題是2,5,3,所以這些整數(shù)數(shù)組()函數(shù)的返回值類型的一個變種,而不是塑料。在指定的子數(shù)組參數(shù)的定義是一個整數(shù),導(dǎo)致類型不匹配錯誤。
使用下面的方法解決這個問題:
定義函數(shù)的參數(shù)類型,
。私人小組代碼(1為ByRef(帶),作為字符串BYVAL myStr中)
你提到的原因,后的ByRef參數(shù)類型不匹配,因為默認(rèn)情況下是作為一個參數(shù)傳遞的函數(shù)地址,你的第二個參數(shù)myStr的前面不限制轉(zhuǎn)讓其參數(shù),系統(tǒng),與前一個()相同的地址,已成為通過輕輕是一個錯誤,只要在前面加1 BYVAL。
后的代碼如下(調(diào)試通過):
選項??基地1
。私人小組代碼(1為ByRef(帶),作為字符串BYVAL myStr中)
??作為字符串昏暗的通道,C1為字符串
?N = UBound的(一) - LEN(myStr中)
?如果N 0?
???myStr的= myStr的字符串$(“*”)
??結(jié)束如果
??CH = myStr的
??對于k = 1,UBound的(一)
???C1 = MID(myStr中,K,1)
???N = A(K)
???中$(CH,N)= C1
K-?
??myStr的= CH
?打印myStr的?
END SUB
私人小組Command1_Click()
昏暗的b()
B =陣列(2,5,3,7,6,1,4)
MYNAME =“克萊門特”
調(diào)用的代碼(二MYNAME)
END SUB
分享標(biāo)題:vbnet輸出語句 vbnet字符串函數(shù)
文章分享:http://www.dlmjj.cn/article/hhcjij.html