vb.net的小程序

你要做一個考試系統？？這可不是小程序，不過如果是超精簡的話，我倒可以寫個思路給你。

南昌縣ssl適用于網站、小程序/APP、API接口等需要進行數據傳輸應用場景，ssl證書未來市場廣闊！成為成都創新互聯公司的ssl證書銷售渠道，可以享受市場價格4-6折優惠！如果有意向歡迎電話聯系或者加微信：18980820575（備注：SSL證書合作）期待與您的合作！

在form添加一個label 和四個command1(組成一個控件組修改index屬性，按順序設置為ABCD)和一個command2(可要可不要，這個是作為跳過用的)

定義全局變量 questions() as string,questionid as integer，answers() as string

在form_load中，將問題和答案讀入questions()和answers()中，然后將第一個問題顯示在label中，設置questionid=1

之后在command1_click(index as integer)中用select語句根據questionid將答案和回答比較，然后顯示下一題，同時更改questionid。。。大概就這樣

command2_Click()就直接顯示下一題和更改questionid

問題結束后就OK了，之后要加什么可以自己加上去~

如何使用VB編寫一個簡單的小程序？

在桌面上，鼠標左鍵雙擊程序，在打開的VB6主界面上，左邊是工具菜單欄，單擊標簽按鈕，在Form1窗口上，繪制出一Label1，然后在其屬性窗口上改個名字，如Caption為第一數，如下圖所示。

接著，用同樣的方法，在Form1窗口上繪制出第二數，并且在左邊工具菜單欄，單擊文本框按鈕，并繪制出來。在文本框屬性欄的Text屬性上，將其Text1刪除，也就是清空數據，如下圖所示。

然后，反復用第一步驟和第二步驟做成如圖所示的界面來，學習需要反復練習，在練習中不斷進步。這里是做簡單的加法程序，如下圖所示。

接著，加法程序的界面做好后，還不能執行加法運算，必須還要在Form1窗口上繪制出一個命令按鈕來，在左邊工具菜單欄，單擊命令按鈕，并繪制出來。然后給其屬性窗口下Caption改名為計算，如下圖所示。

然后，程序看起來是做好了，單擊如圖所示的運行按鈕，彈出自己做出的Form1窗口，輸入數字3和6，然后單擊計算。可是結果并沒有出現，如下圖所示。

最后，前面5個步驟只是做了程序的界面，想要程序出結果，那必須加些代碼了，既然是簡單程序，只加一行代碼就可以了。雙擊命令按鈕，在代碼窗口中輸入如下：Text3.Text = Val(Text1.Text) + Val(Text2.Text)后，再單擊運行，輸入數字，單擊計算，此時就出現結果了，如下圖所示。

誰知道怎樣用ＶＢ制作小程序（具體步驟最好有圖）

用VB.net制作一個小程序（1）

----制作“Hello.NET”程序

作者：高山

用下面很簡單的方法，就可以制作一個“Hello.NET”小程序，同時可以掌握一些控件的用法。

Public Class Form1

Inherits System.Windows.Forms.Form

#Region " Windows 窗體設計器生成的代碼 "

Public Sub New()

MyBase.New()

'該調用是 Windows 窗體設計器所必需的。

InitializeComponent()

'在 InitializeComponent() 調用之后添加任何初始化

End Sub

'窗體重寫處置以清理組件列表。

Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

If disposing Then

If Not (components Is Nothing) Then

components.Dispose()

End If

End If

MyBase.Dispose(disposing)

End Sub

'Windows 窗體設計器所必需的

Private components As System.ComponentModel.IContainer

'注意：以下過程是 Windows 窗體設計器所必需的

'可以使用 Windows 窗體設計器修改此過程。

'不要使用代碼編輯器修改它。

Friend WithEvents Button1 As System.Windows.Forms.Button

Friend WithEvents TextBox1 As System.Windows.Forms.TextBox

System.Diagnostics.DebuggerStepThrough() Private Sub InitializeComponent()

Me.Button1 = New System.Windows.Forms.Button()

Me.TextBox1 = New System.Windows.Forms.TextBox()

Me.SuspendLayout()

'

'Button1

'

Me.Button1.Location = New System.Drawing.Point(16, 112)

Me.Button1.Name = "Button1"

Me.Button1.TabIndex = 0

Me.Button1.Text = "OK"

'

'TextBox1

'

Me.TextBox1.Location = New System.Drawing.Point(160, 112)

Me.TextBox1.Name = "TextBox1"

Me.TextBox1.TabIndex = 1

Me.TextBox1.Text = ""

'

'Form1

'

Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)

Me.ClientSize = New System.Drawing.Size(292, 266)

Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.TextBox1, Me.Button1})

Me.Name = "Form1"

Me.Text = "Hello,VB.NET"

Me.ResumeLayout(False)

End Sub

#End Region

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

TextBox1.Text = "Hello,VB.NET!"

End Sub

End Class

vb.net的一個小程序

這個應該很簡單啊，我沒學過VB.net，但以前學過點VB，不知道兩者差別大不大。以下為VB代碼，沒測試，供參考。

一個按鈕，一個列表框，（樓主說要文本框顯示結果，但VB中用文本框存儲變化的文本很不方便，因此用列表框逐列顯示）

代碼全部在按鈕過程中

z = 0: f = 0 ’正反統計的變量

For i = 1 To 10

Randomize ’初始化隨機發生器

x = Int(Rnd(1) + 0.5) ‘得到0或者1的隨機數

If x = 0 Then

List1.AddItem "正"

z = z + 1

Else

List1.AddItem "反"

f = f + 1

End If

Next i

結果會以文字形式逐行顯示在列表框中，可利用z,f值輸出正反次數。

VB.net做一個小程序 求教

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim oleDbConnection1 As OleDb.OleDbConnection

Dim oledbDataAdapter As OleDb.OleDbDataAdapter

Dim oledbData As DataSet = New DataSet

Dim strConnect As String = "Provider= OraOLEDB.Oracle;Data Source=888;User ID=888;Password=888;"

oleDbConnection1 = New System.Data.OleDb.OleDbConnection(strConnect)

Dim strSql As String

strSql = "select *" " from xx"

Dim oledbCommand As OleDb.OleDbCommand

oledbCommand.CommandText = strSql

oledbCommand.CommandType = CommandType.Text

oledbCommand.Connection = oleDbConnection1

oledbDataAdapter.SelectCommand = oledbCommand

oleDbConnection1.Open()

oledbDataAdapter.Fill(oledbData, "gy_bingrenxx")

oleDbConnection1.Close()

'在窗體上添加一個DataGridView控件,在這個位置加一句代碼

DataGridView1.DataSource = oledbDataAdapter.Tables("gy_bingrenxx")

End Sub

文章標題：VB.NET入門小程序 vb小程序實例初學者
新聞來源：http://m.newbst.com/article6/dodjoig.html

成都網站建設公司_創新互聯，為您提供做網站、網站制作、網站收錄、定制開發、品牌網站制作、網頁設計公司

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