vbnet編程入門

Ⅰ 用vb.net編程

不是阿.你的東西完全可以實現那.

我給你寫了個

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Opacity = 0.5
Timer1.Enabled = True
'TestEvents()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Opacity += 0.1
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Me.Opacity += 0.1
End Sub

Button1點擊可以加透明度
也可以timer控制 你timer設置interval 1000 就是1秒
然後就可以啦.
你的失誤在於你沒有啟動 timer
Timer1.Enabled = True 就可以了. 還有不要弄的太快、不然你眼睛還來不及反應就已經好了.

這是個屬性沒有什麼不能設置的.

再給你點參考關於
===================================================
Form.Opacity 屬性 [Visual Basic]請參見
Form 類 | Form 成員 | System.Windows.Forms 命名空間 | TransparencyKey | 創建透明 Windows 窗體 | Form 成員（Visual J# 語法） | C++ 託管擴展編程
要求
平台: Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 系列
語言
C#

C++

JScript

Visual Basic

全部顯示
獲取或設置窗體的不透明度級別。

[Visual Basic]
Public Property Opacity As Double

[C#]
public double Opacity {get; set;}

[C++]
public: __property double get_Opacity();
public: __property void set_Opacity(double);

[JScript]
public function get Opacity() : double;
public function set Opacity(double);

屬性值
窗體的不透明度級別。默認值為 1.00。

備注
此屬性使您得以指定窗體及其控制項的透明度級別。此屬性與 TransparencyKey 提供的透明度不同，後者只能使窗體及其控制項完全透明，條件是當窗體及其控制項與 TransparencyKey 屬性中指定的值所表示的顏色相同。當將此屬性設置為小於 100% (1.00) 的值時，將使整個窗體（包括邊框）更透明。將此屬性設置為值 0% (0.00) 時，將使該窗體完全不可見。可以使用此屬性提供不同級別的透明度，或者提供如窗體逐漸進入或退出視野這樣的效果。例如，可以通過將 Opacity 屬性設置為值 0% (0.00)，並逐漸增加該值直到它到達 100% (1.00)，來使某窗體逐漸進入視野。

Windows 2000, Windows Server 2003 系列平台說明: 此屬性在無法顯示分層窗口的平台上不起作用。

=======================================================
餓的神阿、不給我加分就太不厚道列.
希望對你能有所幫助。

Ⅱ VB.net是學什麼的怎樣才能把它學好

vb.net是編程語言，學好他需要你的興趣和探索精神！
你在網上下的2005不能安裝的原因估計是你下的文件有錯誤，建議你重新下載一個，另外，vb.2005版本有EXPRESS和企業版的區別，你不要下express,那個功能太少,最後，別忘了下msdn2005,這個是和vb.net2005的幫助文檔，非常管用。
要想學好VB.NET，一是建議你先買本書，我也是這么開始學的，不要買高級教程，先買個基本教程。二是建議你用好前面說的msdn,不明白就用這個查找。
三是建議你不明白就多去論壇或者問問別人，幾個人一起學習編程，效率會非常高。
希望我的答案能令你滿意

Ⅲ 請問沒有任何編程基礎，怎麼學習VB。NET

學visual basic .net並不需要visual basic的基礎的，完全不一樣的東西，學好visual basic .net至少需要有oop編程基礎的，所以建議樓主先學習oop編程思想吧

Ⅳ 請教，關於vb.net編程

size不是改變它的大小
應該是width 和height 這兩個屬性

Ⅳ vb.net編程

http://chs.gotdotnet.com/QuickStart/aspplus/default.aspx?url=/quickstart/aspplus/doc/webserverctrls.aspx

Ⅵ .NET游戲編程入門經典——VB.NET篇電子書

介紹一個非常不錯的VB網站吧！應有盡有！

VB新勢力-vb下載 vb6下載 vb教程 vb源碼 vb試題 vb源代碼 vb控制項 vb源程序 vb書籍 vb工具 vb6.0下載vb.net教程vb.net源碼

http://www.vbaspnew.com/

測試過，可以下載

參考資料：（是由知道專家提供的，呵呵！）
http://..com/question/5549560.html

Ⅶ vb.net的編程

Option Strict Off
Option Explicit On
Friend Class Form1
Inherits System.Windows.Forms.Form
Private Sub Command1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command1.Click
Dim j As Integer
Dim A(9) As Short
Dim D(9) As Short
Dim i As Short
Dim B As Short
Dim C As Short
Dim F As Short
Dim G As Boolean
Dim H() As Short
Dim K As Short
Dim S As String
C = 32767
For i = 1 To 10
A(i - 1) = CShort(InputBox("輸入第 " & i & "個數"))
If B < A(i - 1) Then B = A(i - 1)
If C > A(i - 1) Then C = A(i - 1)
D(i - 1) = Int(Rnd() * 100 + 0.5)
If F < D(i - 1) Then F = D(i - 1)
Next i
For i = 2 To 100
For j = 2 To Int(System.Math.Sqrt(i) + 0.5)
'UPGRADE_WARNING: Couldn't resolve default property of object j. Click for more: 'ms-help://MS.VSExpressCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: Mod has a new behavior. Click for more: 'ms-help://MS.VSExpressCC.v80/dv_commoner/local/redirect.htm?keyword="9B7D5ADD-D8FE-4819-A36C-6DEDAF088CC7"'
If i Mod j <> 0 Then
G = True
Else
G = False
Exit For
End If
Next j
If G = True Then
ReDim Preserve H(K)
H(K) = i
K = K + 1
End If
Next i
S = "2;"
For i = 0 To K - 1
S = S & H(i) & ";"
Next i
MsgBox("最大數為：" & B & "；最小數為：" & C)
MsgBox("最大的隨機數為：" & F)
MsgBox("1--100之間共有" & K + 1 & "個素數：" & S)
End Sub
End Class

Ⅷ VB.NET編程語法

你這是vb.net的代碼,vb中不允許那麼寫:
Dim
strdx()
As
String
=
{"0",
"0",
"0"}
'定義個數組,從後面的值能看的出最大下標是2,也就是strdx(0),strdx(1)和strdx(2),3個的默認值都為0
Dim
calcount1
As
String
=
"0"
'定義個字元串變數
Dim
calcount2
As
String
=
"0"
Dim
strvalue
As
Boolean
=
False
'定義strvalue為bool值,改類型變數只有true和false
2種值
If
strdx(0)
=
"0"
Then
TextBox1.Text
=
strdx(0)
&
"."
&
這是字元串連接符號,和"+"的區別是,他把左右2邊的內容直接連接的,而"+"可能會編程運算符,例如
2
&
3
=
"23"
而
2
+
3
=
5
ElseIf
strvalue
=
False
Then
strdx(0)
=
strdx(0)
&
"0"
TextBox1.Text
=
strdx(0)
&
"."
strvalue
=
True
Else
strdx(0)
=
strdx(0)
&
"0"
TextBox1.Text
=
strdx(0)
Select
Case
calcount1
'
這里開始是分支語句
Case
"+"
TextBox1.Text
=
Str(Val(strdx(1))
+
Val(strdx(0)))

Ⅸ 求vb.net編程練習解答（超簡單）

1.n=textbox1.lenght
for i=0 to n
j=mid(textbox1.text,i)'這個函數你具體查一下它的用法！！
sum=sum+j
next
2.
3.都不難！！你自己想想吧！！

Ⅹ vb.net入門學慣用什麼書比較好點

visual basic2008入門經典