十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專業(yè)推廣+無(wú)憂售后,網(wǎng)站問(wèn)題一站解決
你這個(gè)是VB.NET環(huán)境,Print 語(yǔ)句與VB6里的功能已經(jīng)不一樣了。
我們提供的服務(wù)有:網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)、微信公眾號(hào)開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、宕昌ssl等。為上千余家企事業(yè)單位解決了網(wǎng)站和推廣的問(wèn)題。提供周到的售前咨詢和貼心的售后服務(wù),是有科學(xué)管理、有技術(shù)的宕昌網(wǎng)站制作公司
解決的方法可以兩種:
方法一:
把 Print(a) 改成 msgbox(a)
方法二:
在窗體上添加一個(gè)標(biāo)簽控件Label1
把 Print(a) 改成 Label1.Text = a
兩種方法:
圖片框上蓋個(gè)Label 向其輸入內(nèi)容。
載入圖片,通過(guò)內(nèi)存直接?DrawImage繪制個(gè)新圖,然后在圖上蓋文字。最后賦值給圖片框。
VB6的print 實(shí)質(zhì)是向圖片框打印文字,不管有無(wú)圖都能在上面Print. 考慮速度和實(shí)現(xiàn)難度問(wèn)題,如果純粹顯示,最好直接蓋個(gè)Label最簡(jiǎn)單。第二種方法 需要考慮文字大小、顏色、坐標(biāo)定位等等。如果一行文字顯示不下,不會(huì)自動(dòng)換行,得自己切。
額,我可以用vb6.0的語(yǔ)句回答您,給您參考,就是不知道您可以轉(zhuǎn)化成.net語(yǔ)句與否。
'添加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