vb.net控制臺(tái)教程 vb管理系統(tǒng)教程

vb.net如何在windows控制臺(tái)下使用定時(shí)器

控制臺(tái)調(diào)用Timer和窗體是類似的。首先在項(xiàng)目引用里面加入System.Windows.Forms程序集,然后在代碼頂部引入命名空間:

站在用戶的角度思考問題,與客戶深入溝通,找到丹寨網(wǎng)站設(shè)計(jì)與丹寨網(wǎng)站推廣的解決方案,憑借多年的經(jīng)驗(yàn),讓設(shè)計(jì)與互聯(lián)網(wǎng)技術(shù)結(jié)合,創(chuàng)造個(gè)性化、用戶體驗(yàn)好的作品,建站類型包括:網(wǎng)站設(shè)計(jì)制作、做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、空間域名、網(wǎng)頁空間、企業(yè)郵箱。業(yè)務(wù)覆蓋丹寨地區(qū)。

Imports System.Windows.Forms

在控制臺(tái)的Module中聲明一個(gè)計(jì)時(shí)器:

Private WithEvents Timer1 As New Timer()

把計(jì)時(shí)器的Tick事件靜態(tài)綁定到處理函數(shù)中:

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

'一些代碼

End Sub

在需要開始計(jì)時(shí)的地方,修改其Interval、Enabled屬性:

Timer1.Interval = 1000

Timer1.Enabled = True

VB.net編寫一個(gè)控制臺(tái)應(yīng)用程序用來從鍵盤上輸入兩個(gè)數(shù)然后輸出這兩個(gè)數(shù)的和差積商

應(yīng)該定義為double或者single,string類好像不能進(jìn)行運(yùn)算。我簡(jiǎn)單說一下控制臺(tái)的方法,你要一次性輸入和差積商,首先聲明兩個(gè)變量用來儲(chǔ)存兩個(gè)數(shù),然后用算法一次性輸出結(jié)果就ok。

Sub Main()

Dim FN As Single

Dim SN As Single

Dim ResultNum As Single

Console.WriteLine("請(qǐng)輸入第一個(gè)數(shù)") : FN = Console.ReadLine

Console.WriteLine("請(qǐng)輸入第二個(gè)數(shù)") : SN = Console.ReadLine

ResultNum = FN + SN

Console.WriteLine("它們的和: " ResultNum)

ResultNum = FN - SN

Console.WriteLine("它們的差: " ResultNum)

ResultNum = FN * SN

Console.WriteLine("它們的積: " ResultNum)

ResultNum = FN / SN

Console.WriteLine("它們的商: " ResultNum)

Console.ReadLine()

End Sub

vb 怎么寫控制臺(tái)程序

vb.net有控制臺(tái)程序選擇項(xiàng),

新建--項(xiàng)目--已安裝--模板-Visual Basic--windows,

然后在右邊的窗口中選擇“控制臺(tái)應(yīng)用程序”。

VB.net 里下面的代碼怎么運(yùn)行?怎么用控制臺(tái)?

建個(gè)控制臺(tái)工程,把代碼粘過去,最后顯示的代碼放入到Main方法里就可以了。

采納哦

VB.NET怎么安裝

VB.NET安裝部署一).創(chuàng)建部署項(xiàng)目

1. 在“文件”菜單上指向“添加項(xiàng)目”,然后選擇“新建項(xiàng)目”。

2. 在“添加新項(xiàng)目”對(duì)話框中,選擇“項(xiàng)目類型”窗格中的“安裝和部署項(xiàng)目”,然后選擇“模板”窗格中的“安裝項(xiàng)目”。在“名稱”框中鍵入 setup1。

3. 單擊“確定”關(guān)閉對(duì)話框。

4. 項(xiàng)目被添加到解決方案資源管理器中,并且文件系統(tǒng)編輯器打開。

5. 在“屬性”窗口中,選擇 ProductName 屬性,并鍵入 信息管理系統(tǒng) 。

VB.NET安裝部署二).將 主程序 項(xiàng)目的輸出添加到部署項(xiàng)目中

1. 在“文件系統(tǒng)編輯器”中,選擇“應(yīng)用程序文件夾”。在“操作”菜單上,指向“添加”,然后選擇“項(xiàng)目輸出”。

2. 在“添加項(xiàng)目輸出組”對(duì)話框中,選擇“項(xiàng)目”下拉列表中的“你的程序”。

3. 單擊“確定”關(guān)閉對(duì)話框。

4. 從列表中選擇“主輸出”和“內(nèi)容文件”組,然后單擊“確定”。

VB.NET安裝部署三).創(chuàng)建安裝程序類

