vbnet自動整理代碼

『壹』 vb中怎樣設置使代碼窗口中的代碼自動對齊

問題1：——把抄三個窗口的startupposition屬性都設為2。或在form_load中把三個窗口的left設為相等的值，top也設為相等的值。
問題2：——在「格式」里有「對齊」，但只能在設計階段，並且行距兩個以上的控制項時才能使用。

『貳』 用VB.NET程序編寫代碼

Delphi代碼如下：

procereTForm1.Button1Click(Sender:TObject);

var

購物總價:Integer;

折扣:Extended;

begin

購物總價:=StrToInt(Edit1.Text);

if購物總價<250then

begin

折扣:=0;

end

elseif購物總價<500then

begin

折扣:=0.05;

end

elseif購物總價<1000then

begin

折扣:=0.075;

end

elseif購物總價<2000then

begin

折扣:=0.1;

end

{

此段的折扣是多少？

elseif購物總價<3000then

begin

折扣:=0.05;

end

}

elseif購物總價>=3000then

begin

折扣:=0.15;

end;

ShowMessage('您享受的折扣是：'+FloatToStr(折扣)

+'原價：'+IntToStr(購物總價)

+'折後總價：'+FloatToStr(購物總價*(1-折扣)));

end;

『叄』 vb.net 如何寫代碼讓SQL SERVER資料庫自動計算

只要是提到「System.Data.OracleClient的」
連接字元串的例子：
用戶ID =用戶;數據源=伺服器/資料庫名;密碼=通過; - 其他與sqlserver的是相似的，但這種改變的OracleConnection
的SqlDataAdapter的SqlConnection想改變OracleDataAdapter
的SqlCommand想改變的OracleCommand

『肆』 跪求vb.net代碼

新建窗口，添加picture控制項
利用line()方法畫線
line(開始x坐標,開始y坐標)-(結束x坐標,結束y坐標),線的顏色，畫線的方式(默認為線，B為矩形無填充，BF為填充的矩形)
For i = 1 To 16
Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(255, 0, 0)
Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(255, 0, 0)
Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(0, 255, 0)
Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(0, 255, 0)
Next i
如果要在窗口上畫也可以調用窗口的line方法即form.line()