導航:首頁 > 個人簡歷 > 個人簡歷做vb

個人簡歷做vb

發布時間:2021-01-05 09:56:51

㈠ 用vb編程在窗體顯示,需要設計個人簡歷、家庭等按鈕來選擇顯示內容。可以調整字體顏色,大小等,內容或

這種問題建議直接找人教,或者找個源碼參考下。
或者你花點時間理解下控制項名.屬性名這種結構的使用。

㈡ VB編寫一個"個人簡歷表"程序

DimxmAsString,nlAsString,xbAsString,xlAsString,zyAsString

Dimah1AsString,ah2AsString,ah3AsString,ah4AsString

PrivateSubCheck1_Click()

IfCheck1.Value=1Thenah1="旅遊"Elseah1=""

EndSub

PrivateSubCheck2_Click()

IfCheck2.Value=1Thenah2="體育"Elseah2=""

EndSub

PrivateSubCheck3_Click()

IfCheck3.Value=1Thenah3="音樂"Elseah3=""

EndSub

PrivateSubCheck41_Click()

IfCheck4.Value=1Thenah4="集郵"Elseah4=""

EndSub

PrivateSubCommand1_Click()

Text3.Text="簡歷"&vbCrLf&"姓名:"&xm&vbCrLf&"年齡:"&nl&vbCrLf&"性別:"&xb&vbCrLf&"學歷:"&xl&vbCrLf&"職業:"&zy&vbCrLf&"愛好:"&ah1&ah2&ah3&ah4

EndSub

PrivateSubCommand2_Click()

Text1="":xm=""

Text2="":nl=""

Text3=""

Check1.Value=0:ah1=""

Check2.Value=0:ah2=""

Check3.Value=0:ah3=""

Check4.Value=0:ah4=""

EndSub

PrivateSubForm_Load()

EndSub

PrivateSubOption1_Click()

IfOption1.Value=TrueThenxb="男"

EndSub

PrivateSubOption2_Click()

IfOption2.Value=TrueThenxb="女"

EndSub

PrivateSubOption3_Click()

IfOption3.Value=TrueThenxl="大學"

EndSub

PrivateSubOption4_Click()

IfOption4.Value=TrueThenxl="本科"

EndSub

PrivateSubOption5_Click()

IfOption5.Value=TrueThenxl="研究生"

EndSub

PrivateSubOption6_Click()

IfOption6.Value=TrueThenzy="教師"

EndSub

PrivateSubOption7_Click()

IfOption7.Value=TrueThenzy="醫生"

EndSub

PrivateSubOption8_Click()

IfOption8.Value=TrueThenzy="公務員"

EndSub


PrivateSubText1_Change()

xm=Text1.Text

EndSub

PrivateSubText2_Change()

nl=Text2.Text

EndSub

㈢ 求用vb程序設計 做一份個人簡歷表的代碼,如下圖

我也不會,你問別人吧

㈣ 用vb編程在窗體顯示,需要設計個人簡歷、家庭等按鈕來選擇顯示內容。可以調整字體顏色,大小等,

參照 這里 :
http://..com/question/1605040002454540987.html?oldq=1

㈤ Vb.net中怎樣生成基本信息登記表並列印出來,就像簡單的個人簡歷類型的表格

最最簡單的辦法~~~是先用word做一個樣表,里邊的項目用一個代號來填寫,比如 *項目1* *項目2* ~~~做好後,用vb操縱word通過代碼替換掉要填寫的這些代號,然後另存為就可以了

㈥ 用VB編程在窗體顯示.需要設計個人簡歷、家庭等按扭來選擇顯示內容.可以調整字體、顏色、大小等內容,

'窗體中添加3個commandbutton,一個對話框控制項
Dim str1 As String, str2 As String, str3 As String
Private Sub Command1_Click()
str1 = str2
Cls
Print str1
End Sub

Private Sub Command2_Click()
str1 = str3
Cls
Print str1
End Sub

Private Sub Command3_Click()
CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects
CommonDialog1.FontName = "宋體"
CommonDialog1.ShowFont
Form1.FontName = CommonDialog1.FontName
Form1.FontBold = CommonDialog1.FontBold
Form1.FontItalic = CommonDialog1.FontItalic
Form1.ForeColor = CommonDialog1.Color
Form1.FontSize = CommonDialog1.FontSize
Cls
Print str1
End Sub

Private Sub Form_Load()
Command1.Caption = "個人簡歷"
Command2.Caption = "家庭情況"
Command3.Caption = "字體"
str2 = "個人簡歷:" & vbCrLf & _
"姓名:XXX" & vbCrLf & _
"性別:男" & vbCrLf & _
"年齡:23" & vbCrLf & _
"xxxx年xx月至xxxx年xx月:小學" & vbCrLf & _
"xxxx年xx月至xxxx年xx月:初中學" & vbCrLf & _
"xxxx年xx月至xxxx年xx月:高中" & vbCrLf & _
"xxxx年xx月至xxxx年xx月:大學" & vbCrLf
str3 = "家庭情況:" & vbCrLf & _
"家庭成員:XXX" & vbCrLf
End Sub

