问答题


阅读以下说明和表,回答问题1至问题3。
[说明]
图12-5中显示一张交通违章处罚通知书。每一个交通违章通知书有一个惟一的编号。交通违章通知书包含了收到处罚的违章者记录、涉及违章的机动车记录、违章记录、处罚记录以及经办警察记录等信息。所根据这张通知书所提供的信息回答下面问题。
[问题2]
将问题1中的E-R模型(图12-6)转换成4个关系数据模型,要求标注主码和外码。

【参考答案】

司机(驾照号,姓名,地址,邮编,电话) PK=驾照号 机动车(牌照号,型号,制造厂,生产日......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
热门 试题

问答题
[说明]以下Visual Basic代码实现了对位图(BMP)进行旋转显示。以下程序共实现了对BMP位图图形进行 180°旋转、90°旋转(顺时针)、90°旋转(逆时针)、水平翻转、垂直翻转共5项处理。显示界面如图12-8所示。仔细阅读[代码7-1]至[代码7-3],完成 (n) 代码,并写在对应栏内。[代码7-1]Begin VB. Form Form1AutoRedraw =-1 ’TrueCaption= 图像的施转 ...窗体描述( 略 )Begin VB. CommandButton Command7Caption= 退出 ...窗体描述(略 )EndBegin VB.CommandButton Command6Caption = 复位 ...窗体描述(略)EndBegin VB.CommandButton Command5Caption= 垂直翻转 ...窗体描述(略)EndBegin VB.CommandButton Command4Caption= 水平翻转 ...窗体描述(略)EndBegin VB.CommandButton Command3Caption= 90°(逆时针) ...窗本描述(略)EndBegin VB.CommandButton Command2Caption= 90°(顺时针) ...窗体描述(略)EndBegin VB.PictureBox Picture2 ...窗体描述(略)EndBegin VB.CommandButton Command1Caption= 180° ...窗体描述(略)EndBegin VB.PictureBox Picture 1 ...窗体描述(略)End End[代码7-2]Private Declare Function BitBlt Lib gdi32 ( ByVal hDestDC As Long,ByVal x As Long,ByVal y As Long,ByVal n Width As Long,ByVal nHeight As Long,ByVal hSrcDC As Long,ByVal xSrc As Long,ByVal ySrc As Long,ByVal dwRop As Long ) As LongConst srcopy = &HCC0020Dim h As IntegerDim w As IntegerPrivate Sub Form_Load ( )Picture2.Picture = LoadPicture ( App.Path & a01.bmp ) ’导入图片’h = Picture 1 .Heightw = Picture 1.WidthEnd Sub[代码7-3]Private Sub Commandl_Click ( ) 旋转180°Picture2.Picture = LoadPicture ( )For j = 0 To h Step 1For i = 0 To w Step 1(1) Next iNext jEnd SubPrivate Sub Command2_Click ( ) ’顺时针施转90°’Picture2.Picture = LoadPicture ( )For i-h To 0 Step-1For j - 0 To w Step 1(2) Next jNext iEnd SubPrivate Sub Command3_Click ( ) ’逆时针旋转90°’Picture2.Picture = LoadPicture ( )For j =w To 0 Step -1For i = 0 To h Step 1(3) Next iNext jEnd SubPrivate Sub Command4 Click ( ) ’水平翻转Picture2.Picture = LoadPicture ( )For i = w To 0 Step -1For j = 0 To h Step 1(4) Next jNext iEnd SubPrivate Sub Command5_Click ( ) ’垂直翻转Picture2.Picmre = LoadPicmre ( )Forj = 0 To h Step 1For i = 0 To w Step I(5) Next iNext jEnd SubPrivate Sub Command6_Click ( ) ’复位Picture2.Picture = LoadPicmre ( )For i = 0 To w Step 1For j = 0 To h Step 1(6) Next jNext iEnd Sub