vb.net 小程序問(wèn)題

就是判斷矩陣的關(guān)系是否傳遞的?如果滿足:d(i,j)=d(j,k)=d(i,k)=1,該矩陣是傳遞的,否則非傳遞的.

樂(lè)昌ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場(chǎng)景，ssl證書(shū)未來(lái)市場(chǎng)廣闊！成為創(chuàng)新互聯(lián)的ssl證書(shū)銷售渠道，可以享受市場(chǎng)價(jià)格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：028-86922220（備注：SSL證書(shū)合作）期待與您的合作！

vb.net的小程序

你要做一個(gè)考試系統(tǒng)？？這可不是小程序，不過(guò)如果是超精簡(jiǎn)的話，我倒可以寫(xiě)個(gè)思路給你。

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

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

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

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

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

問(wèn)題結(jié)束后就OK了，之后要加什么可以自己加上去~

關(guān)于VB.NET實(shí)現(xiàn)求和小程序的疑問(wèn)，大俠幫我解答下唄

lblresult是一個(gè)label控件，確定你的設(shè)計(jì)界面加入了一個(gè)label控件并將其命名為lblresult

VB.net做一個(gè)小程序 求教

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()

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

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

End Sub