㈦ 求編寫一個「個人簡歷表」程序。VB是6.0版本的


先將各option控制項name屬性依次改成a1、a2;b1、b2......PrivateSubCommand1_Click()


Label3.Caption="姓名:"&Text1.Text&vbCrLf

Label3.Caption=Label3.Caption&"年齡:"&Text2.Text&vbCrLf


Ifa1Then

Label3.Caption=Label3.Caption&"性別:男"&vbCrLf

ElseIfa2Then

Label3.Caption=Label3.Caption&"性別:女"&vbCrLf

EndIf


Ifb1Then

Label3.Caption=Label3.Caption&"學歷:大專"&vbCrLf

ElseIfb2Then

Label3.Caption=Label3.Caption&"學歷:本科"&vbCrLf

ElseIfb3Then

Label3.Caption=Label3.Caption&"學歷:研究生"&vbCrLf

EndIf


Ifc1Then

Label3.Caption=Label3.Caption&"職業:教師"&vbCrLf

ElseIfc2Then

Label3.Caption=Label3.Caption&"職業:醫生"&vbCrLf

ElseIfc3Then

Label3.Caption=Label3.Caption&"職業:公務員"&vbCrLf

EndIf


Ifd1Then

Label3.Caption=Label3.Caption&"愛好:旅遊"&vbCrLf

ElseIfd2Then

Label3.Caption=Label3.Caption&"愛好:體育"&vbCrLf

ElseIfd3Then

Label3.Caption=Label3.Caption&"愛好:音樂"&vbCrLf

ElseIfd4Then

Label3.Caption=Label3.Caption&"愛好:集郵"&vbCrLf

EndIf


EndSub


PrivateSubCommand2_Click()

Label3.Caption=""

EndSub

㈧ 如何用vb開發一個變更履歷功能

變更履歷的原型發來,實現都不是問題

㈨ 求VB個人簡歷表程序

代碼如下:
Private Sub Command1_Click() '顯示信息
Label3.Caption = "簡歷"
Label3.Caption = Label3.Caption & vbCrLf & "姓名:" & Text1.Text
Label3.Caption = Label3.Caption & vbCrLf & "年齡:" & Text2.Text
If Option1.Value = True Then
Label3.Caption = Label3.Caption & vbCrLf & "性別:男"
Else
Label3.Caption = Label3.Caption & vbCrLf & "性別:女"
End If
If Option3.Value = True Then
Label3.Caption = Label3.Caption & vbCrLf & "學歷:大專"
ElseIf Option4.Value = True Then
Label3.Caption = Label3.Caption & vbCrLf & "學歷:本科"
Else
Label3.Caption = Label3.Caption & vbCrLf & "學歷:研究生"
End If
If Option6.Value = True Then
Label3.Caption = Label3.Caption & vbCrLf & "職業:教師"
ElseIf Option7.Value = True Then
Label3.Caption = Label3.Caption & vbCrLf & "職業:醫生"
Else
Label3.Caption = Label3.Caption & vbCrLf & "職業:公務員"
End If
x = vbCrLf & "愛好:"
For i = 0 To 3
If Check1(i) = 1 Then x = x & Check1(i).Caption & " "
Next i
Label3.Caption = Label3.Caption & x
End Sub
Private Sub Command2_Click()
Form_Load '初始化窗體
End Sub
Private Sub Form_Load() '初始化窗體
Text1.Text = ""
Text2.Text = ""
Option1.Value = True
Option2.Value = False
Option3.Value = True
Option4.Value = False
Option5.Value = False
Option6.Value = True
Option7.Value = False
Option8.Value = False
For i = 0 To 3
Check1(i).Value = 0
Next i
Label3.Caption = ""
End Sub

㈩ vb.net reportviewer 簡歷

用直線就可以了。

閱讀全文

與個人簡歷做vb相關的資料

熱點內容
晉升考核自我評價 瀏覽:480
職場新人自我介紹日語 瀏覽:700
職攜求職公寓 瀏覽:354
醉駕人找工作 瀏覽:973
百度廈門六中藝術特長報名表 瀏覽:868
勁霸經編面試 瀏覽:364
小孩綜合素質自我評價 瀏覽:470
玉環學校洗碗招聘信息 瀏覽:15
教師教育自我評價 瀏覽:192
2014合肥168中學特長生音樂錄取名單 瀏覽:478
應屆生面試自我介紹範文3分鍾 瀏覽:800
丹陽人才招聘網 瀏覽:72
生物學科特長怎麼寫 瀏覽:250
昌碩面試後多久通知 瀏覽:925
陝西省鐵餅特長生 瀏覽:751
碩展科技有限公司招聘 瀏覽:346
2019年南陽卷煙廠招聘信息 瀏覽:461
時尚招聘信息 瀏覽:341
安吉潔美電子招聘信息 瀏覽:106
個人簡歷問候語 瀏覽:924