1. 在“文件”菜單上指向“新建”,然后選擇“項(xiàng)目”。

2. 在“新建項(xiàng)目”對(duì)話框中,選擇“項(xiàng)目類型”窗格中的“Visual Basic 項(xiàng)目”,然后選擇“模板”窗格中的“類庫”。在“名稱”框中鍵入 installDB。

3. 單擊“打開”關(guān)閉對(duì)話框。

4. 從“項(xiàng)目”菜單中選擇“添加新項(xiàng)”。

5. 在“添加新項(xiàng)”對(duì)話框中選擇“安裝程序類”。在“名稱”框中鍵入 installDB。

6. 單擊“確定”關(guān)閉對(duì)話框。

7. 詳細(xì)代碼附后。

VB.NET安裝部署四).創(chuàng)建自定義安裝對(duì)話框

1. 在解決方案資源管理器中選擇“setup1”項(xiàng)目。在“視圖”菜單上指向“編輯器”,然后選擇“用戶界面”。

2. 在用戶界面編輯器中,選擇“安裝”下的“啟動(dòng)”節(jié)點(diǎn)。在“操作”菜單上,選擇“添加對(duì)話框”。

3. 在“添加對(duì)話框”對(duì)話框中,選擇“許可協(xié)議”對(duì)話框,然后單擊“確定”關(guān)閉對(duì)話框。

4. 在“添加對(duì)話框”對(duì)話框中,選擇“文本框 (A)”對(duì)話框,然后單擊“確定”關(guān)閉對(duì)話框。

5. 在“操作”菜單上,選擇“上移”。重復(fù)此步驟,直到“文本框 (A)”對(duì)話框位于“安裝文件夾”節(jié)點(diǎn)之上。

6. 在“屬性”窗口中,選擇 BannerText 屬性并鍵入:安裝數(shù)據(jù)庫.

7. 選擇 BodyText 屬性并鍵入:安裝程序?qū)⒃谀繕?biāo)機(jī)器上安裝數(shù)據(jù)庫

8. 選擇 Edit1Label 屬性并鍵入:數(shù)據(jù)庫名稱:

9. 選擇 Edit1Property 屬性并鍵入 CUSTOMTEXTA1

10. 選擇 Edit1Value 屬性并鍵入:dbservers

11. 選擇 Edit2Label 屬性并鍵入:服務(wù)器名:

12. 選擇 Edit2Property 屬性并鍵入 CUSTOMTEXTA2

13. 選擇 Edit2Value 屬性并鍵入:(local)

14. 選擇 Edit3Label 屬性并鍵入:用戶名:

15. 選擇 Edit3Value 屬性并鍵入:sa

16. 選擇 Edit3Property 屬性并鍵入 CUSTOMTEXTA3

17. 選擇 Edit4Label 屬性并鍵入:密碼:

18. 選擇 Edit4Property 屬性并鍵入 CUSTOMTEXTA4

19. 選擇 Edit2Visible、Edit3Visible 和 Edit4Visible 屬性,并將它們?cè)O(shè)置為 true

VB.NET安裝部署五).創(chuàng)建自定義操作

1. 在解決方案資源管理器中選擇“setup1”項(xiàng)目。在“視圖”菜單上指向“編輯器”,然后選擇“自定義操作”。

2. 在自定義操作編輯器中選擇“安裝”節(jié)點(diǎn)。在“操作”菜單上,選擇“添加自定義操作”。

3. 在“選擇項(xiàng)目中的項(xiàng)”對(duì)話框中,雙擊“應(yīng)用程序文件夾”。

4. 選擇“主輸出來自 installDB(活動(dòng))”項(xiàng),然后單擊“確定”關(guān)閉對(duì)話框。

5. 在“屬性”窗口中,選擇 CustomActionData 屬性并鍵入“/dbname=[CUSTOMTEXTA1] /server=[CUSTOMTEXTA2] /user=[CUSTOMTEXTA3] /pwd=[CUSTOMTEXTA4] /targetdir="[TARGETDIR]/"”。

附:/targetdir="[TARGETDIR]/"是安裝后的目標(biāo)路徑,為了在installDB類中獲得安裝后的路徑,我們?cè)O(shè)置此參數(shù)。

VB.NET安裝部署六).添加文件

1. 將SQL Server備份成文件DB.dat添加到“setup1”項(xiàng)目(在企業(yè)管理器中右擊數(shù)據(jù)庫-所有工作-備份數(shù)據(jù)庫,備份成一個(gè)文件,取名為DB.dat)

2. 將安裝文件LisenceFile.rtf添加到“setup1”項(xiàng)目

