vb.net 調(diào)用數(shù)據(jù)庫某個表中的數(shù)據(jù)的具體代碼

選擇客戶姓名時

創(chuàng)新互聯(lián)是一家專業(yè)提供江津企業(yè)網(wǎng)站建設(shè),專注與網(wǎng)站設(shè)計制作、網(wǎng)站制作、H5場景定制、小程序制作等業(yè)務(wù)。10年已為江津眾多企業(yè)、政府機構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)的建站公司優(yōu)惠進行中。

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

'在這里放入取數(shù)據(jù)庫客戶ID的代碼，現(xiàn)把取得的值給訂單號

End Sub

用vb怎么調(diào)用在excel中寫入的宏？

VB打開Excel：ShellExecute

hwnd,

"open",

"C:\1.xls",

vbNull,

vbNull,

1

在ThisWorkbook下建立Private

Sub

Workbook_Open()宏命令，則在每次打開這份Excel文檔時就會自動運行該宏的代碼。

VB 如何調(diào)用Word的宏代碼

這里安裝沒有VB ，不過你試一試下面的代碼

Dim wdSel As Object

Set wdSel = objWordP.Selection

wdSel.Find.ClearFormatting

wdSel.Find.Replacement.ClearFormatting

With wdSel.Find

.Text = "aa" '要查找的內(nèi)容

.Replacement.Text = "bb" '要替換的內(nèi)容

.Forward = True

.Wrap = wdFindContinue

.Format = False

.MatchCase = False

.MatchWholeWord = False

.MatchByte = True

.MatchWildcards = False

.MatchSoundsLike = False

.MatchAllWordForms = False

End With

wdSel.Find.Execute , , , , , , , , , , wdReplaceAll

怎么用VB.NET生成含有宏代碼的Excel

先創(chuàng)建一個模板excel文件，然后作為資源放在程序中，先釋放這個文件，然后操作這個文件。