還有兩道vb.net面試題，請大家幫忙，謝謝。

我很喜歡這種題目

成都創新互聯專注于西市企業網站建設,響應式網站設計,商城網站定制開發。西市網站建設公司,為西市等地區提供建站服務。全流程按需求定制設計，專業設計，全程項目跟蹤，成都創新互聯專業和態度為您提供的服務

-------------------------------------------------------------------------

第7題，問題出在兩方面

Public Function CalculateArea(ByVal SideBase As Double, ByVal Height As Double, _ Optional

ByVal AssignToArea As Boolean = False) As Double

Dim Area As Double = (SideBase * Height) / 2

中間的 _ 有問題，應該去掉

還有objShape = CType(objShape, clsTriangle) 有錯誤，不能轉換

注釋掉objShape = CType(objShape, clsTriangle)

刪除_后，得到結果

true

false

-330

--------------------------------------------------------------------------

第8題，就是以acc_grp_cust_tbl表為基礎，查找cust_tbl并輸出

一般的話使用涉及兩個表的話使用SHAPE語句（以SQL為基礎的語句）

雖然兩者使用時差不多，但是理論比較難懂，我這里也不講了，我使用ADO+SQL方法

先說明一下程序中的一個細節，也是問題比較容易忽略的

1400 0 1 2

1500 3 4

1600 5

說明一個問題Cust_id1 Cust_id2 Cust_id3 Cust_id4 字段不是數值，而是類似字符的東西（因為可能是

備注）

定義rsgrp對應acc_grp_cust_tbl ，rscust對應cust_tbl

預先設置好rsgrp和rscust的連接(使用VB的方法，可以移植到VB.NET上）

do until rscust.eof

strline=rscust(0) " "

strSQL="SELECT * FROM CUST_TBL WHERE cust_id='" RSGRP(1) "' OR CUST_ID='" RSGRP(2) "' OR CUST_ID='" RSGRP(3) "' OR CUST_ID='" RSGRP(4) "'"

RSGRP.OPEN STRSQL

if rsgrp.recordcount0 then

rsgrp.movefirst

do until rsgrp.eof

strLine=strline rscust(3) " " rscust(2) "/"

rsgrp.movenext

loop

end if

rscust.close

strline=left(strline ,len(strline)-1)

'去除最后一個"/"

console.writeline(strline)

loop

急急急！簡單的在線考試系統，可以包括若干道單選題、多選題和簡答題，怎么做哦？？？（vb.net實現）

額 這 我倒是知道一款asp.net的=。 =叫KesionIexam它可以實現單選題多選題和簡答題，還有填空題判斷題等等，只要按格式把試題編寫好整卷錄入就可以在前臺看到它咯！

vb.net 數組顯示矩陣的一道題

'這是在vb6中的代碼，在vb.net中基本差不多，你可以參考一下

Private Sub cmdCommand1_Click()

Me.AutoRedraw = True

Dim Grp

Grp = Array(1, 2, 3, 4, 5)

Dim i, j As Long

Dim StrPrt As String

For i = 0 To UBound(Grp)

'i為位移量

StrPrt = ""

For j = i To UBound(Grp)

StrPrt = StrPrt Grp(j)

Next j

For j = 0 To i - 1

StrPrt = StrPrt Grp(j)

Next j

Me.Print StrPrt

Next i

End Sub

名稱欄目：vb.net期中模擬題 vb操作題庫及答案
當前網址：http://www.yijiale78.com/article42/hgcoec.html

成都網站建設公司_創新互聯，為您提供網站導航、網站維護、企業網站制作、網站營銷、定制網站、外貿建站

廣告

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