3. 在用戶界面編輯器中,選擇許可協(xié)議,設(shè)置LisenceFile屬性為L(zhǎng)isenceFile.rtf文件

4.一般會(huì)自動(dòng)將依賴項(xiàng)添加到“檢測(cè)到的依賴項(xiàng)”,如果沒有,那么我們要手動(dòng)將其加入步驟5)

Crystal_Managed2003.msm

(如果有水晶報(bào)表)

dotnetfxredist_x86.msm

(.net一定是必須的)

... (如果有引用其他的dll)

5.如果使用了水晶報(bào)表,手動(dòng)加入要包含的文件:項(xiàng)目--添加--合并模塊(添加你的程序文件) (包括dotNetFramework和MDAC27),位于:C:/Program Files/Common Files/Merge Modules/ 下,*為必要的

具體功能如下:

(托管組件 MSM 處理所有托管組件的分發(fā),其中包括 Windows 窗體查看器、Web 窗體查看器和所有 Crystal Decisions 命名空間)

* Crystal_Managed2003.msm

Crystal_Managed2003_chs.msm

(對(duì)于使報(bào)表運(yùn)行所需的所有其他文件,由數(shù)據(jù)庫訪問 MSM 處理其分發(fā)。其中包括數(shù)據(jù)庫、導(dǎo)出和圖表驅(qū)動(dòng)程序。)

* Crystal_Database_access2003.msm

Crystal_Database_access2003_chs.msm

(KeyCode MSM 處理 Crystal Decisions 密鑰號(hào)碼的安裝,注意是添加合并模塊,否則沒有“MergeMouduleProperties”屬性)

* Crystal_regwiz2003.msm

(如果報(bào)表文件使用了 ADO.NET 的 dataset 數(shù)據(jù)集對(duì)象,那么 VC_User_CRT71_RTL_X86_---.msm 和 VC_User_STL71_RTL_X86_---.msm 模塊也必須包含在安裝工程中。而且這兩個(gè)模塊的文件安裝屬性的"Module Retargetable Folder"項(xiàng)必須修改成為系統(tǒng)目錄)

VC_User_CRT71_RTL_X86_---.msm VC_User_STL71_RTL_X86_---.msm

(很多人經(jīng)常出現(xiàn)查詢錯(cuò)誤,不妨加上這個(gè))

6.打開解決方案--右鍵點(diǎn)擊Crystal_regwiz2003.msm的屬性,在“MergeMouduleProperties”里的“License Key”填入:AAP5GKS0000GDE100DS(這個(gè)是你生成Crystal Report是用到的注冊(cè)號(hào)的密碼!)

VB.NET安裝部署七).打包時(shí)加入卸載功能:

方法一:

1.在打包項(xiàng)目中添加文件msiexec.exe(一般可在c:/windows/system32/下找到)

2.在文件系統(tǒng)視圖中選擇應(yīng)用程序文件夾,在msiexec.exe上按右鍵,選擇創(chuàng)建快捷方式,重命名快捷方式為"卸載".

3.更改此快捷方式的Arguments 為"/x {產(chǎn)品id}",產(chǎn)品id的值為打包項(xiàng)目的ProductCode屬性值.

方法二:(推薦)

1.先生成安裝包,記下ProductCode(選擇解決方案資源管理器根目錄如setup1,再查看屬性標(biāo)簽,不是右鍵中的屬性),下面要用到

2.用VS.net建立一個(gè)新的控制臺(tái)程序uninst.exe文件

'power by: landlordh

'for 2000,xp,2003

Module uninstall

Sub Main()

Dim myProcess As Process =

New Process

If System.Environment.OSVersion.

ToString.IndexOf("NT 5") Then

myProcess.Start("msiexec", "/X

{2B65D4A9-C146-4808-AB4B-321F

B0779559}") '改為自己的ProductCode

End If

myProcess.Close()

End Sub

End Module

3.將控制臺(tái)程序BIN目錄的exe文件加入到打包程序文件中,在程序組創(chuàng)建uninst.exe的快捷方式

VB.NET安裝部署八).打包時(shí)加入.net環(huán)境和MDAC功能:

把MS的PluginInstaller.msi插件裝上后,用vb.net的自帶的打包工具打包,就會(huì)自動(dòng)把.net framework環(huán)境打進(jìn)去,再下面的步驟進(jìn)行設(shè)置,就可以把MDAC也打包.使用 Setup 項(xiàng)目安裝 MDAC

1.確保 Visual Studio .NET 框架引導(dǎo)程序插件已安裝。

2.在 Solution Explorer 中選擇 Setup 項(xiàng)目。從 View 菜單指向 Editor,并選擇 Launch Conditions(啟動(dòng)條件)。

3.選擇 Requirements on Target Machine(搜索目標(biāo)計(jì)算機(jī)) 節(jié)點(diǎn)。從 Action 菜單,選擇 Add Registry Launch Condition(添加注冊(cè)表搜索)。

4.選擇 Search for RegistryEntry1 節(jié)點(diǎn)。在 Properties 窗口中,選擇 RegKey 屬性,并鍵入 Software/Microsoft/DataAccess。

5.選擇 Root 屬性,并選擇 vsdrrHKLM。

6.選擇 Value 屬性,并鍵入 FullInstallVer。

7.選擇 Property 屬性,并鍵入 MDACSEARCH。

8.在 Launch Conditions Editor(啟動(dòng)條件) 中,添加Condition1 節(jié)點(diǎn)。選擇 Condition1 節(jié)點(diǎn),在 Properties 窗口中,選擇 Condition 屬性,并選擇 MDACSEARCH="2.6"。

9.在 Solution Explorer 中選擇 Setup 項(xiàng)目。在 Project 菜單上,選擇 Properties。

10.將 Bootstrapper 屬性設(shè)置為 Windows Installer Bootstrapper(Windows 安裝引導(dǎo)程序)。

VB.net里面 console是什么意思 怎么用?

在visual studio.net中,你新建一個(gè)控制臺(tái)程程序 然后里面 給你 一個(gè) 程序 你粘貼復(fù)制 就知道了 呵呵

Module Module1

Sub Main()

Dim x As String, y As Byte '定義變量及其數(shù)據(jù)類型

x = "007" '為變量x賦初值

y = Convert.ToByte(x) '將字符串型數(shù)據(jù)轉(zhuǎn)換成字節(jié)型值并賦值給變量y

Console.WriteLine("字符串型變量 x(" x ") 被轉(zhuǎn)換成了" "字節(jié)型變量 y(" y ") 。") '輸出結(jié)果到屏幕

Dim i As String = "2012年11月18日" '定義變量i及其數(shù)據(jù)類型并賦初值

Dim j As Date '定義變量j及其數(shù)據(jù)類型

j = Convert.ToDateTime(i) '將字符串型數(shù)據(jù)轉(zhuǎn)換成日期型值并賦值給變量j

Console.WriteLine("字符串型變量 i(" i ") 被轉(zhuǎn)換成了" "日期型變量 j(" j ") 。") '輸出結(jié)果到屏幕

Console.Read() '讀取用戶輸入的信息

End Sub

End Module

名稱欄目:vb.net控制臺(tái)教程 vb管理系統(tǒng)教程
轉(zhuǎn)載注明:http://m.kartarina.com/article12/hjgpdc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供品牌網(wǎng)站建設(shè)網(wǎng)站收錄網(wǎng)站策劃App設(shè)計(jì)靜態(tài)網(wǎng)站外貿(mào)網(wǎng)站建設(shè)

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)

成都定制網(wǎng)站網(wǎng)頁設(shè)計(jì)
主站蜘蛛池模板: 777爽死你无码免费看一二区| 国产成年无码久久久久下载| 国产色无码精品视频国产| 无码专区一va亚洲v专区在线 | 色综合久久久久无码专区| 青青爽无码视频在线观看| 无码人妻少妇色欲AV一区二区| 小12箩利洗澡无码视频网站| 亚洲精品无码mv在线观看网站| 亚洲精品无码99在线观看| 人禽无码视频在线观看| 亚洲精品无码Av人在线观看国产| 2019亚洲午夜无码天堂| 伊人久久一区二区三区无码| 中文字幕无码乱码人妻系列蜜桃 | 亚洲AV无码一区二区二三区软件| 无码专区一va亚洲v专区在线| 99国产精品无码| 国产a级理论片无码老男人| 免费无遮挡无码永久在线观看视频| 亚洲av日韩av无码黑人| 亚洲欧洲美洲无码精品VA| 无码精品人妻一区二区三区影院 | 最新中文字幕AV无码不卡 | 亚洲中文字幕无码爆乳AV| 国产免费午夜a无码v视频| 西西大胆无码视频免费| 亚洲日韩AV无码一区二区三区人| 97无码人妻福利免费公开在线视频| 精品无码人妻一区二区三区不卡 | 国产精品亚洲аv无码播放| av无码一区二区三区| 无码精品人妻一区| 精品一区二区无码AV| 久久亚洲精品无码观看不卡| 国产精品爆乳奶水无码视频| av中文无码乱人伦在线观看| 丰满亚洲大尺度无码无码专线 | 中文字幕精品无码久久久久久3D日动漫| 潮喷无码正在播放| 中文字幕无码精品亚洲资源网|